diff options
| author | Damien Doligez <damien.doligez-inria.fr> | 2012-10-15 17:50:56 +0000 |
|---|---|---|
| committer | Damien Doligez <damien.doligez-inria.fr> | 2012-10-15 17:50:56 +0000 |
| commit | def31744f996fecdb187d43de38ddae2ff3ab881 (patch) | |
| tree | 13c19fb7d95f21bb0f8b1ab437d38977f2214577 | |
| parent | 0a6f6a78570284f9476171216050986ea00f89db (diff) | |
remove all $Id keywords
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@13013 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
1050 files changed, 10 insertions, 2112 deletions
@@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - # The main Makefile include config/Makefile diff --git a/Makefile.nt b/Makefile.nt index b9d979389..e45594c62 100644 --- a/Makefile.nt +++ b/Makefile.nt @@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - # The main Makefile include config/Makefile @@ -129,7 +129,3 @@ To be effective, bug reports should include a complete program configuration you are using (machine type, etc). You can also contact the implementors directly at caml@inria.fr. - - ----- -$Id$ diff --git a/asmcomp/amd64/arch.ml b/asmcomp/amd64/arch.ml index 8e065d9ae..6d6612961 100644 --- a/asmcomp/amd64/arch.ml +++ b/asmcomp/amd64/arch.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Machine-specific command-line options *) let pic_code = ref true diff --git a/asmcomp/amd64/emit.mlp b/asmcomp/amd64/emit.mlp index 970108abf..06f6abafa 100644 --- a/asmcomp/amd64/emit.mlp +++ b/asmcomp/amd64/emit.mlp @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Emission of x86-64 (AMD 64) assembly code *) open Cmm diff --git a/asmcomp/amd64/emit_nt.mlp b/asmcomp/amd64/emit_nt.mlp index 47dce9f59..bc1750c16 100644 --- a/asmcomp/amd64/emit_nt.mlp +++ b/asmcomp/amd64/emit_nt.mlp @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Emission of x86-64 (AMD 64) assembly code, MASM syntax *) module StringSet = diff --git a/asmcomp/amd64/proc.ml b/asmcomp/amd64/proc.ml index b9de3e1cd..351770b28 100644 --- a/asmcomp/amd64/proc.ml +++ b/asmcomp/amd64/proc.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Description of the AMD64 processor *) open Misc diff --git a/asmcomp/amd64/reload.ml b/asmcomp/amd64/reload.ml index e7d5e23b0..510f201f1 100644 --- a/asmcomp/amd64/reload.ml +++ b/asmcomp/amd64/reload.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Cmm open Arch open Reg diff --git a/asmcomp/amd64/scheduling.ml b/asmcomp/amd64/scheduling.ml index 1052a540d..e234431bf 100644 --- a/asmcomp/amd64/scheduling.ml +++ b/asmcomp/amd64/scheduling.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - let _ = let module M = Schedgen in () (* to create a dependency *) (* Scheduling is turned off because the processor schedules dynamically diff --git a/asmcomp/amd64/selection.ml b/asmcomp/amd64/selection.ml index 9953b73a6..cc0713320 100644 --- a/asmcomp/amd64/selection.ml +++ b/asmcomp/amd64/selection.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Instruction selection for the AMD64 *) open Arch diff --git a/asmcomp/arm/arch.ml b/asmcomp/arm/arch.ml index cce352c21..8822d3813 100644 --- a/asmcomp/arm/arch.ml +++ b/asmcomp/arm/arch.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Specific operations for the ARM processor *) open Format diff --git a/asmcomp/arm/emit.mlp b/asmcomp/arm/emit.mlp index cc87ab461..2c6eb7233 100644 --- a/asmcomp/arm/emit.mlp +++ b/asmcomp/arm/emit.mlp @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Emission of ARM assembly code *) open Misc diff --git a/asmcomp/arm/proc.ml b/asmcomp/arm/proc.ml index aed2b01a7..f42749c0a 100644 --- a/asmcomp/arm/proc.ml +++ b/asmcomp/arm/proc.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Description of the ARM processor *) open Misc diff --git a/asmcomp/arm/reload.ml b/asmcomp/arm/reload.ml index c5b137abc..bd783acb8 100644 --- a/asmcomp/arm/reload.ml +++ b/asmcomp/arm/reload.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Reloading for the ARM *) let fundecl f = diff --git a/asmcomp/arm/scheduling.ml b/asmcomp/arm/scheduling.ml index 4b47733f1..58446d086 100644 --- a/asmcomp/arm/scheduling.ml +++ b/asmcomp/arm/scheduling.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Arch open Mach diff --git a/asmcomp/arm/selection.ml b/asmcomp/arm/selection.ml index 147e24191..e84366ac3 100644 --- a/asmcomp/arm/selection.ml +++ b/asmcomp/arm/selection.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Instruction selection for the ARM processor *) open Arch diff --git a/asmcomp/asmgen.ml b/asmcomp/asmgen.ml index 5f513db1b..62d466ed9 100644 --- a/asmcomp/asmgen.ml +++ b/asmcomp/asmgen.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* From lambda to assembly code *) open Format diff --git a/asmcomp/asmgen.mli b/asmcomp/asmgen.mli index f71cba8f7..33582af4a 100644 --- a/asmcomp/asmgen.mli +++ b/asmcomp/asmgen.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* From lambda to assembly code *) val compile_implementation : diff --git a/asmcomp/asmlibrarian.ml b/asmcomp/asmlibrarian.ml index e0d2170b5..ea17365ac 100644 --- a/asmcomp/asmlibrarian.ml +++ b/asmcomp/asmlibrarian.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Build libraries of .cmx files *) open Misc diff --git a/asmcomp/asmlibrarian.mli b/asmcomp/asmlibrarian.mli index 20a0380c9..c1a6a4788 100644 --- a/asmcomp/asmlibrarian.mli +++ b/asmcomp/asmlibrarian.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Build libraries of .cmx files *) open Format diff --git a/asmcomp/asmlink.ml b/asmcomp/asmlink.ml index fe78bd02c..dc5893394 100644 --- a/asmcomp/asmlink.ml +++ b/asmcomp/asmlink.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Link a set of .cmx/.o files and produce an executable *) open Misc diff --git a/asmcomp/asmlink.mli b/asmcomp/asmlink.mli index b9465f809..1cf9e302c 100644 --- a/asmcomp/asmlink.mli +++ b/asmcomp/asmlink.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Link a set of .cmx/.o files and produce an executable or a plugin *) open Format diff --git a/asmcomp/asmpackager.ml b/asmcomp/asmpackager.ml index 0fc89866f..7e19f60d3 100644 --- a/asmcomp/asmpackager.ml +++ b/asmcomp/asmpackager.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* "Package" a set of .cmx/.o files into one .cmx/.o file having the original compilation units as sub-modules. *) diff --git a/asmcomp/asmpackager.mli b/asmcomp/asmpackager.mli index fafccfea3..165f5d331 100644 --- a/asmcomp/asmpackager.mli +++ b/asmcomp/asmpackager.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* "Package" a set of .cmx/.o files into one .cmx/.o file having the original compilation units as sub-modules. *) diff --git a/asmcomp/clambda.ml b/asmcomp/clambda.ml index 9a01de819..dd53020d7 100644 --- a/asmcomp/clambda.ml +++ b/asmcomp/clambda.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* A variant of the "lambda" code with direct / indirect calls explicit and closures explicit too *) diff --git a/asmcomp/clambda.mli b/asmcomp/clambda.mli index 808c1c6da..737965db8 100644 --- a/asmcomp/clambda.mli +++ b/asmcomp/clambda.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* A variant of the "lambda" code with direct / indirect calls explicit and closures explicit too *) diff --git a/asmcomp/closure.ml b/asmcomp/closure.ml index 365976521..114f5e641 100644 --- a/asmcomp/closure.ml +++ b/asmcomp/closure.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Introduction of closures, uncurrying, recognition of direct calls *) open Misc diff --git a/asmcomp/closure.mli b/asmcomp/closure.mli index f406603c2..e7bccbca6 100644 --- a/asmcomp/closure.mli +++ b/asmcomp/closure.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Introduction of closures, uncurrying, recognition of direct calls *) val intro: int -> Lambda.lambda -> Clambda.ulambda diff --git a/asmcomp/cmm.ml b/asmcomp/cmm.ml index 7787a2204..941b01423 100644 --- a/asmcomp/cmm.ml +++ b/asmcomp/cmm.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type machtype_component = Addr | Int diff --git a/asmcomp/cmm.mli b/asmcomp/cmm.mli index 5787bcb96..202b6aece 100644 --- a/asmcomp/cmm.mli +++ b/asmcomp/cmm.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Second intermediate language (machine independent) *) type machtype_component = diff --git a/asmcomp/cmmgen.ml b/asmcomp/cmmgen.ml index 366f15d6c..45ddfd2b5 100644 --- a/asmcomp/cmmgen.ml +++ b/asmcomp/cmmgen.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Translation from closed lambda to C-- *) open Misc diff --git a/asmcomp/cmmgen.mli b/asmcomp/cmmgen.mli index a192b985e..84db405f8 100644 --- a/asmcomp/cmmgen.mli +++ b/asmcomp/cmmgen.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Translation from closed lambda to C-- *) val compunit: int -> Clambda.ulambda -> Cmm.phrase list diff --git a/asmcomp/cmx_format.mli b/asmcomp/cmx_format.mli index db8158e66..07955169b 100644 --- a/asmcomp/cmx_format.mli +++ b/asmcomp/cmx_format.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Format of .cmx, .cmxa and .cmxs files *) (* Each .o file has a matching .cmx file that provides the following infos diff --git a/asmcomp/codegen.ml b/asmcomp/codegen.ml index 4b71503f9..a31824628 100644 --- a/asmcomp/codegen.ml +++ b/asmcomp/codegen.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* From C-- to assembly code *) open Format diff --git a/asmcomp/codegen.mli b/asmcomp/codegen.mli index 43f98e50b..5dab12fc9 100644 --- a/asmcomp/codegen.mli +++ b/asmcomp/codegen.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* From C-- to assembly code *) val phrase: Cmm.phrase -> unit diff --git a/asmcomp/coloring.ml b/asmcomp/coloring.ml index 06c1eb824..db171d8a2 100644 --- a/asmcomp/coloring.ml +++ b/asmcomp/coloring.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Register allocation by coloring of the interference graph *) open Reg diff --git a/asmcomp/coloring.mli b/asmcomp/coloring.mli index 72576fa10..b0cd0437a 100644 --- a/asmcomp/coloring.mli +++ b/asmcomp/coloring.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Register allocation by coloring of the interference graph *) val allocate_registers: unit -> unit diff --git a/asmcomp/comballoc.ml b/asmcomp/comballoc.ml index 9767d2638..6192f1e86 100644 --- a/asmcomp/comballoc.ml +++ b/asmcomp/comballoc.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Combine heap allocations occurring in the same basic block *) open Mach diff --git a/asmcomp/comballoc.mli b/asmcomp/comballoc.mli index 20be98054..ee04c16b3 100644 --- a/asmcomp/comballoc.mli +++ b/asmcomp/comballoc.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Combine heap allocations occurring in the same basic block *) val fundecl: Mach.fundecl -> Mach.fundecl diff --git a/asmcomp/compilenv.ml b/asmcomp/compilenv.ml index 4c6e72d0b..5f2bcdd46 100644 --- a/asmcomp/compilenv.ml +++ b/asmcomp/compilenv.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compilation environments for compilation units *) open Config diff --git a/asmcomp/compilenv.mli b/asmcomp/compilenv.mli index eeab477f2..8db90c287 100644 --- a/asmcomp/compilenv.mli +++ b/asmcomp/compilenv.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compilation environments for compilation units *) open Cmx_format diff --git a/asmcomp/emit.mli b/asmcomp/emit.mli index e2ff68ffc..ab9442efc 100644 --- a/asmcomp/emit.mli +++ b/asmcomp/emit.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Generation of assembly code *) val fundecl: Linearize.fundecl -> unit diff --git a/asmcomp/emitaux.ml b/asmcomp/emitaux.ml index 41c70212e..c3f888851 100644 --- a/asmcomp/emitaux.ml +++ b/asmcomp/emitaux.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Common functions for emitting assembly code *) open Debuginfo diff --git a/asmcomp/emitaux.mli b/asmcomp/emitaux.mli index c7fe802e5..cc479d8cc 100644 --- a/asmcomp/emitaux.mli +++ b/asmcomp/emitaux.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Common functions for emitting assembly code *) val output_channel: out_channel ref diff --git a/asmcomp/i386/arch.ml b/asmcomp/i386/arch.ml index d5fc630ad..58560fdd3 100644 --- a/asmcomp/i386/arch.ml +++ b/asmcomp/i386/arch.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Machine-specific command-line options *) let fast_math = ref false diff --git a/asmcomp/i386/emit.mlp b/asmcomp/i386/emit.mlp index ad428d6b7..012be8c53 100644 --- a/asmcomp/i386/emit.mlp +++ b/asmcomp/i386/emit.mlp @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Emission of Intel 386 assembly code *) module StringSet = Set.Make(struct type t = string let compare = compare end) diff --git a/asmcomp/i386/emit_nt.mlp b/asmcomp/i386/emit_nt.mlp index 48704ab40..3f940f6df 100644 --- a/asmcomp/i386/emit_nt.mlp +++ b/asmcomp/i386/emit_nt.mlp @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Emission of Intel 386 assembly code, MASM syntax. *) module StringSet = diff --git a/asmcomp/i386/proc.ml b/asmcomp/i386/proc.ml index a65622d47..bb510bbf4 100644 --- a/asmcomp/i386/proc.ml +++ b/asmcomp/i386/proc.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Description of the Intel 386 processor *) open Misc diff --git a/asmcomp/i386/reload.ml b/asmcomp/i386/reload.ml index 66ad6a140..623d12a84 100644 --- a/asmcomp/i386/reload.ml +++ b/asmcomp/i386/reload.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Cmm open Arch open Reg diff --git a/asmcomp/i386/scheduling.ml b/asmcomp/i386/scheduling.ml index 48ce38077..b166a05a3 100644 --- a/asmcomp/i386/scheduling.ml +++ b/asmcomp/i386/scheduling.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - let () = let module M = Schedgen in () (* to create a dependency *) (* Scheduling is turned off because our model does not fit the 486 diff --git a/asmcomp/i386/selection.ml b/asmcomp/i386/selection.ml index 2363e48f9..49b5059d9 100644 --- a/asmcomp/i386/selection.ml +++ b/asmcomp/i386/selection.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Instruction selection for the Intel x86 *) open Misc diff --git a/asmcomp/interf.ml b/asmcomp/interf.ml index aa71ebd38..f47f138a3 100644 --- a/asmcomp/interf.ml +++ b/asmcomp/interf.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Construction of the interference graph. Annotate pseudoregs with interference lists and preference lists. *) diff --git a/asmcomp/interf.mli b/asmcomp/interf.mli index 9e16f8364..a9b0b6309 100644 --- a/asmcomp/interf.mli +++ b/asmcomp/interf.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Construction of the interference graph. Annotate pseudoregs with interference lists and preference lists. *) diff --git a/asmcomp/linearize.ml b/asmcomp/linearize.ml index 8a5411876..963ffe9a2 100644 --- a/asmcomp/linearize.ml +++ b/asmcomp/linearize.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Transformation of Mach code into a list of pseudo-instructions. *) open Reg diff --git a/asmcomp/linearize.mli b/asmcomp/linearize.mli index 9fbe14ddb..ad5dc3a9f 100644 --- a/asmcomp/linearize.mli +++ b/asmcomp/linearize.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Transformation of Mach code into a list of pseudo-instructions. *) type label = int diff --git a/asmcomp/liveness.ml b/asmcomp/liveness.ml index 74a034fb3..b3085b6c7 100644 --- a/asmcomp/liveness.ml +++ b/asmcomp/liveness.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Liveness analysis. Annotate mach code with the set of regs live at each point. *) diff --git a/asmcomp/liveness.mli b/asmcomp/liveness.mli index 8a25a27bc..b52ec5a2b 100644 --- a/asmcomp/liveness.mli +++ b/asmcomp/liveness.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Liveness analysis. Annotate mach code with the set of regs live at each point. *) diff --git a/asmcomp/mach.ml b/asmcomp/mach.ml index 3d29bde11..3e7160b51 100644 --- a/asmcomp/mach.ml +++ b/asmcomp/mach.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Representation of machine code by sequences of pseudoinstructions *) type integer_comparison = diff --git a/asmcomp/mach.mli b/asmcomp/mach.mli index 05cc999b5..06fe1c33d 100644 --- a/asmcomp/mach.mli +++ b/asmcomp/mach.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Representation of machine code by sequences of pseudoinstructions *) type integer_comparison = diff --git a/asmcomp/power/arch.ml b/asmcomp/power/arch.ml index c1323234a..d547df294 100644 --- a/asmcomp/power/arch.ml +++ b/asmcomp/power/arch.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Specific operations for the PowerPC processor *) open Misc diff --git a/asmcomp/power/emit.mlp b/asmcomp/power/emit.mlp index 38586076f..dfe6e1eb4 100644 --- a/asmcomp/power/emit.mlp +++ b/asmcomp/power/emit.mlp @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Emission of PowerPC assembly code *) module StringSet = Set.Make(struct type t = string let compare = compare end) diff --git a/asmcomp/power/proc.ml b/asmcomp/power/proc.ml index 6eaacbbad..feb38f253 100644 --- a/asmcomp/power/proc.ml +++ b/asmcomp/power/proc.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Description of the Power PC *) open Misc diff --git a/asmcomp/power/reload.ml b/asmcomp/power/reload.ml index ef0ab79df..98f747a81 100644 --- a/asmcomp/power/reload.ml +++ b/asmcomp/power/reload.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Reloading for the PowerPC *) let fundecl f = diff --git a/asmcomp/power/scheduling.ml b/asmcomp/power/scheduling.ml index 90d08831d..e4a575e0a 100644 --- a/asmcomp/power/scheduling.ml +++ b/asmcomp/power/scheduling.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Instruction scheduling for the Power PC *) open Arch diff --git a/asmcomp/power/selection.ml b/asmcomp/power/selection.ml index 179548af5..41b6e9fa7 100644 --- a/asmcomp/power/selection.ml +++ b/asmcomp/power/selection.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Instruction selection for the Power PC processor *) open Misc diff --git a/asmcomp/printcmm.ml b/asmcomp/printcmm.ml index ca1c0f11c..f29bcbc43 100644 --- a/asmcomp/printcmm.ml +++ b/asmcomp/printcmm.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Pretty-printing of C-- code *) open Format diff --git a/asmcomp/printcmm.mli b/asmcomp/printcmm.mli index c64657653..1c97c4a00 100644 --- a/asmcomp/printcmm.mli +++ b/asmcomp/printcmm.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Pretty-printing of C-- code *) open Format diff --git a/asmcomp/printlinear.ml b/asmcomp/printlinear.ml index 0ac6e0655..6e1770709 100644 --- a/asmcomp/printlinear.ml +++ b/asmcomp/printlinear.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Pretty-printing of linearized machine code *) open Format diff --git a/asmcomp/printlinear.mli b/asmcomp/printlinear.mli index bb179c94c..68eda9c1d 100644 --- a/asmcomp/printlinear.mli +++ b/asmcomp/printlinear.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Pretty-printing of linearized machine code *) open Format diff --git a/asmcomp/printmach.ml b/asmcomp/printmach.ml index 93d0a0224..6407f4f78 100644 --- a/asmcomp/printmach.ml +++ b/asmcomp/printmach.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Pretty-printing of pseudo machine code *) open Format diff --git a/asmcomp/printmach.mli b/asmcomp/printmach.mli index 509018d54..bfb0dbefa 100644 --- a/asmcomp/printmach.mli +++ b/asmcomp/printmach.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Pretty-printing of pseudo machine code *) open Format diff --git a/asmcomp/proc.mli b/asmcomp/proc.mli index 7d0a5e485..91a480b09 100644 --- a/asmcomp/proc.mli +++ b/asmcomp/proc.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Processor descriptions *) (* Instruction selection *) diff --git a/asmcomp/reg.ml b/asmcomp/reg.ml index 30c0ab5ab..1ec0bf9eb 100644 --- a/asmcomp/reg.ml +++ b/asmcomp/reg.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Cmm type t = diff --git a/asmcomp/reg.mli b/asmcomp/reg.mli index 11e314f61..889e026f2 100644 --- a/asmcomp/reg.mli +++ b/asmcomp/reg.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Pseudo-registers *) type t = diff --git a/asmcomp/reload.mli b/asmcomp/reload.mli index ff4b1637a..cecacbd4a 100644 --- a/asmcomp/reload.mli +++ b/asmcomp/reload.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Insert load/stores for pseudoregs that got assigned to stack locations. *) val fundecl: Mach.fundecl -> Mach.fundecl * bool diff --git a/asmcomp/reloadgen.ml b/asmcomp/reloadgen.ml index 9da79587a..8f40ad019 100644 --- a/asmcomp/reloadgen.ml +++ b/asmcomp/reloadgen.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Insert load/stores for pseudoregs that got assigned to stack locations. *) open Misc diff --git a/asmcomp/reloadgen.mli b/asmcomp/reloadgen.mli index 9f0b2b4e1..45c68d1c3 100644 --- a/asmcomp/reloadgen.mli +++ b/asmcomp/reloadgen.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - class reload_generic : object method reload_operation : Mach.operation -> Reg.t array -> Reg.t array -> Reg.t array * Reg.t array diff --git a/asmcomp/schedgen.ml b/asmcomp/schedgen.ml index 5cde55642..885c94540 100644 --- a/asmcomp/schedgen.ml +++ b/asmcomp/schedgen.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Instruction scheduling *) open Reg diff --git a/asmcomp/schedgen.mli b/asmcomp/schedgen.mli index e2c046d22..6019d96f4 100644 --- a/asmcomp/schedgen.mli +++ b/asmcomp/schedgen.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Instruction scheduling *) type code_dag_node = diff --git a/asmcomp/scheduling.mli b/asmcomp/scheduling.mli index a006d1f13..5949661d1 100644 --- a/asmcomp/scheduling.mli +++ b/asmcomp/scheduling.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Instruction scheduling *) val fundecl: Linearize.fundecl -> Linearize.fundecl diff --git a/asmcomp/selectgen.ml b/asmcomp/selectgen.ml index e2ffd34ac..1d2bf96d2 100644 --- a/asmcomp/selectgen.ml +++ b/asmcomp/selectgen.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Selection of pseudo-instructions, assignment of pseudo-registers, sequentialization. *) diff --git a/asmcomp/selectgen.mli b/asmcomp/selectgen.mli index 058f9e73e..11af7c1ff 100644 --- a/asmcomp/selectgen.mli +++ b/asmcomp/selectgen.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Selection of pseudo-instructions, assignment of pseudo-registers, sequentialization. *) diff --git a/asmcomp/selection.mli b/asmcomp/selection.mli index a78cb1dae..f1c9e34ce 100644 --- a/asmcomp/selection.mli +++ b/asmcomp/selection.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Selection of pseudo-instructions, assignment of pseudo-registers, sequentialization. *) diff --git a/asmcomp/sparc/arch.ml b/asmcomp/sparc/arch.ml index ce2c0e157..78725b53f 100644 --- a/asmcomp/sparc/arch.ml +++ b/asmcomp/sparc/arch.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Specific operations for the Sparc processor *) open Format diff --git a/asmcomp/sparc/emit.mlp b/asmcomp/sparc/emit.mlp index 95bb29421..b8387cd7b 100644 --- a/asmcomp/sparc/emit.mlp +++ b/asmcomp/sparc/emit.mlp @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Emission of Sparc assembly code *) open Misc diff --git a/asmcomp/sparc/proc.ml b/asmcomp/sparc/proc.ml index f7b204db5..b88d5aaae 100644 --- a/asmcomp/sparc/proc.ml +++ b/asmcomp/sparc/proc.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Description of the Sparc processor *) open Misc diff --git a/asmcomp/sparc/reload.ml b/asmcomp/sparc/reload.ml index 6b1d8aea9..caae16d7f 100644 --- a/asmcomp/sparc/reload.ml +++ b/asmcomp/sparc/reload.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Reloading for the Sparc *) let fundecl f = diff --git a/asmcomp/sparc/scheduling.ml b/asmcomp/sparc/scheduling.ml index 180af4b19..048880abd 100644 --- a/asmcomp/sparc/scheduling.ml +++ b/asmcomp/sparc/scheduling.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Cmm open Mach diff --git a/asmcomp/sparc/selection.ml b/asmcomp/sparc/selection.ml index 31d6e7020..055b78f19 100644 --- a/asmcomp/sparc/selection.ml +++ b/asmcomp/sparc/selection.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Instruction selection for the Sparc processor *) open Cmm diff --git a/asmcomp/spill.ml b/asmcomp/spill.ml index 7b055959e..f52b09fc6 100644 --- a/asmcomp/spill.ml +++ b/asmcomp/spill.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Insertion of moves to suggest possible spilling / reloading points before register allocation. *) diff --git a/asmcomp/spill.mli b/asmcomp/spill.mli index 4db422227..66954aef5 100644 --- a/asmcomp/spill.mli +++ b/asmcomp/spill.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Insertion of moves to suggest possible spilling / reloading points before register allocation. *) diff --git a/asmcomp/split.ml b/asmcomp/split.ml index a7effdda3..96e9e376b 100644 --- a/asmcomp/split.ml +++ b/asmcomp/split.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Renaming of registers at reload points to split live ranges. *) open Reg diff --git a/asmcomp/split.mli b/asmcomp/split.mli index baf350d50..f794fec16 100644 --- a/asmcomp/split.mli +++ b/asmcomp/split.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Renaming of registers at reload points to split live ranges. *) val fundecl: Mach.fundecl -> Mach.fundecl diff --git a/asmrun/Makefile b/asmrun/Makefile index 4d7e6552b..03716c4fd 100644 --- a/asmrun/Makefile +++ b/asmrun/Makefile @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - include ../config/Makefile CC=$(NATIVECC) diff --git a/asmrun/Makefile.nt b/asmrun/Makefile.nt index 3cefe2d38..b231f2c80 100644 --- a/asmrun/Makefile.nt +++ b/asmrun/Makefile.nt @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - include ../config/Makefile CC=$(NATIVECC) diff --git a/asmrun/amd64.S b/asmrun/amd64.S index d7d8dab50..6c5eddab2 100644 --- a/asmrun/amd64.S +++ b/asmrun/amd64.S @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Asm part of the runtime system, AMD64 processor */ /* Must be preprocessed by cpp */ @@ -493,7 +491,7 @@ LBL(110): popq C_ARG_2 /* arg 2: pc of raise */ movq %rsp, C_ARG_3 /* arg 3: sp at raise */ movq %r14, C_ARG_4 /* arg 4: sp of handler */ - /* PR#5700: thanks to popq above, stack is now 16-aligned */ + /* PR#5700: thanks to popq above, stack is now 16-aligned */ PREPARE_FOR_C_CALL /* no need to cleanup after */ call GCALL(caml_stash_backtrace) movq %r12, %rax /* Recover exception bucket */ diff --git a/asmrun/amd64nt.asm b/asmrun/amd64nt.asm index 3fb1b0f5e..07b6a9b88 100644 --- a/asmrun/amd64nt.asm +++ b/asmrun/amd64nt.asm @@ -11,8 +11,6 @@ ;* * ;*********************************************************************** -; $Id$ - ; Asm part of the runtime system, AMD64 processor, Intel syntax ; Notes on Win64 calling conventions: diff --git a/asmrun/arm.S b/asmrun/arm.S index 3af6e6f17..2a70b8c73 100644 --- a/asmrun/arm.S +++ b/asmrun/arm.S @@ -12,8 +12,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Asm part of the runtime system, ARM processor */ /* Must be preprocessed by cpp */ diff --git a/asmrun/backtrace.c b/asmrun/backtrace.c index 7b47c0bfc..292549be7 100644 --- a/asmrun/backtrace.c +++ b/asmrun/backtrace.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Stack backtrace for uncaught exceptions */ #include <stdio.h> diff --git a/asmrun/fail.c b/asmrun/fail.c index 77cf4246c..09a9af966 100644 --- a/asmrun/fail.c +++ b/asmrun/fail.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Raising exceptions from C. */ #include <signal.h> diff --git a/asmrun/i386.S b/asmrun/i386.S index af0889cb7..4ef538f7a 100644 --- a/asmrun/i386.S +++ b/asmrun/i386.S @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Asm part of the runtime system, Intel 386 processor */ /* Must be preprocessed by cpp */ diff --git a/asmrun/i386nt.asm b/asmrun/i386nt.asm index 23d341dae..d74497413 100644 --- a/asmrun/i386nt.asm +++ b/asmrun/i386nt.asm @@ -11,8 +11,6 @@ ;* * ;*********************************************************************** -; $Id$ - ; Asm part of the runtime system, Intel 386 processor, Intel syntax .386 diff --git a/asmrun/power-elf.S b/asmrun/power-elf.S index 8935335b8..94f4a29d4 100644 --- a/asmrun/power-elf.S +++ b/asmrun/power-elf.S @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #define Addrglobal(reg,glob) \ addis reg, 0, glob@ha; \ addi reg, reg, glob@l diff --git a/asmrun/power-rhapsody.S b/asmrun/power-rhapsody.S index 3bf3e19fe..309c955b1 100644 --- a/asmrun/power-rhapsody.S +++ b/asmrun/power-rhapsody.S @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifdef __ppc64__ #define X(a,b) b #else diff --git a/asmrun/roots.c b/asmrun/roots.c index b46df1dbc..93e7a655c 100644 --- a/asmrun/roots.c +++ b/asmrun/roots.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* To walk the memory roots for garbage collection */ #include "finalise.h" diff --git a/asmrun/signals_asm.c b/asmrun/signals_asm.c index 9d42718b8..fb22f8baf 100644 --- a/asmrun/signals_asm.c +++ b/asmrun/signals_asm.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Signal handling, code specific to the native-code compiler */ #if defined(TARGET_amd64) && defined (SYS_linux) diff --git a/asmrun/signals_osdep.h b/asmrun/signals_osdep.h index 830c43b38..2c739fb2c 100644 --- a/asmrun/signals_osdep.h +++ b/asmrun/signals_osdep.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Processor- and OS-dependent signal interface */ /****************** AMD64, Linux */ diff --git a/asmrun/sparc.S b/asmrun/sparc.S index 907ebc01e..7f24b4b42 100644 --- a/asmrun/sparc.S +++ b/asmrun/sparc.S @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Asm part of the runtime system for the Sparc processor. */ /* Must be preprocessed by cpp */ diff --git a/asmrun/stack.h b/asmrun/stack.h index 9b575cb70..4f1742b95 100644 --- a/asmrun/stack.h +++ b/asmrun/stack.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Machine-dependent interface with the asm code */ #ifndef CAML_STACK_H diff --git a/asmrun/startup.c b/asmrun/startup.c index 00f4f8cd2..84e68fd85 100644 --- a/asmrun/startup.c +++ b/asmrun/startup.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Start-up code */ #include <stdio.h> diff --git a/build/boot.sh b/build/boot.sh index 79d5d20ba..5d1feca7e 100755 --- a/build/boot.sh +++ b/build/boot.sh @@ -12,7 +12,6 @@ # # ######################################################################### -# $Id$ cd `dirname $0`/.. set -ex TAG_LINE='true: -use_stdlib' diff --git a/build/camlp4-byte-only.sh b/build/camlp4-byte-only.sh index 442284d9d..cbfe05c75 100755 --- a/build/camlp4-byte-only.sh +++ b/build/camlp4-byte-only.sh @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - set -e cd `dirname $0`/.. . build/targets.sh diff --git a/build/camlp4-mkCamlp4Ast.sh b/build/camlp4-mkCamlp4Ast.sh index 45311065c..0ff20e8b2 100755 --- a/build/camlp4-mkCamlp4Ast.sh +++ b/build/camlp4-mkCamlp4Ast.sh @@ -12,7 +12,6 @@ # # ######################################################################### -# $Id$ set -e cd `dirname $0`/.. diff --git a/build/camlp4-native-only.sh b/build/camlp4-native-only.sh index d05932e2a..513a99165 100755 --- a/build/camlp4-native-only.sh +++ b/build/camlp4-native-only.sh @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - set -e cd `dirname $0`/.. . build/targets.sh diff --git a/build/camlp4-targets.sh b/build/camlp4-targets.sh index 4f4f51979..8fbaafb59 100644 --- a/build/camlp4-targets.sh +++ b/build/camlp4-targets.sh @@ -12,7 +12,6 @@ # # ######################################################################### -# $Id$ CAMLP4_COMMON="\ camlp4/Camlp4/Camlp4Ast.partial.ml \ camlp4/boot/camlp4boot.byte" diff --git a/build/distclean.sh b/build/distclean.sh index b336f9bb4..aa8b2f310 100755 --- a/build/distclean.sh +++ b/build/distclean.sh @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - cd `dirname $0`/.. set -ex (cd byterun && make clean) || : diff --git a/build/fastworld.sh b/build/fastworld.sh index bbe42870a..0e3302ef7 100755 --- a/build/fastworld.sh +++ b/build/fastworld.sh @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - cd `dirname $0` set -e if [ -e ocamlbuild_mixed_mode ]; then diff --git a/build/install.sh b/build/install.sh index c0ad62f8b..13021a153 100755 --- a/build/install.sh +++ b/build/install.sh @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - set -e cd `dirname $0`/.. diff --git a/build/mkmyocamlbuild_config.sh b/build/mkmyocamlbuild_config.sh index 600878d8a..e2068375c 100755 --- a/build/mkmyocamlbuild_config.sh +++ b/build/mkmyocamlbuild_config.sh @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - cd `dirname $0`/.. sed \ diff --git a/build/mkruntimedef.sh b/build/mkruntimedef.sh index 6cfd0749c..a1bf141ed 100755 --- a/build/mkruntimedef.sh +++ b/build/mkruntimedef.sh @@ -12,7 +12,6 @@ # # ######################################################################### -# $Id$ echo 'let builtin_exceptions = [|'; \ sed -n -e 's|.*/\* \("[A-Za-z_]*"\) \*/$| \1;|p' byterun/fail.h | \ sed -e '$s/;$//'; \ diff --git a/build/myocamlbuild.sh b/build/myocamlbuild.sh index 7a029a6a1..34ad894f9 100755 --- a/build/myocamlbuild.sh +++ b/build/myocamlbuild.sh @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - cd `dirname $0`/.. set -xe if [ ! -x _build/ocamlbuild/ocamlbuildlight.byte ]; then diff --git a/build/ocamlbuild-byte-only.sh b/build/ocamlbuild-byte-only.sh index f669e8e68..aeb5bcba9 100755 --- a/build/ocamlbuild-byte-only.sh +++ b/build/ocamlbuild-byte-only.sh @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - set -e cd `dirname $0`/.. . build/targets.sh diff --git a/build/ocamlbuild-native-only.sh b/build/ocamlbuild-native-only.sh index f092a7892..4d7decfc0 100755 --- a/build/ocamlbuild-native-only.sh +++ b/build/ocamlbuild-native-only.sh @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - set -e cd `dirname $0`/.. . build/targets.sh diff --git a/build/ocamlbuildlib-native-only.sh b/build/ocamlbuildlib-native-only.sh index 9d6660803..285c561a0 100755 --- a/build/ocamlbuildlib-native-only.sh +++ b/build/ocamlbuildlib-native-only.sh @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - set -e cd `dirname $0`/.. . build/targets.sh diff --git a/build/otherlibs-targets.sh b/build/otherlibs-targets.sh index a3890d038..bd28a0dc9 100644 --- a/build/otherlibs-targets.sh +++ b/build/otherlibs-targets.sh @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - OTHERLIBS_BYTE="" OTHERLIBS_NATIVE="" OTHERLIBS_UNIX_NATIVE="" diff --git a/build/partial-install.sh b/build/partial-install.sh index 81c0e116d..50a4fe935 100755 --- a/build/partial-install.sh +++ b/build/partial-install.sh @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - ###################################### ######### Copied from build/install.sh ###################################### diff --git a/build/targets.sh b/build/targets.sh index d4e5a6a93..219f73cd4 100644 --- a/build/targets.sh +++ b/build/targets.sh @@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - . config/config.sh . build/otherlibs-targets.sh . build/camlp4-targets.sh diff --git a/build/world.all.sh b/build/world.all.sh index bf456fc27..45c053cd2 100755 --- a/build/world.all.sh +++ b/build/world.all.sh @@ -12,7 +12,6 @@ # # ######################################################################### -# $Id$ set -e cd `dirname $0`/.. . build/targets.sh diff --git a/build/world.byte.sh b/build/world.byte.sh index a30cda2ff..5a520b99b 100755 --- a/build/world.byte.sh +++ b/build/world.byte.sh @@ -12,7 +12,6 @@ # # ######################################################################### -# $Id$ set -e cd `dirname $0`/.. . build/targets.sh diff --git a/build/world.native.sh b/build/world.native.sh index 19526805e..4f99467b3 100755 --- a/build/world.native.sh +++ b/build/world.native.sh @@ -12,7 +12,6 @@ # # ######################################################################### -# $Id$ set -e cd `dirname $0`/.. . build/targets.sh diff --git a/bytecomp/bytegen.ml b/bytecomp/bytegen.ml index 105be62d1..502b15f83 100644 --- a/bytecomp/bytegen.ml +++ b/bytecomp/bytegen.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* bytegen.ml : translation of lambda terms to lists of instructions. *) open Misc diff --git a/bytecomp/bytegen.mli b/bytecomp/bytegen.mli index e0cd5f617..3c24cc8e8 100644 --- a/bytecomp/bytegen.mli +++ b/bytecomp/bytegen.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Generation of bytecode from lambda terms *) open Lambda diff --git a/bytecomp/bytelibrarian.ml b/bytecomp/bytelibrarian.ml index 73cf26930..c13241afd 100644 --- a/bytecomp/bytelibrarian.ml +++ b/bytecomp/bytelibrarian.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Build libraries of .cmo files *) open Misc diff --git a/bytecomp/bytelibrarian.mli b/bytecomp/bytelibrarian.mli index 242011159..757874cb4 100644 --- a/bytecomp/bytelibrarian.mli +++ b/bytecomp/bytelibrarian.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Build libraries of .cmo files *) (* Format of a library file: diff --git a/bytecomp/bytelink.ml b/bytecomp/bytelink.ml index 1fea4a251..c218da51e 100644 --- a/bytecomp/bytelink.ml +++ b/bytecomp/bytelink.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Link a set of .cmo files and produce a bytecode executable. *) open Misc diff --git a/bytecomp/bytelink.mli b/bytecomp/bytelink.mli index 837a53394..89373be16 100644 --- a/bytecomp/bytelink.mli +++ b/bytecomp/bytelink.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Link .cmo files and produce a bytecode executable. *) val link : Format.formatter -> string list -> string -> unit diff --git a/bytecomp/bytepackager.ml b/bytecomp/bytepackager.ml index eea183f02..324341f47 100644 --- a/bytecomp/bytepackager.ml +++ b/bytecomp/bytepackager.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* "Package" a set of .cmo files into one .cmo file having the original compilation units as sub-modules. *) diff --git a/bytecomp/bytepackager.mli b/bytecomp/bytepackager.mli index 696b12aa0..3ae65f043 100644 --- a/bytecomp/bytepackager.mli +++ b/bytecomp/bytepackager.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* "Package" a set of .cmo files into one .cmo file having the original compilation units as sub-modules. *) diff --git a/bytecomp/bytesections.ml b/bytecomp/bytesections.ml index 17d57f9ed..5af3bc523 100644 --- a/bytecomp/bytesections.ml +++ b/bytecomp/bytesections.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Handling of sections in bytecode executable files *) (* List of all sections, in reverse order *) diff --git a/bytecomp/bytesections.mli b/bytecomp/bytesections.mli index c9264ad89..b9639c1fa 100644 --- a/bytecomp/bytesections.mli +++ b/bytecomp/bytesections.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Handling of sections in bytecode executable files *) (** Recording sections written to a bytecode executable file *) diff --git a/bytecomp/cmo_format.mli b/bytecomp/cmo_format.mli index b0cd05d67..abf4f1af3 100644 --- a/bytecomp/cmo_format.mli +++ b/bytecomp/cmo_format.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Symbol table information for .cmo and .cma files *) (* Relocation information *) diff --git a/bytecomp/dll.ml b/bytecomp/dll.ml index 3dc84ea27..5c62b9edc 100644 --- a/bytecomp/dll.ml +++ b/bytecomp/dll.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Handling of dynamically-linked libraries *) type dll_handle diff --git a/bytecomp/dll.mli b/bytecomp/dll.mli index 645db75a8..975315e26 100644 --- a/bytecomp/dll.mli +++ b/bytecomp/dll.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Handling of dynamically-linked libraries *) (* Extract the name of a DLLs from its external name (xxx.so or -lxxx) *) diff --git a/bytecomp/emitcode.ml b/bytecomp/emitcode.ml index f9a33db73..e69cae55e 100644 --- a/bytecomp/emitcode.ml +++ b/bytecomp/emitcode.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Generation of bytecode + relocation information *) open Config diff --git a/bytecomp/emitcode.mli b/bytecomp/emitcode.mli index 55f3dff11..60d791434 100644 --- a/bytecomp/emitcode.mli +++ b/bytecomp/emitcode.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Generation of bytecode for .cmo files *) open Cmo_format diff --git a/bytecomp/instruct.ml b/bytecomp/instruct.ml index 7757c7d48..5edcacd27 100644 --- a/bytecomp/instruct.ml +++ b/bytecomp/instruct.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Lambda type compilation_env = diff --git a/bytecomp/instruct.mli b/bytecomp/instruct.mli index 0fdccd298..d81228ac7 100644 --- a/bytecomp/instruct.mli +++ b/bytecomp/instruct.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The type of the instructions of the abstract machine *) open Lambda diff --git a/bytecomp/lambda.ml b/bytecomp/lambda.ml index 22dfb9b70..a8479052c 100644 --- a/bytecomp/lambda.ml +++ b/bytecomp/lambda.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Misc open Path open Asttypes diff --git a/bytecomp/lambda.mli b/bytecomp/lambda.mli index c228d36d4..540fe2f1c 100644 --- a/bytecomp/lambda.mli +++ b/bytecomp/lambda.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The "lambda" intermediate code *) open Asttypes diff --git a/bytecomp/matching.ml b/bytecomp/matching.ml index 49e0efaed..769b63590 100644 --- a/bytecomp/matching.ml +++ b/bytecomp/matching.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compilation of pattern matching *) open Misc diff --git a/bytecomp/matching.mli b/bytecomp/matching.mli index d8ea79108..5c8577b26 100644 --- a/bytecomp/matching.mli +++ b/bytecomp/matching.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compilation of pattern-matching *) open Typedtree diff --git a/bytecomp/meta.ml b/bytecomp/meta.ml index 732bcc8a1..35d877666 100644 --- a/bytecomp/meta.ml +++ b/bytecomp/meta.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - external global_data : unit -> Obj.t array = "caml_get_global_data" external realloc_global_data : int -> unit = "caml_realloc_global" external static_alloc : int -> string = "caml_static_alloc" diff --git a/bytecomp/meta.mli b/bytecomp/meta.mli index 93be656ad..a8ef5272a 100644 --- a/bytecomp/meta.mli +++ b/bytecomp/meta.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* To control the runtime system and bytecode interpreter *) external global_data : unit -> Obj.t array = "caml_get_global_data" diff --git a/bytecomp/printinstr.ml b/bytecomp/printinstr.ml index f2aa87dc3..a5cd7e05d 100644 --- a/bytecomp/printinstr.ml +++ b/bytecomp/printinstr.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Pretty-print lists of instructions *) open Format diff --git a/bytecomp/printinstr.mli b/bytecomp/printinstr.mli index 57cea578b..dd4fd15b3 100644 --- a/bytecomp/printinstr.mli +++ b/bytecomp/printinstr.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Pretty-print lists of instructions *) open Instruct diff --git a/bytecomp/printlambda.ml b/bytecomp/printlambda.ml index cb99003b2..4ecf2df38 100644 --- a/bytecomp/printlambda.ml +++ b/bytecomp/printlambda.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Format open Asttypes open Primitive diff --git a/bytecomp/printlambda.mli b/bytecomp/printlambda.mli index 0cbd59ed6..4a546b63e 100644 --- a/bytecomp/printlambda.mli +++ b/bytecomp/printlambda.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Lambda open Format diff --git a/bytecomp/runtimedef.mli b/bytecomp/runtimedef.mli index 489200094..c06038a46 100644 --- a/bytecomp/runtimedef.mli +++ b/bytecomp/runtimedef.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Values and functions known and/or provided by the runtime system *) val builtin_exceptions: string array diff --git a/bytecomp/simplif.ml b/bytecomp/simplif.ml index 1883f7151..1492149e0 100644 --- a/bytecomp/simplif.ml +++ b/bytecomp/simplif.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Elimination of useless Llet(Alias) bindings. Also transform let-bound references into variables. *) diff --git a/bytecomp/simplif.mli b/bytecomp/simplif.mli index 816c44b84..4cc6dab97 100644 --- a/bytecomp/simplif.mli +++ b/bytecomp/simplif.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Elimination of useless Llet(Alias) bindings. Transformation of let-bound references into variables. Simplification over staticraise/staticcatch constructs. diff --git a/bytecomp/symtable.ml b/bytecomp/symtable.ml index 0785316f6..09d7cd8d7 100644 --- a/bytecomp/symtable.ml +++ b/bytecomp/symtable.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* To assign numbers to globals and primitives *) open Misc diff --git a/bytecomp/symtable.mli b/bytecomp/symtable.mli index d9a2be353..6a13cced7 100644 --- a/bytecomp/symtable.mli +++ b/bytecomp/symtable.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Assign locations and numbers to globals and primitives *) open Cmo_format diff --git a/bytecomp/translclass.ml b/bytecomp/translclass.ml index 8ac5ba6dd..ec40912c8 100644 --- a/bytecomp/translclass.ml +++ b/bytecomp/translclass.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Asttypes open Types open Typedtree diff --git a/bytecomp/translclass.mli b/bytecomp/translclass.mli index 34dd7e671..f7858da20 100644 --- a/bytecomp/translclass.mli +++ b/bytecomp/translclass.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Typedtree open Lambda diff --git a/bytecomp/translcore.ml b/bytecomp/translcore.ml index e3880076c..528740a59 100644 --- a/bytecomp/translcore.ml +++ b/bytecomp/translcore.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Translation from typed abstract syntax to lambda terms, for the core language *) diff --git a/bytecomp/translcore.mli b/bytecomp/translcore.mli index 51a7295f4..f766cdcf2 100644 --- a/bytecomp/translcore.mli +++ b/bytecomp/translcore.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Translation from typed abstract syntax to lambda terms, for the core language *) diff --git a/bytecomp/translmod.ml b/bytecomp/translmod.ml index 1f58db6e7..bcc30b287 100644 --- a/bytecomp/translmod.ml +++ b/bytecomp/translmod.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Translation from typed abstract syntax to lambda terms, for the module language *) diff --git a/bytecomp/translmod.mli b/bytecomp/translmod.mli index 5b6d0a006..8e5005546 100644 --- a/bytecomp/translmod.mli +++ b/bytecomp/translmod.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Translation from typed abstract syntax to lambda terms, for the module language *) diff --git a/bytecomp/translobj.ml b/bytecomp/translobj.ml index f72e34b0a..97fdeb5da 100644 --- a/bytecomp/translobj.ml +++ b/bytecomp/translobj.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Misc open Primitive open Asttypes diff --git a/bytecomp/translobj.mli b/bytecomp/translobj.mli index be1e6a90f..55c163433 100644 --- a/bytecomp/translobj.mli +++ b/bytecomp/translobj.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Lambda val oo_prim: string -> lambda diff --git a/bytecomp/typeopt.ml b/bytecomp/typeopt.ml index 9d984e207..7b3961ebd 100644 --- a/bytecomp/typeopt.ml +++ b/bytecomp/typeopt.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Auxiliaries for type-based optimizations, e.g. array kinds *) open Path diff --git a/bytecomp/typeopt.mli b/bytecomp/typeopt.mli index 163ca44da..a90df8aee 100644 --- a/bytecomp/typeopt.mli +++ b/bytecomp/typeopt.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Auxiliaries for type-based optimizations, e.g. array kinds *) val has_base_type : Typedtree.expression -> Path.t -> bool diff --git a/byterun/Makefile b/byterun/Makefile index e35121252..c5fa41bd1 100644 --- a/byterun/Makefile +++ b/byterun/Makefile @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - include Makefile.common CFLAGS=-DCAML_NAME_SPACE -O $(BYTECCCOMPOPTS) $(IFLEXDIR) diff --git a/byterun/Makefile.common b/byterun/Makefile.common index 7f21fd8d7..925ae76e1 100755 --- a/byterun/Makefile.common +++ b/byterun/Makefile.common @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - include ../config/Makefile CC=$(BYTECC) diff --git a/byterun/Makefile.nt b/byterun/Makefile.nt index b93fa58a8..788572732 100644 --- a/byterun/Makefile.nt +++ b/byterun/Makefile.nt @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - include Makefile.common CFLAGS=-DOCAML_STDLIB_DIR='"$(LIBDIR)"' $(IFLEXDIR) diff --git a/byterun/alloc.c b/byterun/alloc.c index 034562e8e..a1fd2f03e 100644 --- a/byterun/alloc.c +++ b/byterun/alloc.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* 1. Allocation functions doing the same work as the macros in the case where [Setup_for_gc] and [Restore_after_gc] are no-ops. 2. Convenience functions related to allocation. diff --git a/byterun/alloc.h b/byterun/alloc.h index 75dd5ec8f..a0cd41b65 100644 --- a/byterun/alloc.h +++ b/byterun/alloc.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_ALLOC_H #define CAML_ALLOC_H diff --git a/byterun/array.c b/byterun/array.c index 637fe9c80..44136ecb6 100644 --- a/byterun/array.c +++ b/byterun/array.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Operations on arrays */ #include <string.h> diff --git a/byterun/backtrace.c b/byterun/backtrace.c index b5efdc3db..ef7ca6221 100644 --- a/byterun/backtrace.c +++ b/byterun/backtrace.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Stack backtrace for uncaught exceptions */ #include <stdio.h> diff --git a/byterun/backtrace.h b/byterun/backtrace.h index 23c72e6c9..158ca285c 100644 --- a/byterun/backtrace.h +++ b/byterun/backtrace.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_BACKTRACE_H #define CAML_BACKTRACE_H diff --git a/byterun/callback.c b/byterun/callback.c index c7fc77220..3bd7ea45c 100644 --- a/byterun/callback.c +++ b/byterun/callback.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Callbacks from C to OCaml */ #include <string.h> diff --git a/byterun/callback.h b/byterun/callback.h index dd094c4de..ded0b9801 100644 --- a/byterun/callback.h +++ b/byterun/callback.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Callbacks from C to OCaml */ #ifndef CAML_CALLBACK_H diff --git a/byterun/compact.c b/byterun/compact.c index 4f3bc0727..bf8030172 100644 --- a/byterun/compact.c +++ b/byterun/compact.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include "config.h" diff --git a/byterun/compact.h b/byterun/compact.h index 949a2766e..2abac167f 100644 --- a/byterun/compact.h +++ b/byterun/compact.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_COMPACT_H #define CAML_COMPACT_H diff --git a/byterun/compare.c b/byterun/compare.c index c0ee65a26..6593ed9a8 100644 --- a/byterun/compare.c +++ b/byterun/compare.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include <stdlib.h> #include "custom.h" diff --git a/byterun/compare.h b/byterun/compare.h index c73a49a46..41d6a0c9b 100644 --- a/byterun/compare.h +++ b/byterun/compare.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_COMPARE_H #define CAML_COMPARE_H diff --git a/byterun/compatibility.h b/byterun/compatibility.h index 429d2275d..58bf2834f 100644 --- a/byterun/compatibility.h +++ b/byterun/compatibility.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* definitions for compatibility with old identifiers */ #ifndef CAML_COMPATIBILITY_H diff --git a/byterun/config.h b/byterun/config.h index b36b73c95..7109bb0f8 100644 --- a/byterun/config.h +++ b/byterun/config.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_CONFIG_H #define CAML_CONFIG_H diff --git a/byterun/custom.c b/byterun/custom.c index 5f6e7f9a0..e4f9eaf57 100644 --- a/byterun/custom.c +++ b/byterun/custom.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include "alloc.h" diff --git a/byterun/custom.h b/byterun/custom.h index c6abad8ef..ff3cd89a3 100644 --- a/byterun/custom.h +++ b/byterun/custom.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_CUSTOM_H #define CAML_CUSTOM_H diff --git a/byterun/debugger.c b/byterun/debugger.c index a114b46cb..d64583f2d 100644 --- a/byterun/debugger.c +++ b/byterun/debugger.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Interface with the byte-code debugger */ #ifdef _WIN32 diff --git a/byterun/debugger.h b/byterun/debugger.h index a9501abff..b5079eb3b 100644 --- a/byterun/debugger.h +++ b/byterun/debugger.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Interface with the debugger */ #ifndef CAML_DEBUGGER_H diff --git a/byterun/dynlink.c b/byterun/dynlink.c index 343ebde57..96ebd7e40 100644 --- a/byterun/dynlink.c +++ b/byterun/dynlink.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Dynamic loading of C primitives. */ #include <stddef.h> diff --git a/byterun/dynlink.h b/byterun/dynlink.h index b1d14d844..74cfdb663 100644 --- a/byterun/dynlink.h +++ b/byterun/dynlink.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Dynamic loading of C primitives. */ #ifndef CAML_DYNLINK_H diff --git a/byterun/exec.h b/byterun/exec.h index 88cf6d28b..8b50484d5 100644 --- a/byterun/exec.h +++ b/byterun/exec.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* exec.h : format of executable bytecode files */ #ifndef CAML_EXEC_H diff --git a/byterun/extern.c b/byterun/extern.c index baac5167d..4fb806840 100644 --- a/byterun/extern.c +++ b/byterun/extern.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Structured output */ /* The interface of this file is "intext.h" */ diff --git a/byterun/fail.c b/byterun/fail.c index b0beaa437..d721d5c98 100644 --- a/byterun/fail.c +++ b/byterun/fail.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Raising exceptions from C. */ #include <stdio.h> diff --git a/byterun/fail.h b/byterun/fail.h index ee05eb7f8..775b0113e 100644 --- a/byterun/fail.h +++ b/byterun/fail.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_FAIL_H #define CAML_FAIL_H diff --git a/byterun/finalise.c b/byterun/finalise.c index 9a93084ae..15b7a753e 100644 --- a/byterun/finalise.c +++ b/byterun/finalise.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Handling of finalised values. */ #include "callback.h" diff --git a/byterun/finalise.h b/byterun/finalise.h index e41baa320..96853f525 100644 --- a/byterun/finalise.h +++ b/byterun/finalise.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_FINALISE_H #define CAML_FINALISE_H diff --git a/byterun/fix_code.c b/byterun/fix_code.c index 67f9e96ae..746f8b750 100644 --- a/byterun/fix_code.c +++ b/byterun/fix_code.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Handling of blocks of bytecode (endianness switch, threading). */ #include "config.h" diff --git a/byterun/fix_code.h b/byterun/fix_code.h index 05f9ae060..419ad327a 100644 --- a/byterun/fix_code.h +++ b/byterun/fix_code.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Handling of blocks of bytecode (endianness switch, threading). */ #ifndef CAML_FIX_CODE_H diff --git a/byterun/floats.c b/byterun/floats.c index f708d70f7..9071106f2 100644 --- a/byterun/floats.c +++ b/byterun/floats.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* The interface of this file is in "mlvalues.h" and "alloc.h" */ #include <math.h> diff --git a/byterun/freelist.c b/byterun/freelist.c index 13cae00a8..63e122c92 100644 --- a/byterun/freelist.c +++ b/byterun/freelist.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #define FREELIST_DEBUG 0 #if FREELIST_DEBUG #include <stdio.h> diff --git a/byterun/freelist.h b/byterun/freelist.h index 25dc289a2..146961faa 100644 --- a/byterun/freelist.h +++ b/byterun/freelist.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Free lists of heap blocks. */ #ifndef CAML_FREELIST_H diff --git a/byterun/gc.h b/byterun/gc.h index 4f67ed906..3cbf08a2d 100644 --- a/byterun/gc.h +++ b/byterun/gc.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_GC_H #define CAML_GC_H diff --git a/byterun/gc_ctrl.c b/byterun/gc_ctrl.c index 2ae3165d9..8950bb662 100644 --- a/byterun/gc_ctrl.c +++ b/byterun/gc_ctrl.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "alloc.h" #include "compact.h" #include "custom.h" diff --git a/byterun/gc_ctrl.h b/byterun/gc_ctrl.h index 4dba74fa5..5f9d87354 100644 --- a/byterun/gc_ctrl.h +++ b/byterun/gc_ctrl.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_GC_CTRL_H #define CAML_GC_CTRL_H diff --git a/byterun/globroots.c b/byterun/globroots.c index 513b7be55..ded393e89 100644 --- a/byterun/globroots.c +++ b/byterun/globroots.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Registration of global memory roots */ #include "memory.h" diff --git a/byterun/globroots.h b/byterun/globroots.h index 97a1edab1..1c3ebab28 100644 --- a/byterun/globroots.h +++ b/byterun/globroots.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Registration of global memory roots */ #ifndef CAML_GLOBROOTS_H diff --git a/byterun/hash.c b/byterun/hash.c index 26a1bf597..61bee20cf 100644 --- a/byterun/hash.c +++ b/byterun/hash.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* The generic hashing primitive */ /* The interface of this file is in "mlvalues.h" (for [caml_hash_variant]) diff --git a/byterun/hash.h b/byterun/hash.h index 037c9c5a3..436a8bb16 100644 --- a/byterun/hash.h +++ b/byterun/hash.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Auxiliary functions for custom hash functions */ #ifndef CAML_HASH_H diff --git a/byterun/instrtrace.c b/byterun/instrtrace.c index 1c329daa6..d35948f3e 100644 --- a/byterun/instrtrace.c +++ b/byterun/instrtrace.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Trace the instructions executed */ #ifdef DEBUG diff --git a/byterun/instrtrace.h b/byterun/instrtrace.h index 686b9e4ed..1e62ac486 100644 --- a/byterun/instrtrace.h +++ b/byterun/instrtrace.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Trace the instructions executed */ #ifndef _instrtrace_ diff --git a/byterun/instruct.h b/byterun/instruct.h index 92f228504..568605008 100644 --- a/byterun/instruct.h +++ b/byterun/instruct.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* The instruction set. */ #ifndef CAML_INSTRUCT_H diff --git a/byterun/int64_emul.h b/byterun/int64_emul.h index ad48584d8..e9f5d8502 100644 --- a/byterun/int64_emul.h +++ b/byterun/int64_emul.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Software emulation of 64-bit integer arithmetic, for C compilers that do not support it. */ diff --git a/byterun/int64_format.h b/byterun/int64_format.h index 398357a60..b0de52720 100644 --- a/byterun/int64_format.h +++ b/byterun/int64_format.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* printf-like formatting of 64-bit integers, in case the C library printf() function does not support them. */ diff --git a/byterun/int64_native.h b/byterun/int64_native.h index 9aa45e3c0..5e84dda61 100644 --- a/byterun/int64_native.h +++ b/byterun/int64_native.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Wrapper macros around native 64-bit integer arithmetic, so that it has the same interface as the software emulation provided in int64_emul.h */ diff --git a/byterun/intern.c b/byterun/intern.c index 0a2731b7a..5487ee665 100644 --- a/byterun/intern.c +++ b/byterun/intern.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Structured input, compact format */ /* The interface of this file is "intext.h" */ diff --git a/byterun/interp.c b/byterun/interp.c index cbec02a5c..0b5caafba 100644 --- a/byterun/interp.c +++ b/byterun/interp.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* The bytecode interpreter */ #include <stdio.h> #include "alloc.h" diff --git a/byterun/interp.h b/byterun/interp.h index 7c3d26f28..c8e2f89f8 100644 --- a/byterun/interp.h +++ b/byterun/interp.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* The bytecode interpreter */ #ifndef CAML_INTERP_H diff --git a/byterun/intext.h b/byterun/intext.h index b287e5cdb..f7aa655c9 100644 --- a/byterun/intext.h +++ b/byterun/intext.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Structured input/output */ #ifndef CAML_INTEXT_H diff --git a/byterun/ints.c b/byterun/ints.c index 34b5db238..f8491b1df 100644 --- a/byterun/ints.c +++ b/byterun/ints.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <string.h> #include "alloc.h" diff --git a/byterun/io.c b/byterun/io.c index ae9e39706..676cb5b2b 100644 --- a/byterun/io.c +++ b/byterun/io.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Buffered input/output. */ #include <errno.h> diff --git a/byterun/io.h b/byterun/io.h index 89a85380c..8420d1593 100644 --- a/byterun/io.h +++ b/byterun/io.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Buffered input/output */ #ifndef CAML_IO_H diff --git a/byterun/lexing.c b/byterun/lexing.c index cb763bce9..d9550af9f 100644 --- a/byterun/lexing.c +++ b/byterun/lexing.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* The table-driven automaton for lexers generated by camllex. */ #include "fail.h" diff --git a/byterun/main.c b/byterun/main.c index 63355840f..c0a205dc1 100644 --- a/byterun/main.c +++ b/byterun/main.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Main entry point (can be overridden by a user-provided main() function that calls caml_main() later). */ diff --git a/byterun/major_gc.c b/byterun/major_gc.c index e020bfcbe..43d870807 100644 --- a/byterun/major_gc.c +++ b/byterun/major_gc.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <limits.h> #include "compact.h" diff --git a/byterun/major_gc.h b/byterun/major_gc.h index 427312784..f473df94f 100644 --- a/byterun/major_gc.h +++ b/byterun/major_gc.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_MAJOR_GC_H #define CAML_MAJOR_GC_H diff --git a/byterun/md5.c b/byterun/md5.c index 9dc81d412..10ac76abc 100644 --- a/byterun/md5.c +++ b/byterun/md5.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include "alloc.h" #include "fail.h" diff --git a/byterun/md5.h b/byterun/md5.h index 06b9ab62b..d8aff097a 100644 --- a/byterun/md5.h +++ b/byterun/md5.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* MD5 message digest */ #ifndef CAML_MD5_H diff --git a/byterun/memory.c b/byterun/memory.c index fee9ae7db..ba63b3245 100644 --- a/byterun/memory.c +++ b/byterun/memory.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdlib.h> #include <string.h> #include "fail.h" diff --git a/byterun/memory.h b/byterun/memory.h index 69f5ff91c..94ec41b37 100644 --- a/byterun/memory.h +++ b/byterun/memory.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Allocation macros and functions */ #ifndef CAML_MEMORY_H diff --git a/byterun/meta.c b/byterun/meta.c index a547b991b..e5c6f941b 100644 --- a/byterun/meta.c +++ b/byterun/meta.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Primitives for the toplevel */ #include <string.h> diff --git a/byterun/minor_gc.c b/byterun/minor_gc.c index 8b8b8ff0e..3e0dd4e21 100644 --- a/byterun/minor_gc.c +++ b/byterun/minor_gc.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include "config.h" #include "fail.h" diff --git a/byterun/minor_gc.h b/byterun/minor_gc.h index 82c82cd3f..0258f4faa 100644 --- a/byterun/minor_gc.h +++ b/byterun/minor_gc.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_MINOR_GC_H #define CAML_MINOR_GC_H diff --git a/byterun/misc.c b/byterun/misc.c index 927cbd81b..6eeae0f1b 100644 --- a/byterun/misc.c +++ b/byterun/misc.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include "config.h" #include "misc.h" diff --git a/byterun/misc.h b/byterun/misc.h index e970d3d03..40bf3b68b 100644 --- a/byterun/misc.h +++ b/byterun/misc.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Miscellaneous macros and variables. */ #ifndef CAML_MISC_H diff --git a/byterun/mlvalues.h b/byterun/mlvalues.h index d560d1b3a..cbb1c7bfa 100644 --- a/byterun/mlvalues.h +++ b/byterun/mlvalues.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_MLVALUES_H #define CAML_MLVALUES_H diff --git a/byterun/obj.c b/byterun/obj.c index 7d09105b7..8e00282e5 100644 --- a/byterun/obj.c +++ b/byterun/obj.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Operations on objects */ #include <string.h> diff --git a/byterun/osdeps.h b/byterun/osdeps.h index 902ea2de6..8123d49b2 100644 --- a/byterun/osdeps.h +++ b/byterun/osdeps.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Operating system - specific stuff */ #ifndef CAML_OSDEPS_H diff --git a/byterun/parsing.c b/byterun/parsing.c index 3d5ea8332..3c1ced7d1 100644 --- a/byterun/parsing.c +++ b/byterun/parsing.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* The PDA automaton for parsers generated by camlyacc */ #include <stdio.h> diff --git a/byterun/prims.h b/byterun/prims.h index 3d7bb6d82..7a9967810 100644 --- a/byterun/prims.h +++ b/byterun/prims.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Interface with C primitives. */ #ifndef CAML_PRIMS_H diff --git a/byterun/printexc.c b/byterun/printexc.c index e891d9c67..7e3259abf 100644 --- a/byterun/printexc.c +++ b/byterun/printexc.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Print an uncaught exception and abort */ #include <stdio.h> diff --git a/byterun/printexc.h b/byterun/printexc.h index 4624086cb..748faa9c2 100644 --- a/byterun/printexc.h +++ b/byterun/printexc.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_PRINTEXC_H #define CAML_PRINTEXC_H diff --git a/byterun/reverse.h b/byterun/reverse.h index a48b6f255..09d34a51f 100644 --- a/byterun/reverse.h +++ b/byterun/reverse.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Swap byte-order in 16, 32, and 64-bit integers or floats */ #ifndef CAML_REVERSE_H diff --git a/byterun/roots.c b/byterun/roots.c index 8a4d23b33..43afbedc6 100644 --- a/byterun/roots.c +++ b/byterun/roots.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* To walk the memory roots for garbage collection */ #include "finalise.h" diff --git a/byterun/roots.h b/byterun/roots.h index f2d3bd694..ca6a5d262 100644 --- a/byterun/roots.h +++ b/byterun/roots.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_ROOTS_H #define CAML_ROOTS_H diff --git a/byterun/signals.c b/byterun/signals.c index 40ba0ab5e..e5fb64f7f 100644 --- a/byterun/signals.c +++ b/byterun/signals.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Signal handling, code common to the bytecode and native systems */ #include <signal.h> diff --git a/byterun/signals.h b/byterun/signals.h index fb03b30dd..584516660 100644 --- a/byterun/signals.h +++ b/byterun/signals.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_SIGNALS_H #define CAML_SIGNALS_H diff --git a/byterun/signals_byt.c b/byterun/signals_byt.c index f52ee5a45..cd0c0ebdf 100644 --- a/byterun/signals_byt.c +++ b/byterun/signals_byt.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Signal handling, code specific to the bytecode interpreter */ #include <signal.h> diff --git a/byterun/signals_machdep.h b/byterun/signals_machdep.h index 0308d3c1f..4987e2f6a 100644 --- a/byterun/signals_machdep.h +++ b/byterun/signals_machdep.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Processor-specific operation: atomic "read and clear" */ #ifndef CAML_SIGNALS_MACHDEP_H diff --git a/byterun/stacks.c b/byterun/stacks.c index 5f7a871d0..bc2bdc46b 100644 --- a/byterun/stacks.c +++ b/byterun/stacks.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* To initialize and resize the stacks */ #include <string.h> diff --git a/byterun/stacks.h b/byterun/stacks.h index f8469572d..c596f2550 100644 --- a/byterun/stacks.h +++ b/byterun/stacks.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* structure of the stacks */ #ifndef CAML_STACKS_H diff --git a/byterun/startup.c b/byterun/startup.c index cc2b560ac..b4e3811b6 100644 --- a/byterun/startup.c +++ b/byterun/startup.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Start-up code */ #include <stdio.h> diff --git a/byterun/startup.h b/byterun/startup.h index 5a42a73aa..3dda64b33 100644 --- a/byterun/startup.h +++ b/byterun/startup.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_STARTUP_H #define CAML_STARTUP_H diff --git a/byterun/str.c b/byterun/str.c index 3941cae17..8120a5b73 100644 --- a/byterun/str.c +++ b/byterun/str.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Operations on strings */ #include <string.h> diff --git a/byterun/sys.c b/byterun/sys.c index ce364d8c1..574a4ecb4 100644 --- a/byterun/sys.c +++ b/byterun/sys.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Basic system calls */ #include <errno.h> diff --git a/byterun/sys.h b/byterun/sys.h index c6f5d3204..5eb18fc0e 100644 --- a/byterun/sys.h +++ b/byterun/sys.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_SYS_H #define CAML_SYS_H diff --git a/byterun/terminfo.c b/byterun/terminfo.c index 679756967..04086a3fb 100644 --- a/byterun/terminfo.c +++ b/byterun/terminfo.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Read and output terminal commands */ #include "config.h" diff --git a/byterun/ui.h b/byterun/ui.h index 0c3309b39..295846503 100644 --- a/byterun/ui.h +++ b/byterun/ui.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Function declarations for non-Unix user interfaces */ #ifndef CAML_UI_H diff --git a/byterun/unix.c b/byterun/unix.c index 664c32b18..95fecf5ea 100644 --- a/byterun/unix.c +++ b/byterun/unix.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Unix-specific stuff */ #define _GNU_SOURCE diff --git a/byterun/weak.c b/byterun/weak.c index efdb15e9c..756996710 100644 --- a/byterun/weak.c +++ b/byterun/weak.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Operations on weak arrays */ #include <string.h> diff --git a/byterun/weak.h b/byterun/weak.h index a30001a7e..0cf4b8b2b 100644 --- a/byterun/weak.h +++ b/byterun/weak.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Operations on weak arrays */ #ifndef CAML_WEAK_H diff --git a/byterun/win32.c b/byterun/win32.c index c6ff3985e..303601f4a 100644 --- a/byterun/win32.c +++ b/byterun/win32.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Win32-specific stuff */ #include <windows.h> diff --git a/camlp4/man/camlp4.1.tpl b/camlp4/man/camlp4.1.tpl index 664ca9f75..2a7643454 100644 --- a/camlp4/man/camlp4.1.tpl +++ b/camlp4/man/camlp4.1.tpl @@ -11,8 +11,6 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ -.\" .TH CAMLP4 1 "" "INRIA" .SH NAME camlp4 - Pre-Precessor-Pretty-Printer for OCaml diff --git a/config/Makefile-templ b/config/Makefile-templ index 626d30e84..409cd01fc 100644 --- a/config/Makefile-templ +++ b/config/Makefile-templ @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - ### Compile-time configuration ########## General configuration diff --git a/config/Makefile.mingw b/config/Makefile.mingw index aaf17f929..7336b59d3 100644 --- a/config/Makefile.mingw +++ b/config/Makefile.mingw @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - # Configuration for Windows, Mingw compiler ######### General configuration diff --git a/config/Makefile.msvc b/config/Makefile.msvc index d2d9562cd..0d81752cc 100644 --- a/config/Makefile.msvc +++ b/config/Makefile.msvc @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - # Configuration for Windows, Visual C++ compiler ######### General configuration diff --git a/config/Makefile.msvc64 b/config/Makefile.msvc64 index 82e0aaded..1ba9b6f8b 100644 --- a/config/Makefile.msvc64 +++ b/config/Makefile.msvc64 @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - # Configuration for Windows, Visual C++ compiler ######### General configuration diff --git a/config/auto-aux/align.c b/config/auto-aux/align.c index a04684b48..579db9c63 100644 --- a/config/auto-aux/align.c +++ b/config/auto-aux/align.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <signal.h> #include <setjmp.h> diff --git a/config/auto-aux/async_io.c b/config/auto-aux/async_io.c index 2ce3da725..3e2bb983a 100644 --- a/config/auto-aux/async_io.c +++ b/config/auto-aux/async_io.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <fcntl.h> #include <signal.h> diff --git a/config/auto-aux/bytecopy.c b/config/auto-aux/bytecopy.c index 2006147fd..34f29c486 100644 --- a/config/auto-aux/bytecopy.c +++ b/config/auto-aux/bytecopy.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - char buffer[27]; #ifdef reverse diff --git a/config/auto-aux/dblalign.c b/config/auto-aux/dblalign.c index 91d4194c0..e86fb198e 100644 --- a/config/auto-aux/dblalign.c +++ b/config/auto-aux/dblalign.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <signal.h> #include <setjmp.h> diff --git a/config/auto-aux/divmod.c b/config/auto-aux/divmod.c index d59bf31cc..e85e4b3fc 100644 --- a/config/auto-aux/divmod.c +++ b/config/auto-aux/divmod.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Test semantics of division and modulus for negative arguments */ long div4[] = diff --git a/config/auto-aux/elf.c b/config/auto-aux/elf.c index 27be98d6b..c7548ae4a 100644 --- a/config/auto-aux/elf.c +++ b/config/auto-aux/elf.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> int main(int argc, char ** argv) diff --git a/config/auto-aux/endian.c b/config/auto-aux/endian.c index b019eb1c7..91312f716 100644 --- a/config/auto-aux/endian.c +++ b/config/auto-aux/endian.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "m.h" #ifndef ARCH_SIXTYFOUR diff --git a/config/auto-aux/expm1.c b/config/auto-aux/expm1.c index db4413b92..2cfbe7371 100644 --- a/config/auto-aux/expm1.c +++ b/config/auto-aux/expm1.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <math.h> volatile double x; diff --git a/config/auto-aux/getgroups.c b/config/auto-aux/getgroups.c index b69b0be41..e3f73f52a 100644 --- a/config/auto-aux/getgroups.c +++ b/config/auto-aux/getgroups.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <sys/types.h> #include <limits.h> diff --git a/config/auto-aux/gethostbyaddr.c b/config/auto-aux/gethostbyaddr.c index f6d36a7f3..f09d65a80 100644 --- a/config/auto-aux/gethostbyaddr.c +++ b/config/auto-aux/gethostbyaddr.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef _REENTRANT /* This helps detection on Digital Unix... */ #define _REENTRANT diff --git a/config/auto-aux/gethostbyname.c b/config/auto-aux/gethostbyname.c index 96a39438d..da52d89b4 100644 --- a/config/auto-aux/gethostbyname.c +++ b/config/auto-aux/gethostbyname.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef _REENTRANT /* This helps detection on Digital Unix... */ #define _REENTRANT diff --git a/config/auto-aux/ia32sse2.c b/config/auto-aux/ia32sse2.c index 8ba81601b..47bafb60d 100644 --- a/config/auto-aux/ia32sse2.c +++ b/config/auto-aux/ia32sse2.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Test whether IA32 assembler supports SSE2 instructions */ int main() diff --git a/config/auto-aux/initgroups.c b/config/auto-aux/initgroups.c index 7b9c23983..0086e92a4 100644 --- a/config/auto-aux/initgroups.c +++ b/config/auto-aux/initgroups.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <errno.h> #include <sys/types.h> diff --git a/config/auto-aux/int64align.c b/config/auto-aux/int64align.c index b087a3d66..9ae8a5bc7 100644 --- a/config/auto-aux/int64align.c +++ b/config/auto-aux/int64align.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <signal.h> #include <setjmp.h> diff --git a/config/auto-aux/longlong.c b/config/auto-aux/longlong.c index 424e540fd..e18f9e28f 100644 --- a/config/auto-aux/longlong.c +++ b/config/auto-aux/longlong.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <string.h> diff --git a/config/auto-aux/schar.c b/config/auto-aux/schar.c index e3e81e395..a9c355e51 100644 --- a/config/auto-aux/schar.c +++ b/config/auto-aux/schar.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - char foo[]="\377"; int main(int argc, char ** argv) diff --git a/config/auto-aux/schar2.c b/config/auto-aux/schar2.c index d041af183..9d18d2ac4 100644 --- a/config/auto-aux/schar2.c +++ b/config/auto-aux/schar2.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - signed char foo[]="\377"; int main(int argc, char ** argv) diff --git a/config/auto-aux/setgroups.c b/config/auto-aux/setgroups.c index 63ac1b8c3..4be3c1d7a 100644 --- a/config/auto-aux/setgroups.c +++ b/config/auto-aux/setgroups.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <errno.h> #include <sys/types.h> diff --git a/config/auto-aux/sighandler.c b/config/auto-aux/sighandler.c index b36557c5f..3c341feae 100644 --- a/config/auto-aux/sighandler.c +++ b/config/auto-aux/sighandler.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <signal.h> int main(void) diff --git a/config/auto-aux/signals.c b/config/auto-aux/signals.c index 78ba8de69..ed84e9803 100644 --- a/config/auto-aux/signals.c +++ b/config/auto-aux/signals.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* To determine the semantics of signal handlers (System V: signal is reset to default behavior on entrance to the handler BSD: signal handler remains active). */ diff --git a/config/auto-aux/sizes.c b/config/auto-aux/sizes.c index 58fd6b23f..2700729d4 100644 --- a/config/auto-aux/sizes.c +++ b/config/auto-aux/sizes.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> int main(int argc, char **argv) diff --git a/config/auto-aux/stackov.c b/config/auto-aux/stackov.c index 47f252aa6..3e3181bd8 100644 --- a/config/auto-aux/stackov.c +++ b/config/auto-aux/stackov.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <signal.h> #include <sys/resource.h> diff --git a/config/auto-aux/tclversion.c b/config/auto-aux/tclversion.c index 84a94033c..4608ee9f9 100644 --- a/config/auto-aux/tclversion.c +++ b/config/auto-aux/tclversion.c @@ -14,8 +14,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <tcl.h> #include <tk.h> diff --git a/config/m-nt.h b/config/m-nt.h index 80e0b5ee6..a80b0ac5e 100644 --- a/config/m-nt.h +++ b/config/m-nt.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Machine configuration, Intel x86 processors, Win32, Visual C++ or Mingw compiler */ diff --git a/config/m-templ.h b/config/m-templ.h index 6e09f64e4..a5497b56b 100644 --- a/config/m-templ.h +++ b/config/m-templ.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Processor dependencies */ #define ARCH_SIXTYFOUR diff --git a/config/s-nt.h b/config/s-nt.h index a38d242a0..6df440b8a 100644 --- a/config/s-nt.h +++ b/config/s-nt.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Operating system dependencies, Intel x86 processors, Windows NT */ #define OCAML_OS_TYPE "Win32" diff --git a/config/s-templ.h b/config/s-templ.h index 971bc48f1..d0748ae29 100644 --- a/config/s-templ.h +++ b/config/s-templ.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Operating system and standard library dependencies. */ /* 0. Operating system type string. */ @@ -13,8 +13,6 @@ # # ######################################################################### -# $Id$ - configure_options="$*" prefix=/usr/local bindir='' diff --git a/debugger/Makefile b/debugger/Makefile index 2e6534c73..cf0fffb90 100644 --- a/debugger/Makefile +++ b/debugger/Makefile @@ -10,7 +10,5 @@ # # ######################################################################### -# $Id$ - UNIXDIR=../otherlibs/unix include Makefile.shared diff --git a/debugger/Makefile.nt b/debugger/Makefile.nt index 40034ef48..4182c7c77 100644 --- a/debugger/Makefile.nt +++ b/debugger/Makefile.nt @@ -10,7 +10,5 @@ # # ######################################################################### -# $Id$ - UNIXDIR=../otherlibs/win32unix include Makefile.shared diff --git a/debugger/Makefile.shared b/debugger/Makefile.shared index 849d2a1f5..ac982ca68 100644 --- a/debugger/Makefile.shared +++ b/debugger/Makefile.shared @@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - include ../config/Makefile CAMLC=../ocamlcomp.sh diff --git a/debugger/breakpoints.ml b/debugger/breakpoints.ml index 5e84cc6ca..d7242c9fe 100644 --- a/debugger/breakpoints.ml +++ b/debugger/breakpoints.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (******************************* Breakpoints ***************************) open Checkpoints diff --git a/debugger/breakpoints.mli b/debugger/breakpoints.mli index 855ef5e17..ef5188529 100644 --- a/debugger/breakpoints.mli +++ b/debugger/breakpoints.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (******************************* Breakpoints ***************************) open Primitives diff --git a/debugger/checkpoints.ml b/debugger/checkpoints.ml index e2371f170..f0df23890 100644 --- a/debugger/checkpoints.ml +++ b/debugger/checkpoints.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (*************************** Checkpoints *******************************) open Int64ops diff --git a/debugger/checkpoints.mli b/debugger/checkpoints.mli index b37d1ae55..95eaf1b08 100644 --- a/debugger/checkpoints.mli +++ b/debugger/checkpoints.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (***************************** Checkpoints *****************************) open Primitives diff --git a/debugger/command_line.ml b/debugger/command_line.ml index 7d15123df..5b4710dc5 100644 --- a/debugger/command_line.ml +++ b/debugger/command_line.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (************************ Reading and executing commands ***************) open Int64ops diff --git a/debugger/command_line.mli b/debugger/command_line.mli index 422cf6a24..f7fb16057 100644 --- a/debugger/command_line.mli +++ b/debugger/command_line.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (************************ Reading and executing commands ***************) open Lexing;; diff --git a/debugger/debugcom.ml b/debugger/debugcom.ml index 1da00cbab..72702da16 100644 --- a/debugger/debugcom.ml +++ b/debugger/debugcom.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Low-level communication with the debuggee *) open Int64ops diff --git a/debugger/debugcom.mli b/debugger/debugcom.mli index 7d107ac5b..3dce2abb4 100644 --- a/debugger/debugcom.mli +++ b/debugger/debugcom.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Low-level communication with the debuggee *) type execution_summary = diff --git a/debugger/debugger_config.ml b/debugger/debugger_config.ml index 292875936..a16fdca23 100644 --- a/debugger/debugger_config.ml +++ b/debugger/debugger_config.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (**************************** Configuration file ***********************) open Int64ops diff --git a/debugger/debugger_config.mli b/debugger/debugger_config.mli index d3f1a2a7d..f725acecf 100644 --- a/debugger/debugger_config.mli +++ b/debugger/debugger_config.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (********************** Configuration file *****************************) exception Toplevel diff --git a/debugger/eval.ml b/debugger/eval.ml index 1e84d9208..43a08f30a 100644 --- a/debugger/eval.ml +++ b/debugger/eval.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Misc open Path open Instruct diff --git a/debugger/eval.mli b/debugger/eval.mli index 96661b2a3..c5e04f331 100644 --- a/debugger/eval.mli +++ b/debugger/eval.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Types open Parser_aux open Format diff --git a/debugger/events.ml b/debugger/events.ml index 78733bfc4..c622f6722 100644 --- a/debugger/events.ml +++ b/debugger/events.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (********************************* Events ******************************) open Instruct diff --git a/debugger/events.mli b/debugger/events.mli index f795058cc..e593be03c 100644 --- a/debugger/events.mli +++ b/debugger/events.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Instruct val get_pos : debug_event -> Lexing.position;; diff --git a/debugger/exec.ml b/debugger/exec.ml index 22d281bcc..d9369ace8 100644 --- a/debugger/exec.ml +++ b/debugger/exec.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Handling of keyboard interrupts *) let interrupted = ref false diff --git a/debugger/exec.mli b/debugger/exec.mli index c9d665ae0..a820589b5 100644 --- a/debugger/exec.mli +++ b/debugger/exec.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Handling of keyboard interrupts *) val protect : (unit -> unit) -> unit diff --git a/debugger/frames.ml b/debugger/frames.ml index 2a87ffdd8..d3456284d 100644 --- a/debugger/frames.ml +++ b/debugger/frames.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (***************************** Frames **********************************) open Instruct diff --git a/debugger/frames.mli b/debugger/frames.mli index 5023236cb..fa652b0ce 100644 --- a/debugger/frames.mli +++ b/debugger/frames.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (****************************** Frames *********************************) open Instruct diff --git a/debugger/history.ml b/debugger/history.ml index 473ba80bb..4d08f587c 100644 --- a/debugger/history.ml +++ b/debugger/history.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Int64ops open Checkpoints open Primitives diff --git a/debugger/history.mli b/debugger/history.mli index 542b9ca04..121c732fb 100644 --- a/debugger/history.mli +++ b/debugger/history.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - val empty_history : unit -> unit val add_current_time : unit -> unit diff --git a/debugger/input_handling.ml b/debugger/input_handling.ml index 8bbc0d80f..f3bd57b63 100644 --- a/debugger/input_handling.ml +++ b/debugger/input_handling.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (**************************** Input control ****************************) open Unix diff --git a/debugger/input_handling.mli b/debugger/input_handling.mli index 7ae190ee1..749687ce3 100644 --- a/debugger/input_handling.mli +++ b/debugger/input_handling.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (***************************** Input control ***************************) open Primitives diff --git a/debugger/int64ops.ml b/debugger/int64ops.ml index a3dbdbe2c..527bdcef0 100644 --- a/debugger/int64ops.ml +++ b/debugger/int64ops.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (****************** arithmetic operators for Int64 *********************) let ( ++ ) = Int64.add;; diff --git a/debugger/int64ops.mli b/debugger/int64ops.mli index f898f1431..5491c8f70 100644 --- a/debugger/int64ops.mli +++ b/debugger/int64ops.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (****************** arithmetic operators for Int64 *********************) val ( ++ ) : int64 -> int64 -> int64;; diff --git a/debugger/lexer.mli b/debugger/lexer.mli index 23f88e571..7508bedd8 100644 --- a/debugger/lexer.mli +++ b/debugger/lexer.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - val line: Lexing.lexbuf -> string val lexeme: Lexing.lexbuf -> Parser.token val argument: Lexing.lexbuf -> Parser.token diff --git a/debugger/lexer.mll b/debugger/lexer.mll index 7dd51e704..721645c85 100644 --- a/debugger/lexer.mll +++ b/debugger/lexer.mll @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - { open Parser diff --git a/debugger/loadprinter.ml b/debugger/loadprinter.ml index 1c0427a9c..98e79d796 100644 --- a/debugger/loadprinter.ml +++ b/debugger/loadprinter.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Loading and installation of user-defined printer functions *) open Misc diff --git a/debugger/loadprinter.mli b/debugger/loadprinter.mli index 77edfc53d..4851a4d52 100644 --- a/debugger/loadprinter.mli +++ b/debugger/loadprinter.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Loading and installation of user-defined printer functions *) open Format diff --git a/debugger/main.ml b/debugger/main.ml index 1dcd5cf40..febaffa20 100644 --- a/debugger/main.ml +++ b/debugger/main.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Input_handling open Question open Command_line diff --git a/debugger/parameters.ml b/debugger/parameters.ml index fb816e4d5..2e1d4a753 100644 --- a/debugger/parameters.ml +++ b/debugger/parameters.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Miscellaneous parameters *) open Primitives diff --git a/debugger/parameters.mli b/debugger/parameters.mli index eb055f7c5..244d24b35 100644 --- a/debugger/parameters.mli +++ b/debugger/parameters.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Miscellaneous parameters *) val program_name : string ref diff --git a/debugger/parser.mly b/debugger/parser.mly index 5bba611b9..1d394e345 100644 --- a/debugger/parser.mly +++ b/debugger/parser.mly @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - %{ open Int64ops diff --git a/debugger/parser_aux.mli b/debugger/parser_aux.mli index 275281cc4..542affbd0 100644 --- a/debugger/parser_aux.mli +++ b/debugger/parser_aux.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (*open Globals*) open Primitives diff --git a/debugger/pattern_matching.ml b/debugger/pattern_matching.ml index b92118265..6d4a89ee3 100644 --- a/debugger/pattern_matching.ml +++ b/debugger/pattern_matching.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (************************ Simple pattern matching **********************) open Debugger_config diff --git a/debugger/pattern_matching.mli b/debugger/pattern_matching.mli index a7a525622..b0c000a7c 100644 --- a/debugger/pattern_matching.mli +++ b/debugger/pattern_matching.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (************************ Simple pattern matching **********************) open Parser_aux diff --git a/debugger/pos.ml b/debugger/pos.ml index 995168648..c9e93280d 100644 --- a/debugger/pos.ml +++ b/debugger/pos.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Instruct;; open Lexing;; open Location;; diff --git a/debugger/pos.mli b/debugger/pos.mli index a4c8e9e8d..4eacab788 100644 --- a/debugger/pos.mli +++ b/debugger/pos.mli @@ -10,6 +10,4 @@ (* *) (***********************************************************************) -(* $Id$ *) - val get_desc : Instruct.debug_event -> string;; diff --git a/debugger/primitives.ml b/debugger/primitives.ml index bfd2fdd8d..8cbc5387c 100644 --- a/debugger/primitives.ml +++ b/debugger/primitives.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (*********************** Basic functions and types *********************) (*** Miscellaneous ***) diff --git a/debugger/primitives.mli b/debugger/primitives.mli index 4d914da98..0e36b414d 100644 --- a/debugger/primitives.mli +++ b/debugger/primitives.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (********************* Basic functions and types ***********************) (*** Miscellaneous ***) diff --git a/debugger/printval.ml b/debugger/printval.ml index 6b3e9c79d..994f07fe2 100644 --- a/debugger/printval.ml +++ b/debugger/printval.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* To print values *) open Format diff --git a/debugger/printval.mli b/debugger/printval.mli index f1c4569bb..ba6c25ad4 100644 --- a/debugger/printval.mli +++ b/debugger/printval.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Format val max_printer_depth : int ref diff --git a/debugger/program_loading.ml b/debugger/program_loading.ml index bef9f80d1..99bfe6b47 100644 --- a/debugger/program_loading.ml +++ b/debugger/program_loading.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Program loading *) open Unix diff --git a/debugger/program_loading.mli b/debugger/program_loading.mli index 2814eb39c..23ea47a60 100644 --- a/debugger/program_loading.mli +++ b/debugger/program_loading.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (*** Debugging. ***) val debug_loading : bool ref diff --git a/debugger/program_management.ml b/debugger/program_management.ml index 27f1d9cc5..c7438b398 100644 --- a/debugger/program_management.ml +++ b/debugger/program_management.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Manage the loading of the program *) open Int64ops diff --git a/debugger/program_management.mli b/debugger/program_management.mli index 96f5a4382..0b8a09b86 100644 --- a/debugger/program_management.mli +++ b/debugger/program_management.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (*** Program loading and initializations. ***) val loaded : bool ref diff --git a/debugger/show_information.ml b/debugger/show_information.ml index 86e9637a4..e2e1457fd 100644 --- a/debugger/show_information.ml +++ b/debugger/show_information.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Instruct open Format open Debugcom diff --git a/debugger/show_information.mli b/debugger/show_information.mli index 7774721a9..45329be41 100644 --- a/debugger/show_information.mli +++ b/debugger/show_information.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Format;; (* Display information about the current event. *) diff --git a/debugger/show_source.ml b/debugger/show_source.ml index 4a998f520..4460f7cfc 100644 --- a/debugger/show_source.ml +++ b/debugger/show_source.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Debugger_config open Instruct open Parameters diff --git a/debugger/show_source.mli b/debugger/show_source.mli index 3b136ab74..818e47f6b 100644 --- a/debugger/show_source.mli +++ b/debugger/show_source.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Print the line containing the point *) val show_point : Instruct.debug_event -> bool -> unit;; diff --git a/debugger/source.ml b/debugger/source.ml index 65634cbe5..f1df80bfe 100644 --- a/debugger/source.ml +++ b/debugger/source.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (************************ Source management ****************************) open Misc diff --git a/debugger/source.mli b/debugger/source.mli index 50fa3f02a..640ebc858 100644 --- a/debugger/source.mli +++ b/debugger/source.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (************************ Source management ****************************) (*** Conversion function. ***) diff --git a/debugger/symbols.ml b/debugger/symbols.ml index 9fba3e09c..51f3627a2 100644 --- a/debugger/symbols.ml +++ b/debugger/symbols.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Handling of symbol tables (globals and events) *) open Instruct diff --git a/debugger/symbols.mli b/debugger/symbols.mli index 8823abd29..980892e04 100644 --- a/debugger/symbols.mli +++ b/debugger/symbols.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Modules used by the program. *) val modules : string list ref diff --git a/debugger/time_travel.ml b/debugger/time_travel.ml index e10e03969..ceb14b510 100644 --- a/debugger/time_travel.ml +++ b/debugger/time_travel.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (**************************** Time travel ******************************) open Int64ops diff --git a/debugger/time_travel.mli b/debugger/time_travel.mli index dad47fedc..2d3523203 100644 --- a/debugger/time_travel.mli +++ b/debugger/time_travel.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (**************************** Time travel ******************************) open Primitives diff --git a/debugger/trap_barrier.ml b/debugger/trap_barrier.ml index 6aa22b267..ce5fe7625 100644 --- a/debugger/trap_barrier.ml +++ b/debugger/trap_barrier.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (************************** Trap barrier *******************************) open Debugcom diff --git a/debugger/trap_barrier.mli b/debugger/trap_barrier.mli index b12391af6..239c12a65 100644 --- a/debugger/trap_barrier.mli +++ b/debugger/trap_barrier.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (************************* Trap barrier ********************************) val install_trap_barrier : int -> unit diff --git a/debugger/unix_tools.ml b/debugger/unix_tools.ml index 2897420bc..5a2f22543 100644 --- a/debugger/unix_tools.ml +++ b/debugger/unix_tools.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (****************** Tools for Unix *************************************) open Misc diff --git a/debugger/unix_tools.mli b/debugger/unix_tools.mli index bbea8447e..b1ac62dbc 100644 --- a/debugger/unix_tools.mli +++ b/debugger/unix_tools.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (**************************** Tools for Unix ***************************) open Unix diff --git a/driver/compile.ml b/driver/compile.ml index e8104bdea..c3873d32f 100644 --- a/driver/compile.ml +++ b/driver/compile.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The batch compiler *) open Misc diff --git a/driver/compile.mli b/driver/compile.mli index 779239a8c..2a369e0b0 100644 --- a/driver/compile.mli +++ b/driver/compile.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compile a .ml or .mli file *) open Format diff --git a/driver/errors.ml b/driver/errors.ml index 47ae99542..a5e42fd13 100644 --- a/driver/errors.ml +++ b/driver/errors.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* WARNING: if you change something in this file, you must look at opterrors.ml and ocamldoc/odoc_analyse.ml to see if you need to make the same changes there. diff --git a/driver/errors.mli b/driver/errors.mli index 9f7020d08..c9f1ee95b 100644 --- a/driver/errors.mli +++ b/driver/errors.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Error report *) open Format diff --git a/driver/main.ml b/driver/main.ml index 1c19d6cd5..8b895af63 100644 --- a/driver/main.ml +++ b/driver/main.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Config open Clflags diff --git a/driver/main.mli b/driver/main.mli index b949bb0fe..b2176ff92 100644 --- a/driver/main.mli +++ b/driver/main.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* this "empty" file is here to speed up garbage collection in ocamlc.opt *) diff --git a/driver/main_args.ml b/driver/main_args.ml index 54c23f6de..c5fd7c8f3 100644 --- a/driver/main_args.ml +++ b/driver/main_args.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - let mk_a f = "-a", Arg.Unit f, " Build a library" ;; diff --git a/driver/main_args.mli b/driver/main_args.mli index 371cb48c6..bbdc8ec41 100644 --- a/driver/main_args.mli +++ b/driver/main_args.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - module type Bytecomp_options = sig val _a : unit -> unit diff --git a/driver/optcompile.ml b/driver/optcompile.ml index cb3805234..9bd1d9b05 100644 --- a/driver/optcompile.ml +++ b/driver/optcompile.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The batch compiler *) open Misc diff --git a/driver/optcompile.mli b/driver/optcompile.mli index 779239a8c..2a369e0b0 100644 --- a/driver/optcompile.mli +++ b/driver/optcompile.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compile a .ml or .mli file *) open Format diff --git a/driver/opterrors.ml b/driver/opterrors.ml index a30c2de26..c0dbd1488 100644 --- a/driver/opterrors.ml +++ b/driver/opterrors.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* WARNING: if you change something in this file, you must look at errors.ml to see if you need to make the same changes there. *) diff --git a/driver/opterrors.mli b/driver/opterrors.mli index 94966741b..6267091bd 100644 --- a/driver/opterrors.mli +++ b/driver/opterrors.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Error report *) val report_error: Format.formatter -> exn -> unit diff --git a/driver/optmain.ml b/driver/optmain.ml index ede89c865..9afdbb428 100644 --- a/driver/optmain.ml +++ b/driver/optmain.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Config open Clflags diff --git a/driver/optmain.mli b/driver/optmain.mli index 701508af2..d43cb760f 100644 --- a/driver/optmain.mli +++ b/driver/optmain.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* this "empty" file is here to speed up garbage collection in ocamlopt.opt *) diff --git a/driver/pparse.ml b/driver/pparse.ml index d125f5e41..0e40edc49 100644 --- a/driver/pparse.ml +++ b/driver/pparse.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Format exception Error diff --git a/driver/pparse.mli b/driver/pparse.mli index 96c2594f1..1899e35ac 100644 --- a/driver/pparse.mli +++ b/driver/pparse.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Format exception Error diff --git a/emacs/Makefile b/emacs/Makefile index 5fad5e337..22b2a19ba 100644 --- a/emacs/Makefile +++ b/emacs/Makefile @@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - include ../config/Makefile # Files to install diff --git a/emacs/caml-compat.el b/emacs/caml-compat.el index da54cd0dc..a5cff879e 100644 --- a/emacs/caml-compat.el +++ b/emacs/caml-compat.el @@ -10,8 +10,6 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) - ;; function definitions for old versions of emacs ;; indent-line-to diff --git a/emacs/caml-emacs.el b/emacs/caml-emacs.el index 06cabf302..13dc297a3 100644 --- a/emacs/caml-emacs.el +++ b/emacs/caml-emacs.el @@ -10,8 +10,6 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) - ;; for caml-help.el (defalias 'caml-info-other-window 'info-other-window) diff --git a/emacs/caml-font-old.el b/emacs/caml-font-old.el index 12c318c90..7456e8c58 100644 --- a/emacs/caml-font-old.el +++ b/emacs/caml-font-old.el @@ -10,8 +10,6 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) - ;; useful colors (cond diff --git a/emacs/caml-help.el b/emacs/caml-help.el index 101963294..99af471a9 100644 --- a/emacs/caml-help.el +++ b/emacs/caml-help.el @@ -10,8 +10,6 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) - ;; caml-info.el --- contextual completion and help to caml-mode ;; Didier Remy, November 2001. diff --git a/emacs/caml-hilit.el b/emacs/caml-hilit.el index 25376eb2a..13735594f 100644 --- a/emacs/caml-hilit.el +++ b/emacs/caml-hilit.el @@ -10,8 +10,6 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) - ; Highlighting patterns for hilit19 under caml-mode ; defined also in caml.el diff --git a/emacs/caml-types.el b/emacs/caml-types.el index ac3fb1bf8..9fd613e1c 100644 --- a/emacs/caml-types.el +++ b/emacs/caml-types.el @@ -10,8 +10,6 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) - ; An emacs-lisp complement to the "-annot" option of ocamlc and ocamlopt. ;; XEmacs compatibility diff --git a/emacs/caml-xemacs.el b/emacs/caml-xemacs.el index 79321e005..f74c883c8 100644 --- a/emacs/caml-xemacs.el +++ b/emacs/caml-xemacs.el @@ -10,8 +10,6 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) - (require 'overlay) ;; for caml-help.el diff --git a/emacs/caml.el b/emacs/caml.el index 5eda10b8a..a246c55ea 100644 --- a/emacs/caml.el +++ b/emacs/caml.el @@ -10,8 +10,6 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) - ;;; caml.el --- OCaml code editing commands for Emacs ;; Xavier Leroy, july 1993. diff --git a/emacs/camldebug.el b/emacs/camldebug.el index 790eb6eb4..74f096cfb 100644 --- a/emacs/camldebug.el +++ b/emacs/camldebug.el @@ -10,8 +10,6 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) - ;;; Run camldebug under Emacs ;;; Derived from gdb.el. ;;; gdb.el is Copyright (C) 1988 Free Software Foundation, Inc, and is part diff --git a/emacs/inf-caml.el b/emacs/inf-caml.el index 5b864efcb..7f16611aa 100644 --- a/emacs/inf-caml.el +++ b/emacs/inf-caml.el @@ -10,8 +10,6 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) - ;;; inf-caml.el --- run the OCaml toplevel in an Emacs buffer ;; Xavier Leroy, july 1993. diff --git a/emacs/ocamltags.in b/emacs/ocamltags.in index 2a6aadbfb..7b1f41cf0 100644 --- a/emacs/ocamltags.in +++ b/emacs/ocamltags.in @@ -12,8 +12,6 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) - ;; Copyright (C) 1998 Ian Zimmerman <itz@transbay.net> ;; This program is free software; you can redistribute it and/or ;; modify it under the terms of the GNU General Public License as @@ -24,7 +22,6 @@ ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU ;; General Public License for more details. -;; $Id$ (require 'caml) diff --git a/lex/Makefile b/lex/Makefile index 6577bed89..00e5c9f94 100644 --- a/lex/Makefile +++ b/lex/Makefile @@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - # The lexer generator CAMLC=../boot/ocamlrun ../boot/ocamlc -strict-sequence -nostdlib -I ../boot CAMLOPT=../boot/ocamlrun ../ocamlopt -nostdlib -I ../stdlib diff --git a/lex/Makefile.nt b/lex/Makefile.nt index 8443c5759..197637ed1 100644 --- a/lex/Makefile.nt +++ b/lex/Makefile.nt @@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - # The lexer generator include ../config/Makefile diff --git a/lex/compact.ml b/lex/compact.ml index 72cfd9e7c..1f620ab8d 100644 --- a/lex/compact.ml +++ b/lex/compact.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compaction of an automata *) open Lexgen diff --git a/lex/compact.mli b/lex/compact.mli index 6e48df006..90f2ed99c 100644 --- a/lex/compact.mli +++ b/lex/compact.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compaction of an automata *) type lex_tables = { tbl_base: int array; (* Perform / Shift *) diff --git a/lex/cset.ml b/lex/cset.ml index ce77044b6..8c3d176fa 100644 --- a/lex/cset.ml +++ b/lex/cset.ml @@ -11,9 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - - exception Bad type t = (int * int) list diff --git a/lex/cset.mli b/lex/cset.mli index b30c3b671..daad6e59f 100644 --- a/lex/cset.mli +++ b/lex/cset.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Set of characters encoded as list of intervals *) type t diff --git a/lex/lexer.mli b/lex/lexer.mli index 5097d3094..ca8e4c490 100644 --- a/lex/lexer.mli +++ b/lex/lexer.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - val main: Lexing.lexbuf -> Parser.token exception Lexical_error of string * string * int * int diff --git a/lex/lexer.mll b/lex/lexer.mll index b3f61bae0..699c85992 100644 --- a/lex/lexer.mll +++ b/lex/lexer.mll @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The lexical analyzer for lexer definitions. Bootstrapped! *) { diff --git a/lex/lexgen.ml b/lex/lexgen.ml index 37720be61..751db9dc8 100644 --- a/lex/lexgen.ml +++ b/lex/lexgen.ml @@ -12,8 +12,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compiling a lexer definition *) open Syntax diff --git a/lex/lexgen.mli b/lex/lexgen.mli index 155b9e45a..3fc8c905a 100644 --- a/lex/lexgen.mli +++ b/lex/lexgen.mli @@ -10,9 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - - (* raised when there are too many bindings (>= 254 memory cells) *) exception Memory_overflow diff --git a/lex/main.ml b/lex/main.ml index 73cfbd47b..4cc6ef645 100644 --- a/lex/main.ml +++ b/lex/main.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The lexer generator. Command-line parsing. *) open Syntax diff --git a/lex/output.ml b/lex/output.ml index d05e04beb..7ecdd0f72 100644 --- a/lex/output.ml +++ b/lex/output.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Output the DFA tables and its entry points *) open Printf diff --git a/lex/output.mli b/lex/output.mli index 5eae10314..96d8a4d6c 100644 --- a/lex/output.mli +++ b/lex/output.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Output the DFA tables and its entry points *) val output_lexdef: diff --git a/lex/outputbis.ml b/lex/outputbis.ml index db2326d31..6166dd516 100644 --- a/lex/outputbis.ml +++ b/lex/outputbis.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Output the DFA tables and its entry points *) open Printf diff --git a/lex/outputbis.mli b/lex/outputbis.mli index df6bf9600..6c0451225 100644 --- a/lex/outputbis.mli +++ b/lex/outputbis.mli @@ -10,7 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) val output_lexdef : string -> in_channel -> diff --git a/lex/parser.mly b/lex/parser.mly index c36d8e020..6c6185e93 100644 --- a/lex/parser.mly +++ b/lex/parser.mly @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* The grammar for lexer definitions */ %{ diff --git a/lex/syntax.ml b/lex/syntax.ml index 746a99a24..afa6ac3b0 100644 --- a/lex/syntax.ml +++ b/lex/syntax.ml @@ -10,9 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) - -(* This apparently useless implmentation file is in fact required +(* This apparently useless implementation file is in fact required by the pa_ocamllex syntax extension *) (* The shallow abstract syntax *) diff --git a/lex/syntax.mli b/lex/syntax.mli index d61fdb228..d186f12c3 100644 --- a/lex/syntax.mli +++ b/lex/syntax.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The shallow abstract syntax *) type location = diff --git a/man/Makefile b/man/Makefile index 4c0cb8191..916ea24a8 100644 --- a/man/Makefile +++ b/man/Makefile @@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - include ../config/Makefile DIR=$(MANDIR)/man$(MANEXT) diff --git a/man/ocaml.m b/man/ocaml.m index c230038c2..c3dff4475 100644 --- a/man/ocaml.m +++ b/man/ocaml.m @@ -10,8 +10,6 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ -.\" .TH OCAML 1 .SH NAME diff --git a/man/ocamlc.m b/man/ocamlc.m index e70487338..c102db1bc 100644 --- a/man/ocamlc.m +++ b/man/ocamlc.m @@ -10,8 +10,6 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ -.\" .TH OCAMLC 1 .SH NAME diff --git a/man/ocamlcp.m b/man/ocamlcp.m index 25dcf2836..7967f25d2 100644 --- a/man/ocamlcp.m +++ b/man/ocamlcp.m @@ -10,8 +10,6 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ -.\" .TH "OCAMLCP" 1 .SH NAME diff --git a/man/ocamldebug.m b/man/ocamldebug.m index 0eceeba3b..a470150a6 100644 --- a/man/ocamldebug.m +++ b/man/ocamldebug.m @@ -10,8 +10,6 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ -.\" .TH OCAMLDEBUG 1 .SH NAME diff --git a/man/ocamldep.m b/man/ocamldep.m index 995177976..ba7ddb8c3 100644 --- a/man/ocamldep.m +++ b/man/ocamldep.m @@ -10,8 +10,6 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ -.\" .TH OCAMLDEP 1 .SH NAME diff --git a/man/ocamldoc.m b/man/ocamldoc.m index ae2ac7023..73ca3a650 100644 --- a/man/ocamldoc.m +++ b/man/ocamldoc.m @@ -10,8 +10,6 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ -.\" .TH OCAMLDOC 1 \" .de Sh \" Subsection heading diff --git a/man/ocamllex.m b/man/ocamllex.m index 314af516c..d59755bab 100644 --- a/man/ocamllex.m +++ b/man/ocamllex.m @@ -10,8 +10,6 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ -.\" .TH OCAMLLEX 1 .SH NAME diff --git a/man/ocamlmktop.m b/man/ocamlmktop.m index f9c014c54..236b4c65e 100644 --- a/man/ocamlmktop.m +++ b/man/ocamlmktop.m @@ -10,8 +10,6 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ -.\" .TH OCAMLMKTOP 1 .SH NAME diff --git a/man/ocamlopt.m b/man/ocamlopt.m index 37f1511f6..7e586429b 100644 --- a/man/ocamlopt.m +++ b/man/ocamlopt.m @@ -10,8 +10,6 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ -.\" .TH OCAMLOPT 1 .SH NAME diff --git a/man/ocamlprof.m b/man/ocamlprof.m index 3f20398f0..a3bac2c60 100644 --- a/man/ocamlprof.m +++ b/man/ocamlprof.m @@ -10,8 +10,6 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ -.\" .TH OCAMLPROF 1 .SH NAME diff --git a/man/ocamlrun.m b/man/ocamlrun.m index 7aef64eeb..41a41b361 100644 --- a/man/ocamlrun.m +++ b/man/ocamlrun.m @@ -10,8 +10,6 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ -.\" .TH OCAMLRUN 1 .SH NAME diff --git a/man/ocamlyacc.m b/man/ocamlyacc.m index ce53cc4af..133994e20 100644 --- a/man/ocamlyacc.m +++ b/man/ocamlyacc.m @@ -10,8 +10,6 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ -.\" .TH OCAMLYACC 1 .SH NAME diff --git a/myocamlbuild.ml b/myocamlbuild.ml index ba5fdc1d1..f7ada7ef7 100644 --- a/myocamlbuild.ml +++ b/myocamlbuild.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Ocamlbuild_plugin open Command open Arch diff --git a/ocamlbuild/Makefile b/ocamlbuild/Makefile index e4ee877eb..fe011bd68 100644 --- a/ocamlbuild/Makefile +++ b/ocamlbuild/Makefile @@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - .PHONY: all byte native profile debug ppcache doc ifndef INSTALL_PREFIX diff --git a/ocamldoc/Makefile b/ocamldoc/Makefile index 4e9aaf322..144b95d15 100644 --- a/ocamldoc/Makefile +++ b/ocamldoc/Makefile @@ -10,8 +10,6 @@ #(* *) #(***********************************************************************) -# $Id$ - include ../config/Makefile # Various commands and dir diff --git a/ocamldoc/Makefile.nt b/ocamldoc/Makefile.nt index 238ed93d5..6b9818a96 100644 --- a/ocamldoc/Makefile.nt +++ b/ocamldoc/Makefile.nt @@ -10,8 +10,6 @@ #(* *) #(***********************************************************************) -# $Id$ - include ../config/Makefile # Various commands and dir diff --git a/ocamldoc/generators/odoc_literate.ml b/ocamldoc/generators/odoc_literate.ml index c0234c1f0..fe993f8c7 100644 --- a/ocamldoc/generators/odoc_literate.ml +++ b/ocamldoc/generators/odoc_literate.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Odoc_info module Naming = Odoc_html.Naming open Odoc_info.Value diff --git a/ocamldoc/generators/odoc_todo.ml b/ocamldoc/generators/odoc_todo.ml index 0b4abc5aa..31545feef 100644 --- a/ocamldoc/generators/odoc_todo.ml +++ b/ocamldoc/generators/odoc_todo.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** An OCamldoc generator to retrieve information in "todo" tags and generate an html page with all todo items. *) diff --git a/ocamldoc/odoc.ml b/ocamldoc/odoc.ml index eeae4985c..029443aa7 100644 --- a/ocamldoc/odoc.ml +++ b/ocamldoc/odoc.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Main module for bytecode. @todo coucou le todo*) diff --git a/ocamldoc/odoc_analyse.ml b/ocamldoc/odoc_analyse.ml index 9eec860a0..6c79392ea 100644 --- a/ocamldoc/odoc_analyse.ml +++ b/ocamldoc/odoc_analyse.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Analysis of source files. This module is strongly inspired from driver/main.ml :-) *) diff --git a/ocamldoc/odoc_analyse.mli b/ocamldoc/odoc_analyse.mli index 5e45e50a2..c155e81af 100644 --- a/ocamldoc/odoc_analyse.mli +++ b/ocamldoc/odoc_analyse.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Analysis of source files. *) (** This function builds the top modules from the analysis of the diff --git a/ocamldoc/odoc_args.ml b/ocamldoc/odoc_args.ml index f3f4212e5..be5ce12fc 100644 --- a/ocamldoc/odoc_args.ml +++ b/ocamldoc/odoc_args.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* cvsid $Id$ *) - (** Command-line arguments. *) module M = Odoc_messages diff --git a/ocamldoc/odoc_args.mli b/ocamldoc/odoc_args.mli index 9de67510a..c348dfa09 100644 --- a/ocamldoc/odoc_args.mli +++ b/ocamldoc/odoc_args.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Analysis of the command line arguments. *) (** The current module defining the generator to use. *) diff --git a/ocamldoc/odoc_ast.ml b/ocamldoc/odoc_ast.ml index ea474fd69..05ac8df08 100644 --- a/ocamldoc/odoc_ast.ml +++ b/ocamldoc/odoc_ast.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Analysis of implementation files. *) open Misc open Asttypes diff --git a/ocamldoc/odoc_ast.mli b/ocamldoc/odoc_ast.mli index 05113144e..f1237f11f 100644 --- a/ocamldoc/odoc_ast.mli +++ b/ocamldoc/odoc_ast.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The module for analysing the typed abstract syntax tree and source code and creating modules, classes, ..., elements.*) type typedtree = Typedtree.structure * Typedtree.module_coercion diff --git a/ocamldoc/odoc_class.ml b/ocamldoc/odoc_class.ml index dcb719f0e..ce9902eb6 100644 --- a/ocamldoc/odoc_class.ml +++ b/ocamldoc/odoc_class.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Representation and manipulation of classes and class types.*) module Name = Odoc_name @@ -249,6 +247,3 @@ let class_type_parameter_text_by_name clt label = with Not_found -> None - - -(* eof $Id$ *) diff --git a/ocamldoc/odoc_comments.ml b/ocamldoc/odoc_comments.ml index d72d125e4..161561a6f 100644 --- a/ocamldoc/odoc_comments.ml +++ b/ocamldoc/odoc_comments.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Analysis of comments. *) open Odoc_types diff --git a/ocamldoc/odoc_comments.mli b/ocamldoc/odoc_comments.mli index a6114b7f7..6aeb91ded 100644 --- a/ocamldoc/odoc_comments.mli +++ b/ocamldoc/odoc_comments.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Analysis of comments. *) val simple_blank : string diff --git a/ocamldoc/odoc_comments_global.ml b/ocamldoc/odoc_comments_global.ml index 44e783e36..5fbe6406b 100644 --- a/ocamldoc/odoc_comments_global.ml +++ b/ocamldoc/odoc_comments_global.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The global variables used by the special comment parser.*) let nb_chars = ref 0 @@ -48,5 +46,3 @@ let init () = raised_exceptions := []; return_value := None ; customs := [] - -(* eof $Id$ *) diff --git a/ocamldoc/odoc_comments_global.mli b/ocamldoc/odoc_comments_global.mli index ab8ff7549..291673c07 100644 --- a/ocamldoc/odoc_comments_global.mli +++ b/ocamldoc/odoc_comments_global.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The global variables used by the special comment parser.*) (** the number of chars used in the lexer. *) diff --git a/ocamldoc/odoc_config.ml b/ocamldoc/odoc_config.ml index c3a0cdf52..4250f514c 100644 --- a/ocamldoc/odoc_config.ml +++ b/ocamldoc/odoc_config.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - let custom_generators_path = Filename.concat Config.standard_library (Filename.concat "ocamldoc" "custom") diff --git a/ocamldoc/odoc_config.mli b/ocamldoc/odoc_config.mli index e36985491..59ffc0988 100644 --- a/ocamldoc/odoc_config.mli +++ b/ocamldoc/odoc_config.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Ocamldoc configuration contants. *) (** Default path to search for custom generators and to install them. *) diff --git a/ocamldoc/odoc_control.ml b/ocamldoc/odoc_control.ml index 7b46e3c52..30a1f393d 100644 --- a/ocamldoc/odoc_control.ml +++ b/ocamldoc/odoc_control.ml @@ -9,5 +9,3 @@ (* under the terms of the Q Public License version 1.0. *) (* *) (***********************************************************************) - -(* $Id$ *) diff --git a/ocamldoc/odoc_cross.ml b/ocamldoc/odoc_cross.ml index f4568015d..5acd6f416 100644 --- a/ocamldoc/odoc_cross.ml +++ b/ocamldoc/odoc_cross.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Cross referencing. *) module Name = Odoc_name diff --git a/ocamldoc/odoc_cross.mli b/ocamldoc/odoc_cross.mli index 8133abaa8..57fff6578 100644 --- a/ocamldoc/odoc_cross.mli +++ b/ocamldoc/odoc_cross.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Cross-referencing. *) val associate : Odoc_module.t_module list -> unit diff --git a/ocamldoc/odoc_dag2html.ml b/ocamldoc/odoc_dag2html.ml index 51ba19239..8f036f2ee 100644 --- a/ocamldoc/odoc_dag2html.ml +++ b/ocamldoc/odoc_dag2html.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The types and functions to create a html table representing a dag. Thanks to Daniel De Rauglaudre. *) type 'a dag = { mutable dag : 'a node array } diff --git a/ocamldoc/odoc_dag2html.mli b/ocamldoc/odoc_dag2html.mli index 55451eaf1..d59148c76 100644 --- a/ocamldoc/odoc_dag2html.mli +++ b/ocamldoc/odoc_dag2html.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The types and functions to create a html table representing a dag. Thanks to Daniel de Rauglaudre. *) diff --git a/ocamldoc/odoc_dep.ml b/ocamldoc/odoc_dep.ml index a8072be04..18cd22abe 100644 --- a/ocamldoc/odoc_dep.ml +++ b/ocamldoc/odoc_dep.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Top modules dependencies. *) module StrS = Depend.StringSet diff --git a/ocamldoc/odoc_dot.ml b/ocamldoc/odoc_dot.ml index bee7b1888..fc5af0475 100644 --- a/ocamldoc/odoc_dot.ml +++ b/ocamldoc/odoc_dot.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Definition of a class which outputs a dot file showing top modules dependencies.*) diff --git a/ocamldoc/odoc_env.ml b/ocamldoc/odoc_env.ml index 91fb6f205..f4d1b7ce1 100644 --- a/ocamldoc/odoc_env.ml +++ b/ocamldoc/odoc_env.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Environment for finding complete names from relative names. *) let print_DEBUG s = print_string s ; print_newline ();; @@ -246,5 +244,3 @@ let subst_class_type env t = Types.Cty_fun (l, new_texp, new_ct) in iter t - -(* eof $Id$ *) diff --git a/ocamldoc/odoc_env.mli b/ocamldoc/odoc_env.mli index 4164ae1de..cafdd52ed 100644 --- a/ocamldoc/odoc_env.mli +++ b/ocamldoc/odoc_env.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Environment for finding complete names from relative names. *) (** An environment of known names, diff --git a/ocamldoc/odoc_exception.ml b/ocamldoc/odoc_exception.ml index 930122f0e..a62cb7b7d 100644 --- a/ocamldoc/odoc_exception.ml +++ b/ocamldoc/odoc_exception.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Representation and manipulation of exceptions. *) module Name = Odoc_name diff --git a/ocamldoc/odoc_global.ml b/ocamldoc/odoc_global.ml index d090e95ff..dcb1cb911 100644 --- a/ocamldoc/odoc_global.ml +++ b/ocamldoc/odoc_global.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Global variables. *) (* Tell ocaml compiler not to generate files. *) diff --git a/ocamldoc/odoc_global.mli b/ocamldoc/odoc_global.mli index a3dc3562a..2cf846c30 100644 --- a/ocamldoc/odoc_global.mli +++ b/ocamldoc/odoc_global.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Global variables. *) (** The kind of source file in arguments. *) diff --git a/ocamldoc/odoc_html.ml b/ocamldoc/odoc_html.ml index 3e8bcb283..bdd43f504 100644 --- a/ocamldoc/odoc_html.ml +++ b/ocamldoc/odoc_html.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Generation of html documentation.*) let print_DEBUG s = print_string s ; print_newline () diff --git a/ocamldoc/odoc_info.ml b/ocamldoc/odoc_info.ml index 2a07820c7..4a6c21419 100644 --- a/ocamldoc/odoc_info.ml +++ b/ocamldoc/odoc_info.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Interface for analysing documented OCaml source files and to the collected information. *) type ref_kind = Odoc_types.ref_kind = diff --git a/ocamldoc/odoc_info.mli b/ocamldoc/odoc_info.mli index 6a4b285d0..ae888300e 100644 --- a/ocamldoc/odoc_info.mli +++ b/ocamldoc/odoc_info.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Interface to the information collected in source files. *) (** The differents kinds of element references. *) diff --git a/ocamldoc/odoc_inherit.ml b/ocamldoc/odoc_inherit.ml index 7b46e3c52..30a1f393d 100644 --- a/ocamldoc/odoc_inherit.ml +++ b/ocamldoc/odoc_inherit.ml @@ -9,5 +9,3 @@ (* under the terms of the Q Public License version 1.0. *) (* *) (***********************************************************************) - -(* $Id$ *) diff --git a/ocamldoc/odoc_latex.ml b/ocamldoc/odoc_latex.ml index 781f1db61..7d026f46d 100644 --- a/ocamldoc/odoc_latex.ml +++ b/ocamldoc/odoc_latex.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Generation of LaTeX documentation. *) let print_DEBUG s = print_string s ; print_newline () diff --git a/ocamldoc/odoc_latex_style.ml b/ocamldoc/odoc_latex_style.ml index 62ccc1611..713e72e81 100644 --- a/ocamldoc/odoc_latex_style.ml +++ b/ocamldoc/odoc_latex_style.ml @@ -12,8 +12,6 @@ (** The content of the LaTeX style to generate when generating LaTeX code. *) -(* $Id$ *) - let content ="\ \n%% Support macros for LaTeX documentation generated by ocamldoc.\ \n%% This file is in the public domain; do what you want with it.\ diff --git a/ocamldoc/odoc_lexer.mll b/ocamldoc/odoc_lexer.mll index 4a534e1c3..cabcfc2d0 100644 --- a/ocamldoc/odoc_lexer.mll +++ b/ocamldoc/odoc_lexer.mll @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The lexer for special comments. *) open Lexing diff --git a/ocamldoc/odoc_man.ml b/ocamldoc/odoc_man.ml index 7b26c7762..7e01f8d4f 100644 --- a/ocamldoc/odoc_man.ml +++ b/ocamldoc/odoc_man.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The man pages generator. *) open Odoc_info open Parameter diff --git a/ocamldoc/odoc_merge.ml b/ocamldoc/odoc_merge.ml index 5aefbeac2..1e94c2737 100644 --- a/ocamldoc/odoc_merge.ml +++ b/ocamldoc/odoc_merge.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Merge of information from [.ml] and [.mli] for a module.*) open Odoc_types diff --git a/ocamldoc/odoc_merge.mli b/ocamldoc/odoc_merge.mli index 9eff37328..2b6b857b8 100644 --- a/ocamldoc/odoc_merge.mli +++ b/ocamldoc/odoc_merge.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Merge of information from [.ml] and [.mli] for a module.*) (** Merging \@before tags. *) diff --git a/ocamldoc/odoc_messages.ml b/ocamldoc/odoc_messages.ml index 169e2ba36..1d80e88b3 100644 --- a/ocamldoc/odoc_messages.ml +++ b/ocamldoc/odoc_messages.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The messages of the application. *) let ok = "Ok" diff --git a/ocamldoc/odoc_misc.ml b/ocamldoc/odoc_misc.ml index 20bc7cd24..c762ade2a 100644 --- a/ocamldoc/odoc_misc.ml +++ b/ocamldoc/odoc_misc.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - let no_blanks s = let len = String.length s in let buf = Buffer.create len in diff --git a/ocamldoc/odoc_misc.mli b/ocamldoc/odoc_misc.mli index 383cb2879..5958be91d 100644 --- a/ocamldoc/odoc_misc.mli +++ b/ocamldoc/odoc_misc.mli @@ -10,9 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) - -(** Miscelaneous functions *) +(** Miscellaneous functions *) (** [no_blanks s] returns the given string without any blank characters, i.e. '\n' '\r' ' ' '\t'. diff --git a/ocamldoc/odoc_module.ml b/ocamldoc/odoc_module.ml index cd12e49b8..216f1cfb3 100644 --- a/ocamldoc/odoc_module.ml +++ b/ocamldoc/odoc_module.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Representation and manipulation of modules and module types. *) let print_DEBUG s = print_string s ; print_newline () diff --git a/ocamldoc/odoc_name.ml b/ocamldoc/odoc_name.ml index 62611e31a..41c91dc10 100644 --- a/ocamldoc/odoc_name.ml +++ b/ocamldoc/odoc_name.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Representation of element names. *) let infix_chars = [ '|' ; diff --git a/ocamldoc/odoc_name.mli b/ocamldoc/odoc_name.mli index 57d608ba9..9c0e51ecf 100644 --- a/ocamldoc/odoc_name.mli +++ b/ocamldoc/odoc_name.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Representation of element names. *) type t = string diff --git a/ocamldoc/odoc_ocamlhtml.mll b/ocamldoc/odoc_ocamlhtml.mll index 6364a900f..975229da8 100644 --- a/ocamldoc/odoc_ocamlhtml.mll +++ b/ocamldoc/odoc_ocamlhtml.mll @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Generation of html code to display OCaml code. *) open Lexing diff --git a/ocamldoc/odoc_parameter.ml b/ocamldoc/odoc_parameter.ml index 142a253c9..be98ef41c 100644 --- a/ocamldoc/odoc_parameter.ml +++ b/ocamldoc/odoc_parameter.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Representation and manipulation of method / function / class parameters. *) let print_DEBUG s = print_string s ; print_newline () diff --git a/ocamldoc/odoc_parser.mly b/ocamldoc/odoc_parser.mly index e62dcc551..ea7d9a570 100644 --- a/ocamldoc/odoc_parser.mly +++ b/ocamldoc/odoc_parser.mly @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Odoc_types open Odoc_comments_global diff --git a/ocamldoc/odoc_print.ml b/ocamldoc/odoc_print.ml index 3ac5def9f..a62832fdb 100644 --- a/ocamldoc/odoc_print.ml +++ b/ocamldoc/odoc_print.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Format let new_fmt () = diff --git a/ocamldoc/odoc_print.mli b/ocamldoc/odoc_print.mli index 6b26fc45d..f7c590139 100644 --- a/ocamldoc/odoc_print.mli +++ b/ocamldoc/odoc_print.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Printing functions. *) (** This function takes a Types.type_expr and returns a string. diff --git a/ocamldoc/odoc_scan.ml b/ocamldoc/odoc_scan.ml index f8107cca1..e507c48b7 100644 --- a/ocamldoc/odoc_scan.ml +++ b/ocamldoc/odoc_scan.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Scanning of modules and elements. The class scanner defined in this module can be used to diff --git a/ocamldoc/odoc_search.ml b/ocamldoc/odoc_search.ml index ab65be97c..4e76d9fe4 100644 --- a/ocamldoc/odoc_search.ml +++ b/ocamldoc/odoc_search.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Research of elements through modules. *) module Name = Odoc_name @@ -680,5 +678,3 @@ let find_section mods regexp = with Res_section (_,t) -> t | _ -> assert false - -(* eof $Id$ *) diff --git a/ocamldoc/odoc_search.mli b/ocamldoc/odoc_search.mli index 353c741b6..bd101aa55 100644 --- a/ocamldoc/odoc_search.mli +++ b/ocamldoc/odoc_search.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Research of elements through modules. *) (** The type for an element of the result of a research. *) diff --git a/ocamldoc/odoc_see_lexer.mll b/ocamldoc/odoc_see_lexer.mll index b0570f783..59ffc9371 100644 --- a/ocamldoc/odoc_see_lexer.mll +++ b/ocamldoc/odoc_see_lexer.mll @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - let print_DEBUG2 s = print_string s ; print_newline () (** the lexer for special comments. *) diff --git a/ocamldoc/odoc_sig.ml b/ocamldoc/odoc_sig.ml index afbd5e958..3629de690 100644 --- a/ocamldoc/odoc_sig.ml +++ b/ocamldoc/odoc_sig.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Analysis of interface files. *) open Misc diff --git a/ocamldoc/odoc_sig.mli b/ocamldoc/odoc_sig.mli index f7908f959..f0c3c4a13 100644 --- a/ocamldoc/odoc_sig.mli +++ b/ocamldoc/odoc_sig.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The module for analysing a signature and source code and creating modules, classes, ..., elements.*) (** The functions used to retrieve information from a signature. *) diff --git a/ocamldoc/odoc_str.ml b/ocamldoc/odoc_str.ml index e9fa27d16..5f3a8e9e7 100644 --- a/ocamldoc/odoc_str.ml +++ b/ocamldoc/odoc_str.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The functions to get a string from different kinds of elements (types, modules, ...). *) module Name = Odoc_name @@ -284,5 +282,3 @@ let string_of_method m = (match m.M.met_value.M.val_info with None -> "" | Some i -> Odoc_misc.string_of_info i) - -(* eof $Id$ *) diff --git a/ocamldoc/odoc_str.mli b/ocamldoc/odoc_str.mli index d08694ca1..44278bb0f 100644 --- a/ocamldoc/odoc_str.mli +++ b/ocamldoc/odoc_str.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The functions to get a string from different kinds of elements (types, modules, ...). *) (** @return the variance string for the given type and (covariant, contravariant) information. *) diff --git a/ocamldoc/odoc_test.ml b/ocamldoc/odoc_test.ml index 91baab09c..cd7b5fa04 100644 --- a/ocamldoc/odoc_test.ml +++ b/ocamldoc/odoc_test.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Custom generator to perform test on ocamldoc. *) open Odoc_info diff --git a/ocamldoc/odoc_texi.ml b/ocamldoc/odoc_texi.ml index 5b912c7be..067586b82 100644 --- a/ocamldoc/odoc_texi.ml +++ b/ocamldoc/odoc_texi.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Generation of Texinfo documentation. *) open Odoc_info diff --git a/ocamldoc/odoc_text.ml b/ocamldoc/odoc_text.ml index e7a6f8448..4fd30e0ee 100644 --- a/ocamldoc/odoc_text.ml +++ b/ocamldoc/odoc_text.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - exception Text_syntax of int * int * string (* line, char, string *) open Odoc_types diff --git a/ocamldoc/odoc_text.mli b/ocamldoc/odoc_text.mli index 76194a6da..fc4f33064 100644 --- a/ocamldoc/odoc_text.mli +++ b/ocamldoc/odoc_text.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** A module with a function to parse strings to obtain a [Odoc_types.text] value. *) (** Syntax error in a text. *) diff --git a/ocamldoc/odoc_text_lexer.mll b/ocamldoc/odoc_text_lexer.mll index 4c92834f4..b253ee57e 100644 --- a/ocamldoc/odoc_text_lexer.mll +++ b/ocamldoc/odoc_text_lexer.mll @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The lexer for string to build text structures. *) open Lexing diff --git a/ocamldoc/odoc_text_parser.mly b/ocamldoc/odoc_text_parser.mly index 6efc32f54..c10425ccb 100644 --- a/ocamldoc/odoc_text_parser.mly +++ b/ocamldoc/odoc_text_parser.mly @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Odoc_types let identchar = diff --git a/ocamldoc/odoc_to_text.ml b/ocamldoc/odoc_to_text.ml index 40ba3d6af..7b08417e7 100644 --- a/ocamldoc/odoc_to_text.ml +++ b/ocamldoc/odoc_to_text.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Text generation. This module contains the class [to_text] with methods used to transform diff --git a/ocamldoc/odoc_type.ml b/ocamldoc/odoc_type.ml index 68f348cbe..fefd007c8 100644 --- a/ocamldoc/odoc_type.ml +++ b/ocamldoc/odoc_type.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Representation and manipulation of a type, but not class nor module type.*) module Name = Odoc_name diff --git a/ocamldoc/odoc_types.ml b/ocamldoc/odoc_types.ml index 2cfb8d4b1..eccc852d6 100644 --- a/ocamldoc/odoc_types.ml +++ b/ocamldoc/odoc_types.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type ref_kind = RK_module | RK_module_type diff --git a/ocamldoc/odoc_types.mli b/ocamldoc/odoc_types.mli index e4169ac1f..7819a2346 100644 --- a/ocamldoc/odoc_types.mli +++ b/ocamldoc/odoc_types.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Types for the information collected in comments. *) (** The differents kinds of element references. *) diff --git a/ocamldoc/odoc_value.ml b/ocamldoc/odoc_value.ml index 23cf4f5d8..b35f2c6b5 100644 --- a/ocamldoc/odoc_value.ml +++ b/ocamldoc/odoc_value.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Representation and manipulation of values, class attributes and class methods. *) module Name = Odoc_name diff --git a/ocamldoc/remove_DEBUG b/ocamldoc/remove_DEBUG index b8550e252..bca6ba049 100755 --- a/ocamldoc/remove_DEBUG +++ b/ocamldoc/remove_DEBUG @@ -11,8 +11,6 @@ #(* *) #(***********************************************************************) -# $Id$ - # usage: remove_DEBUG <file> # remove from <file> every line that contains the string "DEBUG", # respecting the cpp # line annotation conventions diff --git a/ocamldoc/runocamldoc b/ocamldoc/runocamldoc index 3aba71923..d2112e9cd 100644 --- a/ocamldoc/runocamldoc +++ b/ocamldoc/runocamldoc @@ -12,8 +12,6 @@ # # ####################################################################### -# $Id$ - case "$1" in true) shift exec ../boot/ocamlrun -I ../otherlibs/unix -I ../otherlibs/str \ diff --git a/otherlibs/Makefile b/otherlibs/Makefile index fba032df8..6c3e58aa6 100644 --- a/otherlibs/Makefile +++ b/otherlibs/Makefile @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - # Common Makefile for otherlibs on the Unix ports CAMLC=$(ROOTDIR)/ocamlcomp.sh diff --git a/otherlibs/Makefile.nt b/otherlibs/Makefile.nt index ceab7f0c5..aafb4217c 100644 --- a/otherlibs/Makefile.nt +++ b/otherlibs/Makefile.nt @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - # Common Makefile for otherlibs on the Win32/MinGW ports CAMLC=$(CAMLRUN) $(ROOTDIR)/ocamlc -nostdlib -I $(ROOTDIR)/stdlib -w s diff --git a/otherlibs/Makefile.shared b/otherlibs/Makefile.shared index cd4126006..26416eac3 100644 --- a/otherlibs/Makefile.shared +++ b/otherlibs/Makefile.shared @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - # Common Makefile for otherlibs ROOTDIR=../.. diff --git a/otherlibs/bigarray/Makefile b/otherlibs/bigarray/Makefile index 83b315258..84ca80a5c 100644 --- a/otherlibs/bigarray/Makefile +++ b/otherlibs/bigarray/Makefile @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - LIBNAME=bigarray EXTRACFLAGS=-I../unix -DIN_OCAML_BIGARRAY -DCAML_NAME_SPACE EXTRACAMLFLAGS=-I ../unix diff --git a/otherlibs/bigarray/Makefile.nt b/otherlibs/bigarray/Makefile.nt index e845ad62e..db5ed6058 100644 --- a/otherlibs/bigarray/Makefile.nt +++ b/otherlibs/bigarray/Makefile.nt @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - LIBNAME=bigarray EXTRACFLAGS=-I../win32unix -DIN_OCAML_BIGARRAY -DCAML_NAME_SPACE EXTRACAMLFLAGS=-I ../win32unix diff --git a/otherlibs/bigarray/bigarray.h b/otherlibs/bigarray/bigarray.h index ed63fc4b3..26fdcc9ed 100644 --- a/otherlibs/bigarray/bigarray.h +++ b/otherlibs/bigarray/bigarray.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_BIGARRAY_H #define CAML_BIGARRAY_H diff --git a/otherlibs/bigarray/bigarray.ml b/otherlibs/bigarray/bigarray.ml index 1d3dbcf97..26bdaac52 100644 --- a/otherlibs/bigarray/bigarray.ml +++ b/otherlibs/bigarray/bigarray.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [Bigarray]: large, multi-dimensional, numerical arrays *) external init : unit -> unit = "caml_ba_init" diff --git a/otherlibs/bigarray/bigarray.mli b/otherlibs/bigarray/bigarray.mli index fb252cb42..515079fca 100644 --- a/otherlibs/bigarray/bigarray.mli +++ b/otherlibs/bigarray/bigarray.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Large, multi-dimensional, numerical arrays. This module implements multi-dimensional arrays of integers and diff --git a/otherlibs/bigarray/bigarray_stubs.c b/otherlibs/bigarray/bigarray_stubs.c index b1062f813..567a72deb 100644 --- a/otherlibs/bigarray/bigarray_stubs.c +++ b/otherlibs/bigarray/bigarray_stubs.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stddef.h> #include <stdarg.h> #include <string.h> diff --git a/otherlibs/bigarray/mmap_unix.c b/otherlibs/bigarray/mmap_unix.c index 2e7d98d2d..5ba8cbf6d 100644 --- a/otherlibs/bigarray/mmap_unix.c +++ b/otherlibs/bigarray/mmap_unix.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Needed (under Linux at least) to get pwrite's prototype in unistd.h. Must be defined before the first system .h is included. */ #define _XOPEN_SOURCE 500 diff --git a/otherlibs/bigarray/mmap_win32.c b/otherlibs/bigarray/mmap_win32.c index ded2270ee..4eca668aa 100644 --- a/otherlibs/bigarray/mmap_win32.c +++ b/otherlibs/bigarray/mmap_win32.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stddef.h> #include <stdio.h> #include <string.h> diff --git a/otherlibs/dynlink/Makefile b/otherlibs/dynlink/Makefile index 63df023bb..f124bbb7f 100644 --- a/otherlibs/dynlink/Makefile +++ b/otherlibs/dynlink/Makefile @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - # Makefile for the dynamic link library include ../../config/Makefile diff --git a/otherlibs/dynlink/Makefile.nt b/otherlibs/dynlink/Makefile.nt index 31ee136d6..c041c2f7f 100644 --- a/otherlibs/dynlink/Makefile.nt +++ b/otherlibs/dynlink/Makefile.nt @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - # Makefile for the dynamic link library include Makefile diff --git a/otherlibs/dynlink/dynlink.ml b/otherlibs/dynlink/dynlink.ml index b0fcba654..37be54c33 100644 --- a/otherlibs/dynlink/dynlink.ml +++ b/otherlibs/dynlink/dynlink.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Dynamic loading of .cmo files *) open Dynlinkaux (* REMOVE_ME for ../../debugger/dynlink.ml *) diff --git a/otherlibs/dynlink/dynlink.mli b/otherlibs/dynlink/dynlink.mli index 849f1e148..b43fa359f 100644 --- a/otherlibs/dynlink/dynlink.mli +++ b/otherlibs/dynlink/dynlink.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Dynamic loading of object files. *) val is_native: bool diff --git a/otherlibs/dynlink/extract_crc.ml b/otherlibs/dynlink/extract_crc.ml index 672ca6ea9..4a6a310a9 100644 --- a/otherlibs/dynlink/extract_crc.ml +++ b/otherlibs/dynlink/extract_crc.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Print the digests of unit interfaces *) let load_path = ref [] diff --git a/otherlibs/dynlink/natdynlink.ml b/otherlibs/dynlink/natdynlink.ml index d980a7b90..fd06d7c70 100644 --- a/otherlibs/dynlink/natdynlink.ml +++ b/otherlibs/dynlink/natdynlink.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Dynamic loading of .cmx files *) type handle diff --git a/otherlibs/graph/Makefile b/otherlibs/graph/Makefile index 19c4612ed..7ef50c8e7 100644 --- a/otherlibs/graph/Makefile +++ b/otherlibs/graph/Makefile @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - # Makefile for the portable graphics library LIBNAME=graphics diff --git a/otherlibs/graph/color.c b/otherlibs/graph/color.c index bdd8b5e28..02641ae8e 100644 --- a/otherlibs/graph/color.c +++ b/otherlibs/graph/color.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "libgraph.h" #include <X11/Xatom.h> diff --git a/otherlibs/graph/draw.c b/otherlibs/graph/draw.c index 0419c6270..367011150 100644 --- a/otherlibs/graph/draw.c +++ b/otherlibs/graph/draw.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "libgraph.h" #include <alloc.h> diff --git a/otherlibs/graph/dump_img.c b/otherlibs/graph/dump_img.c index 66185d875..bf562a78a 100644 --- a/otherlibs/graph/dump_img.c +++ b/otherlibs/graph/dump_img.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "libgraph.h" #include "image.h" #include <alloc.h> diff --git a/otherlibs/graph/events.c b/otherlibs/graph/events.c index 508931055..d2e94ebd6 100644 --- a/otherlibs/graph/events.c +++ b/otherlibs/graph/events.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <signal.h> #include "libgraph.h" #include <alloc.h> diff --git a/otherlibs/graph/fill.c b/otherlibs/graph/fill.c index bb1a60e78..ba14e2cdd 100644 --- a/otherlibs/graph/fill.c +++ b/otherlibs/graph/fill.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "libgraph.h" #include <memory.h> diff --git a/otherlibs/graph/graphics.ml b/otherlibs/graph/graphics.ml index a9dd51140..c45c5bfca 100644 --- a/otherlibs/graph/graphics.ml +++ b/otherlibs/graph/graphics.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - exception Graphic_failure of string (* Initializations *) diff --git a/otherlibs/graph/graphics.mli b/otherlibs/graph/graphics.mli index 10074cb7a..5e81edb07 100644 --- a/otherlibs/graph/graphics.mli +++ b/otherlibs/graph/graphics.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Machine-independent graphics primitives. *) exception Graphic_failure of string diff --git a/otherlibs/graph/graphicsX11.ml b/otherlibs/graph/graphicsX11.ml index 4b70d29bd..066952ce6 100644 --- a/otherlibs/graph/graphicsX11.ml +++ b/otherlibs/graph/graphicsX11.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [GraphicsX11]: additional graphics primitives for the X Windows system *) type window_id = string diff --git a/otherlibs/graph/graphicsX11.mli b/otherlibs/graph/graphicsX11.mli index 0210d9676..918f9d509 100644 --- a/otherlibs/graph/graphicsX11.mli +++ b/otherlibs/graph/graphicsX11.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Additional graphics primitives for the X Windows system. *) type window_id = string diff --git a/otherlibs/graph/image.c b/otherlibs/graph/image.c index c610d96b6..40bce3357 100644 --- a/otherlibs/graph/image.c +++ b/otherlibs/graph/image.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "libgraph.h" #include "image.h" #include <alloc.h> @@ -104,5 +102,3 @@ value caml_gr_draw_image(value im, value vx, value vy) XFlush(caml_gr_display); return Val_unit; } - -/* eof $Id$ */ diff --git a/otherlibs/graph/image.h b/otherlibs/graph/image.h index 76d319e0a..806f1fd2e 100644 --- a/otherlibs/graph/image.h +++ b/otherlibs/graph/image.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - struct grimage { int width, height; /* Dimensions of the image */ Pixmap data; /* Pixels */ diff --git a/otherlibs/graph/libgraph.h b/otherlibs/graph/libgraph.h index c8192e05b..5ad64c03a 100644 --- a/otherlibs/graph/libgraph.h +++ b/otherlibs/graph/libgraph.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <X11/Xlib.h> #include <X11/Xutil.h> diff --git a/otherlibs/graph/make_img.c b/otherlibs/graph/make_img.c index 08628804f..56f37bd30 100644 --- a/otherlibs/graph/make_img.c +++ b/otherlibs/graph/make_img.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "libgraph.h" #include "image.h" #include <memory.h> diff --git a/otherlibs/graph/open.c b/otherlibs/graph/open.c index 1f7da5ba4..00ae2a314 100644 --- a/otherlibs/graph/open.c +++ b/otherlibs/graph/open.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include <fcntl.h> #include <signal.h> diff --git a/otherlibs/graph/point_col.c b/otherlibs/graph/point_col.c index 2149aa8eb..af061e907 100644 --- a/otherlibs/graph/point_col.c +++ b/otherlibs/graph/point_col.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "libgraph.h" value caml_gr_point_color(value vx, value vy) diff --git a/otherlibs/graph/sound.c b/otherlibs/graph/sound.c index cba7a909b..4ce110106 100644 --- a/otherlibs/graph/sound.c +++ b/otherlibs/graph/sound.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "libgraph.h" value caml_gr_sound(value vfreq, value vdur) diff --git a/otherlibs/graph/subwindow.c b/otherlibs/graph/subwindow.c index 08882569e..952dccb88 100644 --- a/otherlibs/graph/subwindow.c +++ b/otherlibs/graph/subwindow.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "libgraph.h" value caml_gr_open_subwindow(value vx, value vy, value width, value height) diff --git a/otherlibs/graph/text.c b/otherlibs/graph/text.c index 6743e8640..d92d4ae5e 100644 --- a/otherlibs/graph/text.c +++ b/otherlibs/graph/text.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "libgraph.h" #include <alloc.h> diff --git a/otherlibs/str/Makefile b/otherlibs/str/Makefile index e36000e4a..509be62a5 100644 --- a/otherlibs/str/Makefile +++ b/otherlibs/str/Makefile @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - # Makefile for the str library diff --git a/otherlibs/str/Makefile.nt b/otherlibs/str/Makefile.nt index b0420b39b..3b3f51c96 100644 --- a/otherlibs/str/Makefile.nt +++ b/otherlibs/str/Makefile.nt @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - # Makefile for the str library LIBNAME=str diff --git a/otherlibs/str/str.ml b/otherlibs/str/str.ml index 5d53168fd..749292602 100644 --- a/otherlibs/str/str.ml +++ b/otherlibs/str/str.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** String utilities *) let string_before s n = String.sub s 0 n diff --git a/otherlibs/str/str.mli b/otherlibs/str/str.mli index 3e30ec17f..7aa73633a 100644 --- a/otherlibs/str/str.mli +++ b/otherlibs/str/str.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Regular expressions and high-level string processing *) diff --git a/otherlibs/str/strstubs.c b/otherlibs/str/strstubs.c index fc2f46f8e..b25ecef34 100644 --- a/otherlibs/str/strstubs.c +++ b/otherlibs/str/strstubs.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include <ctype.h> #include <mlvalues.h> diff --git a/otherlibs/systhreads/Makefile b/otherlibs/systhreads/Makefile index 6184dcfe6..791ae99b7 100644 --- a/otherlibs/systhreads/Makefile +++ b/otherlibs/systhreads/Makefile @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - include ../../config/Makefile CAMLC=../../ocamlcomp.sh -I ../unix diff --git a/otherlibs/systhreads/Makefile.nt b/otherlibs/systhreads/Makefile.nt index faa3b2987..93b0f1bc3 100644 --- a/otherlibs/systhreads/Makefile.nt +++ b/otherlibs/systhreads/Makefile.nt @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - include ../../config/Makefile # Compilation options diff --git a/otherlibs/systhreads/condition.ml b/otherlibs/systhreads/condition.ml index 6bdac6a36..4d12378d7 100644 --- a/otherlibs/systhreads/condition.ml +++ b/otherlibs/systhreads/condition.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type t external create: unit -> t = "caml_condition_new" external wait: t -> Mutex.t -> unit = "caml_condition_wait" diff --git a/otherlibs/systhreads/condition.mli b/otherlibs/systhreads/condition.mli index d13b30d86..2d5bcde1f 100644 --- a/otherlibs/systhreads/condition.mli +++ b/otherlibs/systhreads/condition.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Condition variables to synchronize between threads. Condition variables are used when one thread wants to wait until another diff --git a/otherlibs/systhreads/event.ml b/otherlibs/systhreads/event.ml index ff137e981..1feac525f 100644 --- a/otherlibs/systhreads/event.ml +++ b/otherlibs/systhreads/event.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Events *) type 'a basic_event = { poll: unit -> bool; diff --git a/otherlibs/systhreads/event.mli b/otherlibs/systhreads/event.mli index 11842e5ad..769cd4999 100644 --- a/otherlibs/systhreads/event.mli +++ b/otherlibs/systhreads/event.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** First-class synchronous communication. This module implements synchronous inter-thread communications over diff --git a/otherlibs/systhreads/mutex.ml b/otherlibs/systhreads/mutex.ml index 5e9cc886c..5b8be9da4 100644 --- a/otherlibs/systhreads/mutex.ml +++ b/otherlibs/systhreads/mutex.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type t external create: unit -> t = "caml_mutex_new" external lock: t -> unit = "caml_mutex_lock" diff --git a/otherlibs/systhreads/mutex.mli b/otherlibs/systhreads/mutex.mli index 844d4e5d4..265ae94e6 100644 --- a/otherlibs/systhreads/mutex.mli +++ b/otherlibs/systhreads/mutex.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Locks for mutual exclusion. Mutexes (mutual-exclusion locks) are used to implement critical sections diff --git a/otherlibs/systhreads/st_posix.h b/otherlibs/systhreads/st_posix.h index 44b475110..e0bc65e41 100644 --- a/otherlibs/systhreads/st_posix.h +++ b/otherlibs/systhreads/st_posix.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* POSIX thread implementation of the "st" interface */ #include <errno.h> diff --git a/otherlibs/systhreads/st_stubs.c b/otherlibs/systhreads/st_stubs.c index 23d826ee8..7e420191e 100644 --- a/otherlibs/systhreads/st_stubs.c +++ b/otherlibs/systhreads/st_stubs.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "alloc.h" #include "backtrace.h" #include "callback.h" diff --git a/otherlibs/systhreads/st_win32.h b/otherlibs/systhreads/st_win32.h index 206646dfc..c1c5b87a5 100644 --- a/otherlibs/systhreads/st_win32.h +++ b/otherlibs/systhreads/st_win32.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Win32 implementation of the "st" interface */ #define _WIN32_WINNT 0x0400 diff --git a/otherlibs/systhreads/thread.ml b/otherlibs/systhreads/thread.ml index ee01c9558..58ef115f8 100644 --- a/otherlibs/systhreads/thread.ml +++ b/otherlibs/systhreads/thread.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* User-level threads *) type t diff --git a/otherlibs/systhreads/thread.mli b/otherlibs/systhreads/thread.mli index 42d18e635..93e52be29 100644 --- a/otherlibs/systhreads/thread.mli +++ b/otherlibs/systhreads/thread.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Lightweight threads for Posix [1003.1c] and Win32. *) type t diff --git a/otherlibs/systhreads/threadUnix.ml b/otherlibs/systhreads/threadUnix.ml index d4b6fd59f..335afcb09 100644 --- a/otherlibs/systhreads/threadUnix.ml +++ b/otherlibs/systhreads/threadUnix.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [ThreadUnix]: thread-compatible system calls *) open Unix diff --git a/otherlibs/systhreads/threadUnix.mli b/otherlibs/systhreads/threadUnix.mli index 9c7e76e56..63d27335f 100644 --- a/otherlibs/systhreads/threadUnix.mli +++ b/otherlibs/systhreads/threadUnix.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Thread-compatible system calls. @deprecated The functionality of this module has been merged back into diff --git a/otherlibs/systhreads/threads.h b/otherlibs/systhreads/threads.h index ff140cd5b..6a97b2510 100644 --- a/otherlibs/systhreads/threads.h +++ b/otherlibs/systhreads/threads.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifndef CAML_THREADS_H #define CAML_THREADS_H diff --git a/otherlibs/threads/Makefile b/otherlibs/threads/Makefile index 49a121c92..fb0513959 100644 --- a/otherlibs/threads/Makefile +++ b/otherlibs/threads/Makefile @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - include ../../config/Makefile CC=$(BYTECC) diff --git a/otherlibs/threads/condition.ml b/otherlibs/threads/condition.ml index ee687a85b..7912cd60c 100644 --- a/otherlibs/threads/condition.ml +++ b/otherlibs/threads/condition.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type t = { mutable waiting: Thread.t list } let create () = { waiting = [] } diff --git a/otherlibs/threads/condition.mli b/otherlibs/threads/condition.mli index d13b30d86..2d5bcde1f 100644 --- a/otherlibs/threads/condition.mli +++ b/otherlibs/threads/condition.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Condition variables to synchronize between threads. Condition variables are used when one thread wants to wait until another diff --git a/otherlibs/threads/event.ml b/otherlibs/threads/event.ml index ff137e981..1feac525f 100644 --- a/otherlibs/threads/event.ml +++ b/otherlibs/threads/event.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Events *) type 'a basic_event = { poll: unit -> bool; diff --git a/otherlibs/threads/event.mli b/otherlibs/threads/event.mli index eb37f0124..e38235f19 100644 --- a/otherlibs/threads/event.mli +++ b/otherlibs/threads/event.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** First-class synchronous communication. This module implements synchronous inter-thread communications over diff --git a/otherlibs/threads/marshal.ml b/otherlibs/threads/marshal.ml index 6f2bcfed7..9e2557e74 100644 --- a/otherlibs/threads/marshal.ml +++ b/otherlibs/threads/marshal.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type extern_flags = No_sharing | Closures diff --git a/otherlibs/threads/mutex.ml b/otherlibs/threads/mutex.ml index 12e3f534d..976527ceb 100644 --- a/otherlibs/threads/mutex.ml +++ b/otherlibs/threads/mutex.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type t = { mutable locked: bool; mutable waiting: Thread.t list } let create () = { locked = false; waiting = [] } diff --git a/otherlibs/threads/mutex.mli b/otherlibs/threads/mutex.mli index 844d4e5d4..265ae94e6 100644 --- a/otherlibs/threads/mutex.mli +++ b/otherlibs/threads/mutex.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Locks for mutual exclusion. Mutexes (mutual-exclusion locks) are used to implement critical sections diff --git a/otherlibs/threads/pervasives.ml b/otherlibs/threads/pervasives.ml index f83a1cf0d..7ca7975d3 100644 --- a/otherlibs/threads/pervasives.ml +++ b/otherlibs/threads/pervasives.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Same as ../../stdlib/pervasives.ml, except that I/O functions have been redefined to not block the whole process, but only the calling thread. *) diff --git a/otherlibs/threads/scheduler.c b/otherlibs/threads/scheduler.c index 3f5197903..5b14eb2e1 100644 --- a/otherlibs/threads/scheduler.c +++ b/otherlibs/threads/scheduler.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* The thread scheduler */ #include <string.h> diff --git a/otherlibs/threads/thread.ml b/otherlibs/threads/thread.ml index e3de604d2..646ad3c4a 100644 --- a/otherlibs/threads/thread.ml +++ b/otherlibs/threads/thread.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* User-level threads *) type t diff --git a/otherlibs/threads/thread.mli b/otherlibs/threads/thread.mli index e97e55ab1..e026a2140 100644 --- a/otherlibs/threads/thread.mli +++ b/otherlibs/threads/thread.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Lightweight threads. *) type t diff --git a/otherlibs/threads/threadUnix.ml b/otherlibs/threads/threadUnix.ml index bd4181b99..fe5ef4fdf 100644 --- a/otherlibs/threads/threadUnix.ml +++ b/otherlibs/threads/threadUnix.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [ThreadUnix]: thread-compatible system calls *) let execv = Unix.execv diff --git a/otherlibs/threads/threadUnix.mli b/otherlibs/threads/threadUnix.mli index 22ed9330e..4ebe28f4f 100644 --- a/otherlibs/threads/threadUnix.mli +++ b/otherlibs/threads/threadUnix.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Thread-compatible system calls. @deprecated The functionality of this module has been merged back into diff --git a/otherlibs/threads/unix.ml b/otherlibs/threads/unix.ml index 490facc76..53aaecfb2 100644 --- a/otherlibs/threads/unix.ml +++ b/otherlibs/threads/unix.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* An alternate implementation of the Unix module from ../unix which is safe in conjunction with bytecode threads. *) diff --git a/otherlibs/unix/Makefile b/otherlibs/unix/Makefile index 5a11b5c2c..5f4d72b83 100644 --- a/otherlibs/unix/Makefile +++ b/otherlibs/unix/Makefile @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - # Makefile for the Unix interface library LIBNAME=unix diff --git a/otherlibs/unix/accept.c b/otherlibs/unix/accept.c index 7b2688f03..183b8e869 100644 --- a/otherlibs/unix/accept.c +++ b/otherlibs/unix/accept.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/access.c b/otherlibs/unix/access.c index 813c0634a..3a612a340 100644 --- a/otherlibs/unix/access.c +++ b/otherlibs/unix/access.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include "unixsupport.h" diff --git a/otherlibs/unix/addrofstr.c b/otherlibs/unix/addrofstr.c index 0ba48d8a3..e17841f95 100644 --- a/otherlibs/unix/addrofstr.c +++ b/otherlibs/unix/addrofstr.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <memory.h> #include <fail.h> diff --git a/otherlibs/unix/alarm.c b/otherlibs/unix/alarm.c index 6275e2556..30472765f 100644 --- a/otherlibs/unix/alarm.c +++ b/otherlibs/unix/alarm.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/bind.c b/otherlibs/unix/bind.c index a6999a9f4..e3d0046c1 100644 --- a/otherlibs/unix/bind.c +++ b/otherlibs/unix/bind.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fail.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/chdir.c b/otherlibs/unix/chdir.c index 2788c5054..e7ea6f505 100644 --- a/otherlibs/unix/chdir.c +++ b/otherlibs/unix/chdir.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/chmod.c b/otherlibs/unix/chmod.c index f01d7e85b..ed2e88c8d 100644 --- a/otherlibs/unix/chmod.c +++ b/otherlibs/unix/chmod.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <sys/types.h> #include <sys/stat.h> #include <mlvalues.h> diff --git a/otherlibs/unix/chown.c b/otherlibs/unix/chown.c index 72002e936..a26f7a869 100644 --- a/otherlibs/unix/chown.c +++ b/otherlibs/unix/chown.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/chroot.c b/otherlibs/unix/chroot.c index 879d0662f..02a46aedc 100644 --- a/otherlibs/unix/chroot.c +++ b/otherlibs/unix/chroot.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/close.c b/otherlibs/unix/close.c index 0aaf74bd9..425502aac 100644 --- a/otherlibs/unix/close.c +++ b/otherlibs/unix/close.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/closedir.c b/otherlibs/unix/closedir.c index a6440efa4..ba9e74375 100644 --- a/otherlibs/unix/closedir.c +++ b/otherlibs/unix/closedir.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" #include <errno.h> diff --git a/otherlibs/unix/connect.c b/otherlibs/unix/connect.c index a17a89ffc..ed8b12c3f 100644 --- a/otherlibs/unix/connect.c +++ b/otherlibs/unix/connect.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fail.h> #include <mlvalues.h> #include <signals.h> diff --git a/otherlibs/unix/cst2constr.c b/otherlibs/unix/cst2constr.c index 8ce4d3f0d..f27cace7b 100644 --- a/otherlibs/unix/cst2constr.c +++ b/otherlibs/unix/cst2constr.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <fail.h> #include "cst2constr.h" diff --git a/otherlibs/unix/cst2constr.h b/otherlibs/unix/cst2constr.h index e1c61a0c5..88985e529 100644 --- a/otherlibs/unix/cst2constr.h +++ b/otherlibs/unix/cst2constr.h @@ -11,6 +11,4 @@ /* */ /***********************************************************************/ -/* $Id$ */ - extern value cst_to_constr(int n, int * tbl, int size, int deflt); diff --git a/otherlibs/unix/cstringv.c b/otherlibs/unix/cstringv.c index 5c83b59e4..04da30c24 100644 --- a/otherlibs/unix/cstringv.c +++ b/otherlibs/unix/cstringv.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <memory.h> #include "unixsupport.h" diff --git a/otherlibs/unix/dup.c b/otherlibs/unix/dup.c index f78d9369d..36e3efac5 100644 --- a/otherlibs/unix/dup.c +++ b/otherlibs/unix/dup.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/dup2.c b/otherlibs/unix/dup2.c index 412315891..c50180223 100644 --- a/otherlibs/unix/dup2.c +++ b/otherlibs/unix/dup2.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/envir.c b/otherlibs/unix/envir.c index 52e43ab7a..4b1893342 100644 --- a/otherlibs/unix/envir.c +++ b/otherlibs/unix/envir.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/errmsg.c b/otherlibs/unix/errmsg.c index 6cf82d633..5df3e1e73 100644 --- a/otherlibs/unix/errmsg.c +++ b/otherlibs/unix/errmsg.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <errno.h> #include <string.h> #include <mlvalues.h> diff --git a/otherlibs/unix/execv.c b/otherlibs/unix/execv.c index 51eabc712..ee59fa48e 100644 --- a/otherlibs/unix/execv.c +++ b/otherlibs/unix/execv.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <memory.h> #include "unixsupport.h" diff --git a/otherlibs/unix/execve.c b/otherlibs/unix/execve.c index 00ab6af4c..62b2d2c9a 100644 --- a/otherlibs/unix/execve.c +++ b/otherlibs/unix/execve.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <memory.h> #include "unixsupport.h" diff --git a/otherlibs/unix/execvp.c b/otherlibs/unix/execvp.c index db77d4134..8e28fa067 100644 --- a/otherlibs/unix/execvp.c +++ b/otherlibs/unix/execvp.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <memory.h> #include "unixsupport.h" diff --git a/otherlibs/unix/exit.c b/otherlibs/unix/exit.c index 88fc01254..94f5fb5e9 100644 --- a/otherlibs/unix/exit.c +++ b/otherlibs/unix/exit.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/fchmod.c b/otherlibs/unix/fchmod.c index b2d49dcd4..a6e8ee903 100644 --- a/otherlibs/unix/fchmod.c +++ b/otherlibs/unix/fchmod.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <sys/types.h> #include <sys/stat.h> #include <fail.h> diff --git a/otherlibs/unix/fchown.c b/otherlibs/unix/fchown.c index e2c934ae0..574d3c42b 100644 --- a/otherlibs/unix/fchown.c +++ b/otherlibs/unix/fchown.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fail.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/fcntl.c b/otherlibs/unix/fcntl.c index 58f7df756..886c12de9 100644 --- a/otherlibs/unix/fcntl.c +++ b/otherlibs/unix/fcntl.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fail.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/fork.c b/otherlibs/unix/fork.c index 80b443551..b21d80c60 100644 --- a/otherlibs/unix/fork.c +++ b/otherlibs/unix/fork.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <debugger.h> #include "unixsupport.h" diff --git a/otherlibs/unix/ftruncate.c b/otherlibs/unix/ftruncate.c index 5eaa166fb..f539a6450 100644 --- a/otherlibs/unix/ftruncate.c +++ b/otherlibs/unix/ftruncate.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <sys/types.h> #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/getaddrinfo.c b/otherlibs/unix/getaddrinfo.c index 34cf8280c..f79bdffff 100644 --- a/otherlibs/unix/getaddrinfo.c +++ b/otherlibs/unix/getaddrinfo.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/getcwd.c b/otherlibs/unix/getcwd.c index f3ff97114..8d1b8e50a 100644 --- a/otherlibs/unix/getcwd.c +++ b/otherlibs/unix/getcwd.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/getegid.c b/otherlibs/unix/getegid.c index 9c6097ef5..b1977ec91 100644 --- a/otherlibs/unix/getegid.c +++ b/otherlibs/unix/getegid.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/geteuid.c b/otherlibs/unix/geteuid.c index 55e076380..9bf897146 100644 --- a/otherlibs/unix/geteuid.c +++ b/otherlibs/unix/geteuid.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/getgid.c b/otherlibs/unix/getgid.c index a3039d56c..8cfe3ddba 100644 --- a/otherlibs/unix/getgid.c +++ b/otherlibs/unix/getgid.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/getgr.c b/otherlibs/unix/getgr.c index 7b212bd27..d1e610d85 100644 --- a/otherlibs/unix/getgr.c +++ b/otherlibs/unix/getgr.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <fail.h> #include <alloc.h> diff --git a/otherlibs/unix/getgroups.c b/otherlibs/unix/getgroups.c index 485fabc45..6d420b5e0 100644 --- a/otherlibs/unix/getgroups.c +++ b/otherlibs/unix/getgroups.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/gethost.c b/otherlibs/unix/gethost.c index b0b29d9e0..35a53f082 100644 --- a/otherlibs/unix/gethost.c +++ b/otherlibs/unix/gethost.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/gethostname.c b/otherlibs/unix/gethostname.c index 4aad09bd7..77b183cb3 100644 --- a/otherlibs/unix/gethostname.c +++ b/otherlibs/unix/gethostname.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/getlogin.c b/otherlibs/unix/getlogin.c index 60197a07b..27a508e02 100644 --- a/otherlibs/unix/getlogin.c +++ b/otherlibs/unix/getlogin.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include "unixsupport.h" diff --git a/otherlibs/unix/getnameinfo.c b/otherlibs/unix/getnameinfo.c index eea15c59c..d7dddb3fe 100644 --- a/otherlibs/unix/getnameinfo.c +++ b/otherlibs/unix/getnameinfo.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/getpeername.c b/otherlibs/unix/getpeername.c index 3c4da5567..9692202c5 100644 --- a/otherlibs/unix/getpeername.c +++ b/otherlibs/unix/getpeername.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fail.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/getpid.c b/otherlibs/unix/getpid.c index 5cc4f3a68..cf4c3f90c 100644 --- a/otherlibs/unix/getpid.c +++ b/otherlibs/unix/getpid.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/getppid.c b/otherlibs/unix/getppid.c index 2d1cd3949..616393b4a 100644 --- a/otherlibs/unix/getppid.c +++ b/otherlibs/unix/getppid.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/getproto.c b/otherlibs/unix/getproto.c index 2094ea251..291a71da5 100644 --- a/otherlibs/unix/getproto.c +++ b/otherlibs/unix/getproto.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/getpw.c b/otherlibs/unix/getpw.c index 4317dc202..8f0075d6f 100644 --- a/otherlibs/unix/getpw.c +++ b/otherlibs/unix/getpw.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <memory.h> diff --git a/otherlibs/unix/getserv.c b/otherlibs/unix/getserv.c index e1090e300..de91cbe05 100644 --- a/otherlibs/unix/getserv.c +++ b/otherlibs/unix/getserv.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/getsockname.c b/otherlibs/unix/getsockname.c index 8ab6debb0..69e20cccc 100644 --- a/otherlibs/unix/getsockname.c +++ b/otherlibs/unix/getsockname.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fail.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/gettimeofday.c b/otherlibs/unix/gettimeofday.c index 3e203d54e..f6a8615ed 100644 --- a/otherlibs/unix/gettimeofday.c +++ b/otherlibs/unix/gettimeofday.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/getuid.c b/otherlibs/unix/getuid.c index db3fab130..f51722a57 100644 --- a/otherlibs/unix/getuid.c +++ b/otherlibs/unix/getuid.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/gmtime.c b/otherlibs/unix/gmtime.c index b55d70f4d..c8f6ac11e 100644 --- a/otherlibs/unix/gmtime.c +++ b/otherlibs/unix/gmtime.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/initgroups.c b/otherlibs/unix/initgroups.c index d5b3dc568..e9541e5a4 100644 --- a/otherlibs/unix/initgroups.c +++ b/otherlibs/unix/initgroups.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/isatty.c b/otherlibs/unix/isatty.c index c2bdaad1c..800afc462 100644 --- a/otherlibs/unix/isatty.c +++ b/otherlibs/unix/isatty.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/itimer.c b/otherlibs/unix/itimer.c index 7c32783a9..537c2d9ed 100644 --- a/otherlibs/unix/itimer.c +++ b/otherlibs/unix/itimer.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/kill.c b/otherlibs/unix/kill.c index 715060ee7..b3f7d8878 100644 --- a/otherlibs/unix/kill.c +++ b/otherlibs/unix/kill.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <fail.h> #include "unixsupport.h" diff --git a/otherlibs/unix/link.c b/otherlibs/unix/link.c index e28f649ea..b5051cd96 100644 --- a/otherlibs/unix/link.c +++ b/otherlibs/unix/link.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/listen.c b/otherlibs/unix/listen.c index 503cf6a6a..26b0185bd 100644 --- a/otherlibs/unix/listen.c +++ b/otherlibs/unix/listen.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fail.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/lockf.c b/otherlibs/unix/lockf.c index 70359cf76..813a4f7f6 100644 --- a/otherlibs/unix/lockf.c +++ b/otherlibs/unix/lockf.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <errno.h> #include <fcntl.h> #include <fail.h> diff --git a/otherlibs/unix/lseek.c b/otherlibs/unix/lseek.c index 65d7d50e4..826d84f21 100644 --- a/otherlibs/unix/lseek.c +++ b/otherlibs/unix/lseek.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <errno.h> #include <sys/types.h> #include <mlvalues.h> diff --git a/otherlibs/unix/mkdir.c b/otherlibs/unix/mkdir.c index fd935ae67..0bb1f4f5f 100644 --- a/otherlibs/unix/mkdir.c +++ b/otherlibs/unix/mkdir.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <sys/types.h> #include <sys/stat.h> #include <mlvalues.h> diff --git a/otherlibs/unix/mkfifo.c b/otherlibs/unix/mkfifo.c index 30f247d90..ec3bed4bb 100644 --- a/otherlibs/unix/mkfifo.c +++ b/otherlibs/unix/mkfifo.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <sys/types.h> #include <sys/stat.h> #include <fail.h> diff --git a/otherlibs/unix/nice.c b/otherlibs/unix/nice.c index a0902f230..019e2d1c7 100644 --- a/otherlibs/unix/nice.c +++ b/otherlibs/unix/nice.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" #include <errno.h> diff --git a/otherlibs/unix/open.c b/otherlibs/unix/open.c index 214a550d3..e96cdc88c 100644 --- a/otherlibs/unix/open.c +++ b/otherlibs/unix/open.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <memory.h> diff --git a/otherlibs/unix/opendir.c b/otherlibs/unix/opendir.c index bb4825812..f70e708bd 100644 --- a/otherlibs/unix/opendir.c +++ b/otherlibs/unix/opendir.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include "unixsupport.h" diff --git a/otherlibs/unix/pipe.c b/otherlibs/unix/pipe.c index 81baeaf4e..7c6b1438a 100644 --- a/otherlibs/unix/pipe.c +++ b/otherlibs/unix/pipe.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include "unixsupport.h" diff --git a/otherlibs/unix/putenv.c b/otherlibs/unix/putenv.c index 1238ee2b6..28ad962f8 100644 --- a/otherlibs/unix/putenv.c +++ b/otherlibs/unix/putenv.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdlib.h> #include <string.h> diff --git a/otherlibs/unix/read.c b/otherlibs/unix/read.c index cd1eab8cf..3bbd0b47f 100644 --- a/otherlibs/unix/read.c +++ b/otherlibs/unix/read.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include <mlvalues.h> #include <memory.h> diff --git a/otherlibs/unix/readdir.c b/otherlibs/unix/readdir.c index 1d508ac6e..08dad1a06 100644 --- a/otherlibs/unix/readdir.c +++ b/otherlibs/unix/readdir.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <fail.h> #include <alloc.h> diff --git a/otherlibs/unix/readlink.c b/otherlibs/unix/readlink.c index 29d28d3d4..9534a42bd 100644 --- a/otherlibs/unix/readlink.c +++ b/otherlibs/unix/readlink.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/rename.c b/otherlibs/unix/rename.c index d121037f2..2d34a8833 100644 --- a/otherlibs/unix/rename.c +++ b/otherlibs/unix/rename.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/rewinddir.c b/otherlibs/unix/rewinddir.c index 7c7b4a3c8..17cc639f6 100644 --- a/otherlibs/unix/rewinddir.c +++ b/otherlibs/unix/rewinddir.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fail.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/rmdir.c b/otherlibs/unix/rmdir.c index 887496712..631b47c0e 100644 --- a/otherlibs/unix/rmdir.c +++ b/otherlibs/unix/rmdir.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/select.c b/otherlibs/unix/select.c index afbd92f1e..12d8cc55a 100644 --- a/otherlibs/unix/select.c +++ b/otherlibs/unix/select.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/sendrecv.c b/otherlibs/unix/sendrecv.c index 1f884aa87..679dde3c7 100644 --- a/otherlibs/unix/sendrecv.c +++ b/otherlibs/unix/sendrecv.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/setgid.c b/otherlibs/unix/setgid.c index a1096f26b..8e635aa48 100644 --- a/otherlibs/unix/setgid.c +++ b/otherlibs/unix/setgid.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/setgroups.c b/otherlibs/unix/setgroups.c index e681c9764..026c67632 100644 --- a/otherlibs/unix/setgroups.c +++ b/otherlibs/unix/setgroups.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/setsid.c b/otherlibs/unix/setsid.c index 9cc89e642..252b85c4b 100644 --- a/otherlibs/unix/setsid.c +++ b/otherlibs/unix/setsid.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fail.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/setuid.c b/otherlibs/unix/setuid.c index 4af0d781c..8a2a8074b 100644 --- a/otherlibs/unix/setuid.c +++ b/otherlibs/unix/setuid.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/shutdown.c b/otherlibs/unix/shutdown.c index abd8c0734..c428afbd8 100644 --- a/otherlibs/unix/shutdown.c +++ b/otherlibs/unix/shutdown.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fail.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/signals.c b/otherlibs/unix/signals.c index fb3acf00b..d4d97ef07 100644 --- a/otherlibs/unix/signals.c +++ b/otherlibs/unix/signals.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <errno.h> #include <signal.h> diff --git a/otherlibs/unix/sleep.c b/otherlibs/unix/sleep.c index aca1003c5..58affd394 100644 --- a/otherlibs/unix/sleep.c +++ b/otherlibs/unix/sleep.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <signals.h> #include "unixsupport.h" diff --git a/otherlibs/unix/socket.c b/otherlibs/unix/socket.c index 7243b8f15..9e23231a9 100644 --- a/otherlibs/unix/socket.c +++ b/otherlibs/unix/socket.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fail.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/socketaddr.c b/otherlibs/unix/socketaddr.c index caf83b785..24babcaba 100644 --- a/otherlibs/unix/socketaddr.c +++ b/otherlibs/unix/socketaddr.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/socketaddr.h b/otherlibs/unix/socketaddr.h index 7269633ef..cf25e2f99 100644 --- a/otherlibs/unix/socketaddr.h +++ b/otherlibs/unix/socketaddr.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "misc.h" #include <sys/types.h> #include <sys/socket.h> diff --git a/otherlibs/unix/socketpair.c b/otherlibs/unix/socketpair.c index 8a52dbb81..301ebf861 100644 --- a/otherlibs/unix/socketpair.c +++ b/otherlibs/unix/socketpair.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/sockopt.c b/otherlibs/unix/sockopt.c index 6b3bfa4a4..b6167ebf7 100644 --- a/otherlibs/unix/sockopt.c +++ b/otherlibs/unix/sockopt.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <memory.h> #include <alloc.h> diff --git a/otherlibs/unix/stat.c b/otherlibs/unix/stat.c index 17ae53c0b..a0f4c343d 100644 --- a/otherlibs/unix/stat.c +++ b/otherlibs/unix/stat.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <errno.h> #include <mlvalues.h> #include <memory.h> diff --git a/otherlibs/unix/strofaddr.c b/otherlibs/unix/strofaddr.c index 077dd9157..5381bc317 100644 --- a/otherlibs/unix/strofaddr.c +++ b/otherlibs/unix/strofaddr.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/symlink.c b/otherlibs/unix/symlink.c index b66c76bda..26c9aa43c 100644 --- a/otherlibs/unix/symlink.c +++ b/otherlibs/unix/symlink.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fail.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/termios.c b/otherlibs/unix/termios.c index 99cca2b64..493cab80a 100644 --- a/otherlibs/unix/termios.c +++ b/otherlibs/unix/termios.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/time.c b/otherlibs/unix/time.c index 63eac84eb..042a1f60c 100644 --- a/otherlibs/unix/time.c +++ b/otherlibs/unix/time.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <time.h> #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/times.c b/otherlibs/unix/times.c index 94abde8a6..8ab6006d4 100644 --- a/otherlibs/unix/times.c +++ b/otherlibs/unix/times.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <memory.h> diff --git a/otherlibs/unix/truncate.c b/otherlibs/unix/truncate.c index dfc350a32..638ef7994 100644 --- a/otherlibs/unix/truncate.c +++ b/otherlibs/unix/truncate.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <sys/types.h> #include <mlvalues.h> #include <fail.h> diff --git a/otherlibs/unix/umask.c b/otherlibs/unix/umask.c index cf5eaa7c0..311e4ed92 100644 --- a/otherlibs/unix/umask.c +++ b/otherlibs/unix/umask.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <sys/types.h> #include <sys/stat.h> #include <mlvalues.h> diff --git a/otherlibs/unix/unix.ml b/otherlibs/unix/unix.ml index 211de46ab..f06534a02 100644 --- a/otherlibs/unix/unix.ml +++ b/otherlibs/unix/unix.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type error = E2BIG | EACCES diff --git a/otherlibs/unix/unix.mli b/otherlibs/unix/unix.mli index aca5dafd7..0db1e7590 100644 --- a/otherlibs/unix/unix.mli +++ b/otherlibs/unix/unix.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Interface to the Unix system *) diff --git a/otherlibs/unix/unixLabels.ml b/otherlibs/unix/unixLabels.ml index 424fcc6e6..1bd410bda 100644 --- a/otherlibs/unix/unixLabels.ml +++ b/otherlibs/unix/unixLabels.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [UnixLabels]: labelled Unix module *) include Unix diff --git a/otherlibs/unix/unixLabels.mli b/otherlibs/unix/unixLabels.mli index 98a58f1b9..a3ecff936 100644 --- a/otherlibs/unix/unixLabels.mli +++ b/otherlibs/unix/unixLabels.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Interface to the Unix system. To use as replacement to default {!Unix} module, add [module Unix = UnixLabels] in your implementation. diff --git a/otherlibs/unix/unixsupport.c b/otherlibs/unix/unixsupport.c index 4c91adb10..15365f802 100644 --- a/otherlibs/unix/unixsupport.c +++ b/otherlibs/unix/unixsupport.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <callback.h> diff --git a/otherlibs/unix/unixsupport.h b/otherlibs/unix/unixsupport.h index c631ef150..4706355eb 100644 --- a/otherlibs/unix/unixsupport.h +++ b/otherlibs/unix/unixsupport.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifdef HAS_UNISTD #include <unistd.h> #endif diff --git a/otherlibs/unix/unlink.c b/otherlibs/unix/unlink.c index 3fb5151be..76ec91310 100644 --- a/otherlibs/unix/unlink.c +++ b/otherlibs/unix/unlink.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/utimes.c b/otherlibs/unix/utimes.c index a6a2f5ebc..825fc4cdf 100644 --- a/otherlibs/unix/utimes.c +++ b/otherlibs/unix/utimes.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fail.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/wait.c b/otherlibs/unix/wait.c index fc12e5ad5..81f368390 100644 --- a/otherlibs/unix/wait.c +++ b/otherlibs/unix/wait.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <fail.h> diff --git a/otherlibs/unix/write.c b/otherlibs/unix/write.c index ca42d1e75..d6fe40932 100644 --- a/otherlibs/unix/write.c +++ b/otherlibs/unix/write.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <errno.h> #include <string.h> #include <mlvalues.h> diff --git a/otherlibs/win32graph/Makefile.nt b/otherlibs/win32graph/Makefile.nt index 453d9f3c8..f09392ed7 100644 --- a/otherlibs/win32graph/Makefile.nt +++ b/otherlibs/win32graph/Makefile.nt @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - LIBNAME=graphics COBJS=open.$(O) draw.$(O) events.$(O) dib.$(O) CAMLOBJS=graphics.cmo diff --git a/otherlibs/win32graph/dib.c b/otherlibs/win32graph/dib.c index 8acba6f13..100beba39 100644 --- a/otherlibs/win32graph/dib.c +++ b/otherlibs/win32graph/dib.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - //----------------------------------------------------------------------------- // DIB.C // diff --git a/otherlibs/win32graph/draw.c b/otherlibs/win32graph/draw.c index f089a01a3..fc6cf1022 100644 --- a/otherlibs/win32graph/draw.c +++ b/otherlibs/win32graph/draw.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <math.h> #include "mlvalues.h" #include "alloc.h" diff --git a/otherlibs/win32graph/events.c b/otherlibs/win32graph/events.c index 29def467f..81242729e 100755 --- a/otherlibs/win32graph/events.c +++ b/otherlibs/win32graph/events.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "mlvalues.h" #include "alloc.h" #include "libgraph.h" diff --git a/otherlibs/win32graph/libgraph.h b/otherlibs/win32graph/libgraph.h index bae4b1162..99ede9952 100644 --- a/otherlibs/win32graph/libgraph.h +++ b/otherlibs/win32graph/libgraph.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <windows.h> #include <windowsx.h> diff --git a/otherlibs/win32graph/open.c b/otherlibs/win32graph/open.c index a6bc59d45..e44a5760d 100644 --- a/otherlibs/win32graph/open.c +++ b/otherlibs/win32graph/open.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <fcntl.h> #include <signal.h> #include "mlvalues.h" diff --git a/otherlibs/win32unix/Makefile.nt b/otherlibs/win32unix/Makefile.nt index a1567352c..77555b2c7 100644 --- a/otherlibs/win32unix/Makefile.nt +++ b/otherlibs/win32unix/Makefile.nt @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - # Files in this directory WIN_FILES = accept.c bind.c channels.c close.c \ close_on.c connect.c createprocess.c dup.c dup2.c errmsg.c \ diff --git a/otherlibs/win32unix/accept.c b/otherlibs/win32unix/accept.c index 8782af3de..f2e14467a 100644 --- a/otherlibs/win32unix/accept.c +++ b/otherlibs/win32unix/accept.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <memory.h> diff --git a/otherlibs/win32unix/bind.c b/otherlibs/win32unix/bind.c index 84d07570c..bc0923089 100644 --- a/otherlibs/win32unix/bind.c +++ b/otherlibs/win32unix/bind.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" #include "socketaddr.h" diff --git a/otherlibs/win32unix/channels.c b/otherlibs/win32unix/channels.c index ea3912720..1e7e823ac 100644 --- a/otherlibs/win32unix/channels.c +++ b/otherlibs/win32unix/channels.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <io.h> diff --git a/otherlibs/win32unix/close.c b/otherlibs/win32unix/close.c index f7463690b..20b131b05 100644 --- a/otherlibs/win32unix/close.c +++ b/otherlibs/win32unix/close.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" #include <io.h> diff --git a/otherlibs/win32unix/close_on.c b/otherlibs/win32unix/close_on.c index 34ccdb149..9ba342ed0 100644 --- a/otherlibs/win32unix/close_on.c +++ b/otherlibs/win32unix/close_on.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" #include <windows.h> diff --git a/otherlibs/win32unix/connect.c b/otherlibs/win32unix/connect.c index bd342a2ea..190eb742a 100644 --- a/otherlibs/win32unix/connect.c +++ b/otherlibs/win32unix/connect.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <signals.h> #include "unixsupport.h" diff --git a/otherlibs/win32unix/createprocess.c b/otherlibs/win32unix/createprocess.c index 460a985c6..4e32cb19c 100644 --- a/otherlibs/win32unix/createprocess.c +++ b/otherlibs/win32unix/createprocess.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" #include <windows.h> diff --git a/otherlibs/win32unix/dup.c b/otherlibs/win32unix/dup.c index a86211bbb..76cbdf670 100644 --- a/otherlibs/win32unix/dup.c +++ b/otherlibs/win32unix/dup.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/win32unix/dup2.c b/otherlibs/win32unix/dup2.c index f224fc54e..5f19710c3 100644 --- a/otherlibs/win32unix/dup2.c +++ b/otherlibs/win32unix/dup2.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/win32unix/errmsg.c b/otherlibs/win32unix/errmsg.c index 1f07e514f..c3bc19c6b 100644 --- a/otherlibs/win32unix/errmsg.c +++ b/otherlibs/win32unix/errmsg.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <errno.h> #include <string.h> diff --git a/otherlibs/win32unix/getpeername.c b/otherlibs/win32unix/getpeername.c index 8517f5467..ad6674bf6 100644 --- a/otherlibs/win32unix/getpeername.c +++ b/otherlibs/win32unix/getpeername.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" #include "socketaddr.h" diff --git a/otherlibs/win32unix/getpid.c b/otherlibs/win32unix/getpid.c index 677acdc55..65c8828a1 100644 --- a/otherlibs/win32unix/getpid.c +++ b/otherlibs/win32unix/getpid.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/win32unix/getsockname.c b/otherlibs/win32unix/getsockname.c index 3af6c3412..1e28f4b22 100644 --- a/otherlibs/win32unix/getsockname.c +++ b/otherlibs/win32unix/getsockname.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" #include "socketaddr.h" diff --git a/otherlibs/win32unix/gettimeofday.c b/otherlibs/win32unix/gettimeofday.c index 2bccdeb32..573821fd7 100644 --- a/otherlibs/win32unix/gettimeofday.c +++ b/otherlibs/win32unix/gettimeofday.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <time.h> diff --git a/otherlibs/win32unix/link.c b/otherlibs/win32unix/link.c index 11f6d37ca..97748ba2c 100644 --- a/otherlibs/win32unix/link.c +++ b/otherlibs/win32unix/link.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <fail.h> #include "unixsupport.h" diff --git a/otherlibs/win32unix/listen.c b/otherlibs/win32unix/listen.c index 402247fd0..9602a3736 100644 --- a/otherlibs/win32unix/listen.c +++ b/otherlibs/win32unix/listen.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/win32unix/lockf.c b/otherlibs/win32unix/lockf.c index 1a47824dc..3c9d135b7 100644 --- a/otherlibs/win32unix/lockf.c +++ b/otherlibs/win32unix/lockf.c @@ -13,8 +13,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <errno.h> #include <fcntl.h> #include <mlvalues.h> diff --git a/otherlibs/win32unix/lseek.c b/otherlibs/win32unix/lseek.c index 86ea537dc..5306331c6 100644 --- a/otherlibs/win32unix/lseek.c +++ b/otherlibs/win32unix/lseek.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include "unixsupport.h" diff --git a/otherlibs/win32unix/mkdir.c b/otherlibs/win32unix/mkdir.c index d47d7a28b..998b32baf 100644 --- a/otherlibs/win32unix/mkdir.c +++ b/otherlibs/win32unix/mkdir.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/win32unix/nonblock.c b/otherlibs/win32unix/nonblock.c index 1f2550b05..a9aaeca5c 100755 --- a/otherlibs/win32unix/nonblock.c +++ b/otherlibs/win32unix/nonblock.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <signals.h> #include "unixsupport.h" diff --git a/otherlibs/win32unix/open.c b/otherlibs/win32unix/open.c index 74fe8fc92..40ea34b63 100644 --- a/otherlibs/win32unix/open.c +++ b/otherlibs/win32unix/open.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include "unixsupport.h" diff --git a/otherlibs/win32unix/pipe.c b/otherlibs/win32unix/pipe.c index ca0df3699..fe553778a 100644 --- a/otherlibs/win32unix/pipe.c +++ b/otherlibs/win32unix/pipe.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <memory.h> #include <alloc.h> diff --git a/otherlibs/win32unix/read.c b/otherlibs/win32unix/read.c index c885857bf..e7a2b38d7 100644 --- a/otherlibs/win32unix/read.c +++ b/otherlibs/win32unix/read.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <string.h> #include <mlvalues.h> #include <memory.h> diff --git a/otherlibs/win32unix/rename.c b/otherlibs/win32unix/rename.c index 6b750eba3..b8c0f3edc 100644 --- a/otherlibs/win32unix/rename.c +++ b/otherlibs/win32unix/rename.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/win32unix/select.c b/otherlibs/win32unix/select.c index 6d7961bb3..9f06024f9 100644 --- a/otherlibs/win32unix/select.c +++ b/otherlibs/win32unix/select.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <memory.h> diff --git a/otherlibs/win32unix/sendrecv.c b/otherlibs/win32unix/sendrecv.c index 0ee96c3dd..f2745fb19 100644 --- a/otherlibs/win32unix/sendrecv.c +++ b/otherlibs/win32unix/sendrecv.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <memory.h> diff --git a/otherlibs/win32unix/shutdown.c b/otherlibs/win32unix/shutdown.c index dd4e7ed34..2d5707a35 100644 --- a/otherlibs/win32unix/shutdown.c +++ b/otherlibs/win32unix/shutdown.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/win32unix/sleep.c b/otherlibs/win32unix/sleep.c index 682096728..28e60e40a 100644 --- a/otherlibs/win32unix/sleep.c +++ b/otherlibs/win32unix/sleep.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <signals.h> #include "unixsupport.h" diff --git a/otherlibs/win32unix/socket.c b/otherlibs/win32unix/socket.c index 27fc55fcf..ad8165b29 100644 --- a/otherlibs/win32unix/socket.c +++ b/otherlibs/win32unix/socket.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include "unixsupport.h" #include <mswsock.h> // for SO_OPENTYPE and SO_SYNCHRONOUS_NONALERT diff --git a/otherlibs/win32unix/socketaddr.h b/otherlibs/win32unix/socketaddr.h index a78f8a698..fde691ec6 100644 --- a/otherlibs/win32unix/socketaddr.h +++ b/otherlibs/win32unix/socketaddr.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "misc.h" union sock_addr_union { diff --git a/otherlibs/win32unix/sockopt.c b/otherlibs/win32unix/sockopt.c index 94a6c0402..eefa9a309 100644 --- a/otherlibs/win32unix/sockopt.c +++ b/otherlibs/win32unix/sockopt.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <errno.h> #include <mlvalues.h> #include <memory.h> diff --git a/otherlibs/win32unix/stat.c b/otherlibs/win32unix/stat.c index 08ad397ca..56b45d037 100644 --- a/otherlibs/win32unix/stat.c +++ b/otherlibs/win32unix/stat.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <errno.h> #include <mlvalues.h> #include <memory.h> diff --git a/otherlibs/win32unix/system.c b/otherlibs/win32unix/system.c index 8abfa6f88..13d5658e6 100644 --- a/otherlibs/win32unix/system.c +++ b/otherlibs/win32unix/system.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <memory.h> #include <alloc.h> diff --git a/otherlibs/win32unix/unix.ml b/otherlibs/win32unix/unix.ml index 0b269e828..a8a3dcc2a 100644 --- a/otherlibs/win32unix/unix.ml +++ b/otherlibs/win32unix/unix.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Initialization *) external startup: unit -> unit = "win_startup" diff --git a/otherlibs/win32unix/unixsupport.c b/otherlibs/win32unix/unixsupport.c index f6431955b..b32606070 100644 --- a/otherlibs/win32unix/unixsupport.c +++ b/otherlibs/win32unix/unixsupport.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stddef.h> #include <mlvalues.h> #include <callback.h> diff --git a/otherlibs/win32unix/unixsupport.h b/otherlibs/win32unix/unixsupport.h index 5a3f4505f..b8f8acad5 100644 --- a/otherlibs/win32unix/unixsupport.h +++ b/otherlibs/win32unix/unixsupport.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #define WIN32_LEAN_AND_MEAN #include <wtypes.h> #include <winbase.h> diff --git a/otherlibs/win32unix/windbug.c b/otherlibs/win32unix/windbug.c index 0cab906a2..a5e0d649f 100644 --- a/otherlibs/win32unix/windbug.c +++ b/otherlibs/win32unix/windbug.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include "windbug.h" int debug_test (void) diff --git a/otherlibs/win32unix/windbug.h b/otherlibs/win32unix/windbug.h index efaeffc01..a1892ec8e 100644 --- a/otherlibs/win32unix/windbug.h +++ b/otherlibs/win32unix/windbug.h @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifdef DEBUG #include <stdio.h> diff --git a/otherlibs/win32unix/windir.c b/otherlibs/win32unix/windir.c index 240b863b2..7a08e510a 100644 --- a/otherlibs/win32unix/windir.c +++ b/otherlibs/win32unix/windir.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <memory.h> #include <errno.h> diff --git a/otherlibs/win32unix/winlist.c b/otherlibs/win32unix/winlist.c index bbb2e7cff..3c80b334c 100644 --- a/otherlibs/win32unix/winlist.c +++ b/otherlibs/win32unix/winlist.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Basic list function in C. */ #include "winlist.h" diff --git a/otherlibs/win32unix/winlist.h b/otherlibs/win32unix/winlist.h index 1f0a8435a..8b35c5516 100644 --- a/otherlibs/win32unix/winlist.h +++ b/otherlibs/win32unix/winlist.h @@ -11,7 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ #ifndef _WINLIST_H #define _WINLIST_H diff --git a/otherlibs/win32unix/winwait.c b/otherlibs/win32unix/winwait.c index 4eb0fda45..0436072f1 100644 --- a/otherlibs/win32unix/winwait.c +++ b/otherlibs/win32unix/winwait.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <memory.h> diff --git a/otherlibs/win32unix/winworker.c b/otherlibs/win32unix/winworker.c index 9abec6988..4f126b7c7 100644 --- a/otherlibs/win32unix/winworker.c +++ b/otherlibs/win32unix/winworker.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <mlvalues.h> #include <alloc.h> #include <memory.h> diff --git a/otherlibs/win32unix/winworker.h b/otherlibs/win32unix/winworker.h index 527d22060..cb9bf4f8d 100644 --- a/otherlibs/win32unix/winworker.h +++ b/otherlibs/win32unix/winworker.h @@ -11,7 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ #ifndef _WINWORKER_H #define _WINWORKER_H diff --git a/otherlibs/win32unix/write.c b/otherlibs/win32unix/write.c index 46d75ccba..65f82ccb5 100644 --- a/otherlibs/win32unix/write.c +++ b/otherlibs/win32unix/write.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <errno.h> #include <string.h> #include <mlvalues.h> diff --git a/parsing/asttypes.mli b/parsing/asttypes.mli index ecdfcc5fd..fb6d5ba09 100644 --- a/parsing/asttypes.mli +++ b/parsing/asttypes.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Auxiliary a.s.t. types used by parsetree and typedtree. *) type constant = diff --git a/parsing/lexer.mli b/parsing/lexer.mli index d3dc035fe..0c98ffc34 100644 --- a/parsing/lexer.mli +++ b/parsing/lexer.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The lexical analyzer *) val init : unit -> unit diff --git a/parsing/lexer.mll b/parsing/lexer.mll index 9eb85d76b..134376ba1 100644 --- a/parsing/lexer.mll +++ b/parsing/lexer.mll @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The lexer definition *) { diff --git a/parsing/location.ml b/parsing/location.ml index 5141534fc..4d6449ded 100644 --- a/parsing/location.ml +++ b/parsing/location.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Lexing let absname = ref false diff --git a/parsing/location.mli b/parsing/location.mli index dd6a890cc..bae909020 100644 --- a/parsing/location.mli +++ b/parsing/location.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Source code locations (ranges of positions), used in parsetree. *) open Format diff --git a/parsing/longident.ml b/parsing/longident.ml index 612f9df19..706881af3 100644 --- a/parsing/longident.ml +++ b/parsing/longident.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type t = Lident of string | Ldot of t * string diff --git a/parsing/longident.mli b/parsing/longident.mli index a802049b9..9e7958550 100644 --- a/parsing/longident.mli +++ b/parsing/longident.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Long identifiers, used in parsetree. *) type t = diff --git a/parsing/parse.ml b/parsing/parse.ml index 32066db32..aef957d64 100644 --- a/parsing/parse.ml +++ b/parsing/parse.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Entry points in the parser *) (* Skip tokens to the end of the phrase *) diff --git a/parsing/parse.mli b/parsing/parse.mli index 85e08bc48..abdde31cf 100644 --- a/parsing/parse.mli +++ b/parsing/parse.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Entry points in the parser *) val implementation : Lexing.lexbuf -> Parsetree.structure diff --git a/parsing/parser.mly b/parsing/parser.mly index 358841a7f..6dc5f10b1 100644 --- a/parsing/parser.mly +++ b/parsing/parser.mly @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* The parser definition */ %{ diff --git a/parsing/parsetree.mli b/parsing/parsetree.mli index eeca81acf..5a96d5aba 100644 --- a/parsing/parsetree.mli +++ b/parsing/parsetree.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Abstract syntax tree produced by parsing *) open Asttypes diff --git a/parsing/printast.ml b/parsing/printast.ml index 6507be458..233c48ec7 100644 --- a/parsing/printast.ml +++ b/parsing/printast.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Asttypes;; open Format;; open Lexing;; diff --git a/parsing/printast.mli b/parsing/printast.mli index 096f46172..a941da9e4 100644 --- a/parsing/printast.mli +++ b/parsing/printast.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Parsetree;; open Format;; diff --git a/parsing/syntaxerr.ml b/parsing/syntaxerr.ml index f18e3281d..bd5fafb25 100644 --- a/parsing/syntaxerr.ml +++ b/parsing/syntaxerr.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Auxiliary type for reporting syntax errors *) open Format diff --git a/parsing/syntaxerr.mli b/parsing/syntaxerr.mli index c2f9eb07c..08de06de6 100644 --- a/parsing/syntaxerr.mli +++ b/parsing/syntaxerr.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Auxiliary type for reporting syntax errors *) open Format diff --git a/stdlib/Compflags b/stdlib/Compflags index 80bb1b667..283c7402f 100755 --- a/stdlib/Compflags +++ b/stdlib/Compflags @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - case $1 in pervasives.cm[iox]|pervasives.p.cmx) echo ' -nopervasives';; camlinternalOO.cmi) echo ' -nopervasives';; diff --git a/stdlib/Makefile b/stdlib/Makefile index 2c8e06706..2796d2f18 100644 --- a/stdlib/Makefile +++ b/stdlib/Makefile @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - include Makefile.shared allopt: stdlib.cmxa std_exit.cmx allopt-$(PROFILING) diff --git a/stdlib/Makefile.nt b/stdlib/Makefile.nt index 579391a77..b85622b90 100644 --- a/stdlib/Makefile.nt +++ b/stdlib/Makefile.nt @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - include Makefile.shared allopt: stdlib.cmxa std_exit.cmx diff --git a/stdlib/Makefile.shared b/stdlib/Makefile.shared index 9f81ef25f..e9d5940a9 100755 --- a/stdlib/Makefile.shared +++ b/stdlib/Makefile.shared @@ -11,8 +11,6 @@ # # ######################################################################### -# $Id$ - include ../config/Makefile RUNTIME=../boot/ocamlrun COMPILER=../ocamlc diff --git a/stdlib/StdlibModules b/stdlib/StdlibModules index 926e2cb51..c5c8896ed 100644 --- a/stdlib/StdlibModules +++ b/stdlib/StdlibModules @@ -13,8 +13,6 @@ # # ######################################################################### -# $Id$ - # This file lists all standard library modules. # It is used in particular to know what to expunge in toplevels. diff --git a/stdlib/arg.ml b/stdlib/arg.ml index 30364f5c4..0602f6103 100644 --- a/stdlib/arg.ml +++ b/stdlib/arg.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type key = string type doc = string type usage_msg = string diff --git a/stdlib/arg.mli b/stdlib/arg.mli index d6e0210aa..2164e624c 100644 --- a/stdlib/arg.mli +++ b/stdlib/arg.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Parsing of command line arguments. This module provides a general mechanism for extracting options and diff --git a/stdlib/array.ml b/stdlib/array.ml index d17582a43..ec633ea1f 100644 --- a/stdlib/array.ml +++ b/stdlib/array.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Array operations *) external length : 'a array -> int = "%array_length" diff --git a/stdlib/array.mli b/stdlib/array.mli index db1f469d0..6913e2eb6 100644 --- a/stdlib/array.mli +++ b/stdlib/array.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Array operations. *) external length : 'a array -> int = "%array_length" diff --git a/stdlib/arrayLabels.ml b/stdlib/arrayLabels.ml index 652f4cac4..39b4bde7f 100644 --- a/stdlib/arrayLabels.ml +++ b/stdlib/arrayLabels.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [ArrayLabels]: labelled Array module *) include Array diff --git a/stdlib/arrayLabels.mli b/stdlib/arrayLabels.mli index 308bfa4e1..03b6224ae 100644 --- a/stdlib/arrayLabels.mli +++ b/stdlib/arrayLabels.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Array operations. *) external length : 'a array -> int = "%array_length" diff --git a/stdlib/buffer.ml b/stdlib/buffer.ml index 541717ade..ff30f9fcd 100644 --- a/stdlib/buffer.ml +++ b/stdlib/buffer.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Extensible buffers *) type t = diff --git a/stdlib/buffer.mli b/stdlib/buffer.mli index ce70c983e..c50c98792 100644 --- a/stdlib/buffer.mli +++ b/stdlib/buffer.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Extensible string buffers. This module implements string buffers that automatically expand diff --git a/stdlib/callback.ml b/stdlib/callback.ml index 5dd789484..34e7304f7 100644 --- a/stdlib/callback.ml +++ b/stdlib/callback.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Registering OCaml values with the C runtime for later callbacks *) external register_named_value : string -> Obj.t -> unit diff --git a/stdlib/callback.mli b/stdlib/callback.mli index c536bf8d5..de0d18373 100644 --- a/stdlib/callback.mli +++ b/stdlib/callback.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Registering OCaml values with the C runtime. This module allows OCaml values to be registered with the C runtime diff --git a/stdlib/camlinternalLazy.ml b/stdlib/camlinternalLazy.ml index 042a377c9..5210c0293 100644 --- a/stdlib/camlinternalLazy.ml +++ b/stdlib/camlinternalLazy.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Internals of forcing lazy values. *) exception Undefined;; diff --git a/stdlib/camlinternalLazy.mli b/stdlib/camlinternalLazy.mli index eef1c9d6f..27f87d14d 100644 --- a/stdlib/camlinternalLazy.mli +++ b/stdlib/camlinternalLazy.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Run-time support for lazy values. All functions in this module are for system use only, not for the casual user. *) diff --git a/stdlib/camlinternalMod.ml b/stdlib/camlinternalMod.ml index 36d73bdcf..20a65207f 100644 --- a/stdlib/camlinternalMod.ml +++ b/stdlib/camlinternalMod.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type shape = | Function | Lazy diff --git a/stdlib/camlinternalMod.mli b/stdlib/camlinternalMod.mli index bc59f1956..4ec4fde1f 100644 --- a/stdlib/camlinternalMod.mli +++ b/stdlib/camlinternalMod.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Run-time support for recursive modules. All functions in this module are for system use only, not for the casual user. *) diff --git a/stdlib/camlinternalOO.ml b/stdlib/camlinternalOO.ml index 1abb7e550..76e25cfbc 100644 --- a/stdlib/camlinternalOO.ml +++ b/stdlib/camlinternalOO.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Obj (**** Object representation ****) diff --git a/stdlib/camlinternalOO.mli b/stdlib/camlinternalOO.mli index f02b02036..afbe61bb9 100644 --- a/stdlib/camlinternalOO.mli +++ b/stdlib/camlinternalOO.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Run-time support for objects and classes. All functions in this module are for system use only, not for the casual user. *) diff --git a/stdlib/char.ml b/stdlib/char.ml index 6dafbad2b..15c463542 100644 --- a/stdlib/char.ml +++ b/stdlib/char.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Character operations *) external code: char -> int = "%identity" diff --git a/stdlib/char.mli b/stdlib/char.mli index 05a8156d3..d1baa64d3 100644 --- a/stdlib/char.mli +++ b/stdlib/char.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Character operations. *) external code : char -> int = "%identity" diff --git a/stdlib/complex.ml b/stdlib/complex.ml index c52e647cc..6d71d46af 100644 --- a/stdlib/complex.ml +++ b/stdlib/complex.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Complex numbers *) type t = { re: float; im: float } diff --git a/stdlib/complex.mli b/stdlib/complex.mli index 1bfa8b7bc..645aa9314 100644 --- a/stdlib/complex.mli +++ b/stdlib/complex.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Complex numbers. This module provides arithmetic operations on complex numbers. diff --git a/stdlib/digest.ml b/stdlib/digest.ml index 38df61a03..aee6cd26c 100644 --- a/stdlib/digest.ml +++ b/stdlib/digest.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Message digest (MD5) *) type t = string diff --git a/stdlib/digest.mli b/stdlib/digest.mli index efc0a4773..a8d024b3c 100644 --- a/stdlib/digest.mli +++ b/stdlib/digest.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** MD5 message digest. This module provides functions to compute 128-bit ``digests'' of diff --git a/stdlib/filename.ml b/stdlib/filename.ml index 89a349df3..3edcb927a 100644 --- a/stdlib/filename.ml +++ b/stdlib/filename.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - let generic_quote quotequote s = let l = String.length s in let b = Buffer.create (l + 20) in diff --git a/stdlib/filename.mli b/stdlib/filename.mli index 499e8bb29..b275ebbbd 100644 --- a/stdlib/filename.mli +++ b/stdlib/filename.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Operations on file names. *) val current_dir_name : string diff --git a/stdlib/format.ml b/stdlib/format.ml index 445e82420..9fa4785e0 100644 --- a/stdlib/format.ml +++ b/stdlib/format.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* A pretty-printing facility and definition of formatters for ``parallel'' (i.e. unrelated or independent) pretty-printing on multiple out channels. *) diff --git a/stdlib/format.mli b/stdlib/format.mli index b44f79fad..a594ed54f 100644 --- a/stdlib/format.mli +++ b/stdlib/format.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Pretty printing. This module implements a pretty-printing facility to format text diff --git a/stdlib/gc.ml b/stdlib/gc.ml index 16a354a35..39bf343db 100644 --- a/stdlib/gc.ml +++ b/stdlib/gc.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type stat = { minor_words : float; promoted_words : float; diff --git a/stdlib/gc.mli b/stdlib/gc.mli index 45d882f25..5437ac0a4 100644 --- a/stdlib/gc.mli +++ b/stdlib/gc.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Memory management control and statistics; finalised values. *) type stat = diff --git a/stdlib/genlex.ml b/stdlib/genlex.ml index 1c6276c9f..36e10d49a 100644 --- a/stdlib/genlex.ml +++ b/stdlib/genlex.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type token = Kwd of string | Ident of string diff --git a/stdlib/genlex.mli b/stdlib/genlex.mli index b1098f097..7a34579aa 100644 --- a/stdlib/genlex.mli +++ b/stdlib/genlex.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** A generic lexical analyzer. diff --git a/stdlib/hashtbl.ml b/stdlib/hashtbl.ml index 80a039959..4480f8fce 100644 --- a/stdlib/hashtbl.ml +++ b/stdlib/hashtbl.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Hash tables *) external seeded_hash_param : int -> int -> int -> 'a -> int = "caml_hash" "noalloc" diff --git a/stdlib/hashtbl.mli b/stdlib/hashtbl.mli index 00d9efca3..bb75751fe 100644 --- a/stdlib/hashtbl.mli +++ b/stdlib/hashtbl.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Hash tables and hash functions. Hash tables are hashed association tables, with in-place modification. diff --git a/stdlib/header.c b/stdlib/header.c index c82c7bc7f..cb3d9953a 100644 --- a/stdlib/header.c +++ b/stdlib/header.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* The launcher for bytecode executables (if #! is not working) */ #include <stdio.h> diff --git a/stdlib/headernt.c b/stdlib/headernt.c index 9972d5d5c..bb04dbea8 100644 --- a/stdlib/headernt.c +++ b/stdlib/headernt.c @@ -11,8 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #define STRICT #define WIN32_LEAN_AND_MEAN diff --git a/stdlib/int32.ml b/stdlib/int32.ml index 15237d7f4..e8e55ddc8 100644 --- a/stdlib/int32.ml +++ b/stdlib/int32.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [Int32]: 32-bit integers *) external neg : int32 -> int32 = "%int32_neg" diff --git a/stdlib/int32.mli b/stdlib/int32.mli index 8bc7384ff..c727b1a94 100644 --- a/stdlib/int32.mli +++ b/stdlib/int32.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** 32-bit integers. This module provides operations on the type [int32] diff --git a/stdlib/int64.ml b/stdlib/int64.ml index d8b1c3ca3..aa4add5f1 100644 --- a/stdlib/int64.ml +++ b/stdlib/int64.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [Int64]: 64-bit integers *) external neg : int64 -> int64 = "%int64_neg" diff --git a/stdlib/int64.mli b/stdlib/int64.mli index 1f28f5c49..ab3b81077 100644 --- a/stdlib/int64.mli +++ b/stdlib/int64.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** 64-bit integers. This module provides operations on the type [int64] of diff --git a/stdlib/lazy.ml b/stdlib/lazy.ml index 6a114245e..590be8fe9 100644 --- a/stdlib/lazy.ml +++ b/stdlib/lazy.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [Lazy]: deferred computations *) diff --git a/stdlib/lazy.mli b/stdlib/lazy.mli index 9d720d2bb..6108a715c 100644 --- a/stdlib/lazy.mli +++ b/stdlib/lazy.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Deferred computations. *) type 'a t = 'a lazy_t;; diff --git a/stdlib/lexing.ml b/stdlib/lexing.ml index 4d03ec088..53748ad86 100644 --- a/stdlib/lexing.ml +++ b/stdlib/lexing.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The run-time library for lexers generated by camllex *) type position = { diff --git a/stdlib/lexing.mli b/stdlib/lexing.mli index a1a069016..6d5406d69 100644 --- a/stdlib/lexing.mli +++ b/stdlib/lexing.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The run-time library for lexers generated by [ocamllex]. *) (** {6 Positions} *) diff --git a/stdlib/list.ml b/stdlib/list.ml index aea05b4bf..b7dd8269a 100644 --- a/stdlib/list.ml +++ b/stdlib/list.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* List operations *) let rec length_aux len = function diff --git a/stdlib/list.mli b/stdlib/list.mli index 855699d05..33a9144d4 100644 --- a/stdlib/list.mli +++ b/stdlib/list.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** List operations. Some functions are flagged as not tail-recursive. A tail-recursive diff --git a/stdlib/listLabels.ml b/stdlib/listLabels.ml index 62b6e3768..1f0684bfc 100644 --- a/stdlib/listLabels.ml +++ b/stdlib/listLabels.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [ListLabels]: labelled List module *) include List diff --git a/stdlib/listLabels.mli b/stdlib/listLabels.mli index b4b58045b..8cf651471 100644 --- a/stdlib/listLabels.mli +++ b/stdlib/listLabels.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** List operations. Some functions are flagged as not tail-recursive. A tail-recursive diff --git a/stdlib/map.ml b/stdlib/map.ml index 78b76b025..5695fa56c 100644 --- a/stdlib/map.ml +++ b/stdlib/map.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - module type OrderedType = sig type t diff --git a/stdlib/map.mli b/stdlib/map.mli index a6374dbdf..6dd371b52 100644 --- a/stdlib/map.mli +++ b/stdlib/map.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Association tables over ordered types. This module implements applicative association tables, also known as diff --git a/stdlib/marshal.ml b/stdlib/marshal.ml index 638f05434..987aced23 100644 --- a/stdlib/marshal.ml +++ b/stdlib/marshal.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type extern_flags = No_sharing | Closures diff --git a/stdlib/marshal.mli b/stdlib/marshal.mli index 86e1ebd19..81a643f9e 100644 --- a/stdlib/marshal.mli +++ b/stdlib/marshal.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Marshaling of data structures. This module provides functions to encode arbitrary data structures diff --git a/stdlib/moreLabels.ml b/stdlib/moreLabels.ml index 3fda7a5b3..d7ac15894 100644 --- a/stdlib/moreLabels.ml +++ b/stdlib/moreLabels.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [MoreLabels]: meta-module for compatibility labelled libraries *) module Hashtbl = Hashtbl diff --git a/stdlib/moreLabels.mli b/stdlib/moreLabels.mli index a004bdb5b..5037ce484 100644 --- a/stdlib/moreLabels.mli +++ b/stdlib/moreLabels.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Extra labeled libraries. This meta-module provides labelized version of the {!Hashtbl}, diff --git a/stdlib/nativeint.ml b/stdlib/nativeint.ml index 4bba76d56..94c4b9490 100644 --- a/stdlib/nativeint.ml +++ b/stdlib/nativeint.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [Nativeint]: processor-native integers *) external neg: nativeint -> nativeint = "%nativeint_neg" diff --git a/stdlib/nativeint.mli b/stdlib/nativeint.mli index 7de11ea00..aa788f03c 100644 --- a/stdlib/nativeint.mli +++ b/stdlib/nativeint.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Processor-native integers. This module provides operations on the type [nativeint] of diff --git a/stdlib/obj.ml b/stdlib/obj.ml index 96de162f6..a6f11586e 100644 --- a/stdlib/obj.ml +++ b/stdlib/obj.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Operations on internal representations of values *) type t diff --git a/stdlib/obj.mli b/stdlib/obj.mli index 9b66723b2..9a5bd721d 100644 --- a/stdlib/obj.mli +++ b/stdlib/obj.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Operations on internal representations of values. Not for the casual user. diff --git a/stdlib/oo.ml b/stdlib/oo.ml index 40c8ae6e4..9d00360c7 100644 --- a/stdlib/oo.ml +++ b/stdlib/oo.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - let copy = CamlinternalOO.copy external id : < .. > -> int = "%field1" let new_method = CamlinternalOO.public_method_label diff --git a/stdlib/oo.mli b/stdlib/oo.mli index 2a9eb2320..d1e5804f4 100644 --- a/stdlib/oo.mli +++ b/stdlib/oo.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Operations on objects *) val copy : (< .. > as 'a) -> 'a diff --git a/stdlib/parsing.ml b/stdlib/parsing.ml index a10ffe2c1..b78331152 100644 --- a/stdlib/parsing.ml +++ b/stdlib/parsing.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The parsing engine *) open Lexing diff --git a/stdlib/parsing.mli b/stdlib/parsing.mli index f48824599..0532be162 100644 --- a/stdlib/parsing.mli +++ b/stdlib/parsing.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The run-time library for parsers generated by [ocamlyacc]. *) val symbol_start : unit -> int diff --git a/stdlib/pervasives.ml b/stdlib/pervasives.ml index 17a1a9c1a..dc767fe48 100644 --- a/stdlib/pervasives.ml +++ b/stdlib/pervasives.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* type 'a option = None | Some of 'a *) (* Exceptions *) diff --git a/stdlib/pervasives.mli b/stdlib/pervasives.mli index a131063ec..a1356463b 100644 --- a/stdlib/pervasives.mli +++ b/stdlib/pervasives.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** The initially opened module. This module provides the basic operations over the built-in types diff --git a/stdlib/printexc.ml b/stdlib/printexc.ml index 828557689..428396247 100644 --- a/stdlib/printexc.ml +++ b/stdlib/printexc.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Printf;; let printers = ref [] diff --git a/stdlib/printexc.mli b/stdlib/printexc.mli index 93ee5d6d1..829530fac 100644 --- a/stdlib/printexc.mli +++ b/stdlib/printexc.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Facilities for printing exceptions. *) val to_string: exn -> string diff --git a/stdlib/printf.ml b/stdlib/printf.ml index 567949064..349f6e364 100644 --- a/stdlib/printf.ml +++ b/stdlib/printf.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - external format_float: string -> float -> string = "caml_format_float" external format_int: string -> int -> string diff --git a/stdlib/printf.mli b/stdlib/printf.mli index f7dca62d6..d635225ac 100644 --- a/stdlib/printf.mli +++ b/stdlib/printf.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Formatted output functions. *) val fprintf : out_channel -> ('a, out_channel, unit) format -> 'a diff --git a/stdlib/queue.ml b/stdlib/queue.ml index 388a46c53..214cc524e 100644 --- a/stdlib/queue.ml +++ b/stdlib/queue.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - exception Empty (* OCaml currently does not allow the components of a sum type to be diff --git a/stdlib/queue.mli b/stdlib/queue.mli index 5dea9244b..354271237 100644 --- a/stdlib/queue.mli +++ b/stdlib/queue.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** First-in first-out queues. This module implements queues (FIFOs), with in-place modification. diff --git a/stdlib/random.ml b/stdlib/random.ml index 800c62970..64f00da34 100644 --- a/stdlib/random.ml +++ b/stdlib/random.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Pseudo-random number generator This is a lagged-Fibonacci F(55, 24, +) with a modified addition function to enhance the mixing of bits. diff --git a/stdlib/random.mli b/stdlib/random.mli index d8ea01e62..90f396f06 100644 --- a/stdlib/random.mli +++ b/stdlib/random.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Pseudo-random number generators (PRNG). *) (** {6 Basic functions} *) diff --git a/stdlib/scanf.ml b/stdlib/scanf.ml index b619bf8f0..f3a9ea515 100644 --- a/stdlib/scanf.ml +++ b/stdlib/scanf.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The run-time library for scanners. *) (* Scanning buffers. *) diff --git a/stdlib/scanf.mli b/stdlib/scanf.mli index 879851436..1026ba6fe 100644 --- a/stdlib/scanf.mli +++ b/stdlib/scanf.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Formatted input functions. *) (** {6 Introduction} *) diff --git a/stdlib/set.ml b/stdlib/set.ml index 661968be8..262629253 100644 --- a/stdlib/set.ml +++ b/stdlib/set.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Sets over ordered types *) module type OrderedType = diff --git a/stdlib/set.mli b/stdlib/set.mli index 0f1a3b7c9..22bb455a8 100644 --- a/stdlib/set.mli +++ b/stdlib/set.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Sets over ordered types. This module implements the set data structure, given a total ordering diff --git a/stdlib/sort.ml b/stdlib/sort.ml index 66546b12b..59c76cb7b 100644 --- a/stdlib/sort.ml +++ b/stdlib/sort.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Merging and sorting *) open Array diff --git a/stdlib/sort.mli b/stdlib/sort.mli index 4f2a961aa..d5abb79fa 100644 --- a/stdlib/sort.mli +++ b/stdlib/sort.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Sorting and merging lists. @deprecated This module is obsolete and exists only for backward diff --git a/stdlib/stack.ml b/stdlib/stack.ml index 599b10c8b..4db3d5b43 100644 --- a/stdlib/stack.ml +++ b/stdlib/stack.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type 'a t = { mutable c : 'a list } exception Empty diff --git a/stdlib/stack.mli b/stdlib/stack.mli index 2d7a90066..9b468aa6c 100644 --- a/stdlib/stack.mli +++ b/stdlib/stack.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Last-in first-out stacks. This module implements stacks (LIFOs), with in-place modification. diff --git a/stdlib/stdLabels.ml b/stdlib/stdLabels.ml index 468dd5176..35b25e0b7 100644 --- a/stdlib/stdLabels.ml +++ b/stdlib/stdLabels.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [StdLabels]: meta-module for labelled libraries *) module Array = ArrayLabels diff --git a/stdlib/stdLabels.mli b/stdlib/stdLabels.mli index a815d35a2..bf9ef6547 100644 --- a/stdlib/stdLabels.mli +++ b/stdlib/stdLabels.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Standard labeled libraries. This meta-module provides labelized version of the {!Array}, diff --git a/stdlib/std_exit.ml b/stdlib/std_exit.ml index c56153738..66d49c994 100644 --- a/stdlib/std_exit.ml +++ b/stdlib/std_exit.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Ensure that [at_exit] functions are called at the end of every program *) let _ = do_at_exit() diff --git a/stdlib/stdlib.mllib b/stdlib/stdlib.mllib index 91265e5da..b41bc2d93 100644 --- a/stdlib/stdlib.mllib +++ b/stdlib/stdlib.mllib @@ -1,7 +1,6 @@ # This file lists all standard library modules # (in the same order as Makefile.shared). # It is used in particular to know what to expunge in toplevels. -# $Id$ Pervasives Array diff --git a/stdlib/stream.ml b/stdlib/stream.ml index 07effd4a1..99d4bb22c 100644 --- a/stdlib/stream.ml +++ b/stdlib/stream.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The fields of type t are not mutable to preserve polymorphism of the empty stream. This is type safe because the empty stream is never patched. *) diff --git a/stdlib/stream.mli b/stdlib/stream.mli index 16e711797..1098a2765 100644 --- a/stdlib/stream.mli +++ b/stdlib/stream.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Streams and parsers. *) type 'a t diff --git a/stdlib/string.ml b/stdlib/string.ml index f3906f353..fda40b527 100644 --- a/stdlib/string.ml +++ b/stdlib/string.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* String operations *) external length : string -> int = "%string_length" diff --git a/stdlib/string.mli b/stdlib/string.mli index c248fab18..14f2c82db 100644 --- a/stdlib/string.mli +++ b/stdlib/string.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** String operations. Given a string [s] of length [l], we call character number in [s] diff --git a/stdlib/stringLabels.ml b/stdlib/stringLabels.ml index 2345d4992..415dbff5d 100644 --- a/stdlib/stringLabels.ml +++ b/stdlib/stringLabels.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [StringLabels]: labelled String module *) include String diff --git a/stdlib/stringLabels.mli b/stdlib/stringLabels.mli index 59b0eb7c2..8e2e6d379 100644 --- a/stdlib/stringLabels.mli +++ b/stdlib/stringLabels.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** String operations. *) external length : string -> int = "%string_length" diff --git a/stdlib/sys.mli b/stdlib/sys.mli index 6f3d57978..99d7824a3 100644 --- a/stdlib/sys.mli +++ b/stdlib/sys.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** System interface. *) val argv : string array diff --git a/stdlib/sys.mlp b/stdlib/sys.mlp index c7271794d..9c851d4fa 100644 --- a/stdlib/sys.mlp +++ b/stdlib/sys.mlp @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* WARNING: sys.ml is generated from sys.mlp. DO NOT EDIT sys.ml or your changes will be lost. *) diff --git a/stdlib/weak.ml b/stdlib/weak.ml index ab0bab0f6..536a42e04 100644 --- a/stdlib/weak.ml +++ b/stdlib/weak.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Weak array operations *) type 'a t;; diff --git a/stdlib/weak.mli b/stdlib/weak.mli index add9b0abb..a27dea5ce 100644 --- a/stdlib/weak.mli +++ b/stdlib/weak.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Arrays of weak pointers and hash tables of weak pointers. *) diff --git a/testsuite/Makefile b/testsuite/Makefile index 497d7403d..14d763182 100644 --- a/testsuite/Makefile +++ b/testsuite/Makefile @@ -1,5 +1,3 @@ -# $Id$ - BASEDIR=${PWD} NO_PRINT=`($(MAKE) empty --no-print-directory > /dev/null 2>&1) && echo '--no-print-directory' || echo ''` diff --git a/testsuite/interactive/lib-gc/alloc.ml b/testsuite/interactive/lib-gc/alloc.ml index 24a568caa..2db803469 100644 --- a/testsuite/interactive/lib-gc/alloc.ml +++ b/testsuite/interactive/lib-gc/alloc.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Random allocation test *) (* diff --git a/testsuite/lib/Makefile b/testsuite/lib/Makefile index b6fc63c20..d20d61e65 100644 --- a/testsuite/lib/Makefile +++ b/testsuite/lib/Makefile @@ -1,5 +1,3 @@ -# $Id$ - compile: compile-targets promote: defaultpromote diff --git a/testsuite/lib/testing.ml b/testsuite/lib/testing.ml index 4b49cfc0a..0791fa7ec 100644 --- a/testsuite/lib/testing.ml +++ b/testsuite/lib/testing.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Testing auxilliaries. *) open Scanf;; diff --git a/testsuite/lib/testing.mli b/testsuite/lib/testing.mli index 18b2ea037..68440f729 100644 --- a/testsuite/lib/testing.mli +++ b/testsuite/lib/testing.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Testing auxilliaries. *) val test : bool -> unit;; diff --git a/testsuite/makefiles/Makefile.common b/testsuite/makefiles/Makefile.common index c7da5b705..a115bda71 100644 --- a/testsuite/makefiles/Makefile.common +++ b/testsuite/makefiles/Makefile.common @@ -1,5 +1,3 @@ -# $Id$ - TOPDIR=$(BASEDIR)/.. include $(TOPDIR)/config/Makefile diff --git a/testsuite/makefiles/Makefile.okbad b/testsuite/makefiles/Makefile.okbad index 9016dab3f..ddb5dc262 100644 --- a/testsuite/makefiles/Makefile.okbad +++ b/testsuite/makefiles/Makefile.okbad @@ -1,5 +1,3 @@ -# $Id$ - default: compile compile: diff --git a/testsuite/makefiles/Makefile.one b/testsuite/makefiles/Makefile.one index 5c8e365e3..6493dd9da 100644 --- a/testsuite/makefiles/Makefile.one +++ b/testsuite/makefiles/Makefile.one @@ -1,5 +1,3 @@ -# $Id$ - CMI_FILES=$(MODULES:=.cmi) CMO_FILES=$(MODULES:=.cmo) CMX_FILES=$(MODULES:=.cmx) diff --git a/testsuite/makefiles/Makefile.several b/testsuite/makefiles/Makefile.several index af8118225..8c4c74b98 100644 --- a/testsuite/makefiles/Makefile.several +++ b/testsuite/makefiles/Makefile.several @@ -1,5 +1,3 @@ -# $Id$ - CC=$(NATIVECC) $(NATIVECCCOMPOPTS) FC=$(FORTAN_COMPILER) CMO_FILES=$(MODULES:=.cmo) diff --git a/testsuite/makefiles/Makefile.toplevel b/testsuite/makefiles/Makefile.toplevel index 532763f43..64c7b0bfe 100644 --- a/testsuite/makefiles/Makefile.toplevel +++ b/testsuite/makefiles/Makefile.toplevel @@ -1,5 +1,3 @@ -# $Id$ - default: @for file in *.ml; do \ $(OCAML) < $$file 2>&1 | grep -v '^ OCaml version' > $$file.result; \ diff --git a/testsuite/tests/asmcomp/alpha.S b/testsuite/tests/asmcomp/alpha.S index 10e338863..fd5fef1e5 100644 --- a/testsuite/tests/asmcomp/alpha.S +++ b/testsuite/tests/asmcomp/alpha.S @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - .globl call_gen_code .ent call_gen_code diff --git a/testsuite/tests/asmcomp/amd64.S b/testsuite/tests/asmcomp/amd64.S index 57229e09a..c457d5c24 100644 --- a/testsuite/tests/asmcomp/amd64.S +++ b/testsuite/tests/asmcomp/amd64.S @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #ifdef SYS_macosx #define ALIGN 4 #else diff --git a/testsuite/tests/asmcomp/arith.cmm b/testsuite/tests/asmcomp/arith.cmm index b29812957..ac9d02c2c 100644 --- a/testsuite/tests/asmcomp/arith.cmm +++ b/testsuite/tests/asmcomp/arith.cmm @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Regression test for arithmetic instructions *) (function "testarith" () diff --git a/testsuite/tests/asmcomp/arm.S b/testsuite/tests/asmcomp/arm.S index 8fab5ae92..2e364564e 100644 --- a/testsuite/tests/asmcomp/arm.S +++ b/testsuite/tests/asmcomp/arm.S @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - .text .global call_gen_code diff --git a/testsuite/tests/asmcomp/checkbound.cmm b/testsuite/tests/asmcomp/checkbound.cmm index 62828bd35..1968154bf 100644 --- a/testsuite/tests/asmcomp/checkbound.cmm +++ b/testsuite/tests/asmcomp/checkbound.cmm @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (function "checkbound2" (x: int y: int) (checkbound x y)) diff --git a/testsuite/tests/asmcomp/fib.cmm b/testsuite/tests/asmcomp/fib.cmm index d21260448..db79c6733 100644 --- a/testsuite/tests/asmcomp/fib.cmm +++ b/testsuite/tests/asmcomp/fib.cmm @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (function "fib" (n: int) (if (< n 2) 1 diff --git a/testsuite/tests/asmcomp/hppa.S b/testsuite/tests/asmcomp/hppa.S index ff3d66d59..5f7455b7c 100644 --- a/testsuite/tests/asmcomp/hppa.S +++ b/testsuite/tests/asmcomp/hppa.S @@ -10,7 +10,6 @@ ;* * ;********************************************************************* -; $Id$ ; Must be preprocessed by cpp #ifdef SYS_hpux diff --git a/testsuite/tests/asmcomp/i386.S b/testsuite/tests/asmcomp/i386.S index 94e44c773..cc8a36389 100644 --- a/testsuite/tests/asmcomp/i386.S +++ b/testsuite/tests/asmcomp/i386.S @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* Linux with ELF binaries does not prefix identifiers with _. Linux with a.out binaries, FreeBSD, and NextStep do. */ diff --git a/testsuite/tests/asmcomp/i386nt.asm b/testsuite/tests/asmcomp/i386nt.asm index 80af32ffd..618d41c94 100644 --- a/testsuite/tests/asmcomp/i386nt.asm +++ b/testsuite/tests/asmcomp/i386nt.asm @@ -10,8 +10,6 @@ ; ; ;*********************************************************************; -; $Id$ - .386 .MODEL FLAT diff --git a/testsuite/tests/asmcomp/ia64.S b/testsuite/tests/asmcomp/ia64.S index 028c622f9..b1aa5e831 100644 --- a/testsuite/tests/asmcomp/ia64.S +++ b/testsuite/tests/asmcomp/ia64.S @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #define ST8OFF(a,b,d) st8 [a] = b, d #define LD8OFF(a,b,d) ld8 a = [b], d #define STFDOFF(a,b,d) stfd [a] = b, d diff --git a/testsuite/tests/asmcomp/integr.cmm b/testsuite/tests/asmcomp/integr.cmm index 504bb0db5..61c707a4f 100644 --- a/testsuite/tests/asmcomp/integr.cmm +++ b/testsuite/tests/asmcomp/integr.cmm @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (function "square" (x: float) ( *f x x)) diff --git a/testsuite/tests/asmcomp/lexcmm.mli b/testsuite/tests/asmcomp/lexcmm.mli index a4998ca12..e395abeb0 100644 --- a/testsuite/tests/asmcomp/lexcmm.mli +++ b/testsuite/tests/asmcomp/lexcmm.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - val token: Lexing.lexbuf -> Parsecmm.token type error = diff --git a/testsuite/tests/asmcomp/lexcmm.mll b/testsuite/tests/asmcomp/lexcmm.mll index eb2f2c829..78346561a 100644 --- a/testsuite/tests/asmcomp/lexcmm.mll +++ b/testsuite/tests/asmcomp/lexcmm.mll @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - { open Parsecmm diff --git a/testsuite/tests/asmcomp/m68k.S b/testsuite/tests/asmcomp/m68k.S index f24ff404e..4d0f6a3a8 100644 --- a/testsuite/tests/asmcomp/m68k.S +++ b/testsuite/tests/asmcomp/m68k.S @@ -10,8 +10,6 @@ |* * |*********************************************************************** -| $Id$ - | call_gen_code is used with the following types: | unit -> int | int -> int diff --git a/testsuite/tests/asmcomp/main.c b/testsuite/tests/asmcomp/main.c index 33fd8a98a..0b59b0b82 100644 --- a/testsuite/tests/asmcomp/main.c +++ b/testsuite/tests/asmcomp/main.c @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stddef.h> #include <stdio.h> #include <stdlib.h> diff --git a/testsuite/tests/asmcomp/main.ml b/testsuite/tests/asmcomp/main.ml index 09539f935..049189698 100644 --- a/testsuite/tests/asmcomp/main.ml +++ b/testsuite/tests/asmcomp/main.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Clflags let compile_file filename = diff --git a/testsuite/tests/asmcomp/mainarith.c b/testsuite/tests/asmcomp/mainarith.c index 3bda5ddea..b7a6c592d 100644 --- a/testsuite/tests/asmcomp/mainarith.c +++ b/testsuite/tests/asmcomp/mainarith.c @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <math.h> #include <time.h> diff --git a/testsuite/tests/asmcomp/mips.s b/testsuite/tests/asmcomp/mips.s index ec6931bf7..db4f23eab 100644 --- a/testsuite/tests/asmcomp/mips.s +++ b/testsuite/tests/asmcomp/mips.s @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - .globl call_gen_code .ent call_gen_code call_gen_code: diff --git a/testsuite/tests/asmcomp/parsecmm.mly b/testsuite/tests/asmcomp/parsecmm.mly index c19adf1c3..c8b038581 100644 --- a/testsuite/tests/asmcomp/parsecmm.mly +++ b/testsuite/tests/asmcomp/parsecmm.mly @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* A simple parser for C-- */ %{ diff --git a/testsuite/tests/asmcomp/parsecmmaux.ml b/testsuite/tests/asmcomp/parsecmmaux.ml index 5aa2ea05b..1c0848ddf 100644 --- a/testsuite/tests/asmcomp/parsecmmaux.ml +++ b/testsuite/tests/asmcomp/parsecmmaux.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Auxiliary functions for parsing *) type error = diff --git a/testsuite/tests/asmcomp/parsecmmaux.mli b/testsuite/tests/asmcomp/parsecmmaux.mli index d488db1f5..0f2e370a1 100644 --- a/testsuite/tests/asmcomp/parsecmmaux.mli +++ b/testsuite/tests/asmcomp/parsecmmaux.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Auxiliary functions for parsing *) val bind_ident: string -> Ident.t diff --git a/testsuite/tests/asmcomp/power-aix.S b/testsuite/tests/asmcomp/power-aix.S index 0752100f5..788c86ff9 100644 --- a/testsuite/tests/asmcomp/power-aix.S +++ b/testsuite/tests/asmcomp/power-aix.S @@ -10,8 +10,6 @@ #* * #********************************************************************* -# $Id$ - .csect .text[PR] .globl .call_gen_code diff --git a/testsuite/tests/asmcomp/power-elf.S b/testsuite/tests/asmcomp/power-elf.S index 7fee4aa1b..7ff87c591 100644 --- a/testsuite/tests/asmcomp/power-elf.S +++ b/testsuite/tests/asmcomp/power-elf.S @@ -10,8 +10,6 @@ /* */ /*********************************************************************/ -/* $Id$ */ - /* Save and restore all callee-save registers */ /* GPR 14 at sp+16 ... GPR 31 at sp+84 FPR 14 at sp+92 ... FPR 31 at sp+228 */ diff --git a/testsuite/tests/asmcomp/power-rhapsody.S b/testsuite/tests/asmcomp/power-rhapsody.S index 06788a8c4..be13cc14f 100644 --- a/testsuite/tests/asmcomp/power-rhapsody.S +++ b/testsuite/tests/asmcomp/power-rhapsody.S @@ -10,8 +10,6 @@ /* */ /*********************************************************************/ -/* $Id$ */ - /* Save and restore all callee-save registers */ /* GPR 14 at sp+16 ... GPR 31 at sp+84 FPR 14 at sp+92 ... FPR 31 at sp+228 */ diff --git a/testsuite/tests/asmcomp/quicksort.cmm b/testsuite/tests/asmcomp/quicksort.cmm index 21b1add57..9681ee879 100644 --- a/testsuite/tests/asmcomp/quicksort.cmm +++ b/testsuite/tests/asmcomp/quicksort.cmm @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (function "quicksort" (lo: int hi: int a: addr) (if (< lo hi) (let (i lo diff --git a/testsuite/tests/asmcomp/quicksort2.cmm b/testsuite/tests/asmcomp/quicksort2.cmm index 08988573a..74e2a0c9f 100644 --- a/testsuite/tests/asmcomp/quicksort2.cmm +++ b/testsuite/tests/asmcomp/quicksort2.cmm @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (function "cmp" (i: int j: int) (- i j)) diff --git a/testsuite/tests/asmcomp/soli.cmm b/testsuite/tests/asmcomp/soli.cmm index af4d39fc6..dcf8b0b6b 100644 --- a/testsuite/tests/asmcomp/soli.cmm +++ b/testsuite/tests/asmcomp/soli.cmm @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - ("d1": int 0 int 1 "d2": int 1 int 0 "d3": int 0 int -1 diff --git a/testsuite/tests/asmcomp/sparc.S b/testsuite/tests/asmcomp/sparc.S index 362c6f135..53c5fc902 100644 --- a/testsuite/tests/asmcomp/sparc.S +++ b/testsuite/tests/asmcomp/sparc.S @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #if defined(SYS_solaris) || defined(SYS_elf) #define Call_gen_code _call_gen_code #define Caml_c_call _caml_c_call diff --git a/testsuite/tests/asmcomp/tagged-fib.cmm b/testsuite/tests/asmcomp/tagged-fib.cmm index 67d4cba2b..945b1a1df 100644 --- a/testsuite/tests/asmcomp/tagged-fib.cmm +++ b/testsuite/tests/asmcomp/tagged-fib.cmm @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (function "fib" (n: int) (if (< n 5) 3 diff --git a/testsuite/tests/asmcomp/tagged-integr.cmm b/testsuite/tests/asmcomp/tagged-integr.cmm index 663633d7a..01519290a 100644 --- a/testsuite/tests/asmcomp/tagged-integr.cmm +++ b/testsuite/tests/asmcomp/tagged-integr.cmm @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - ("res_square": skip 8) ("h": skip 8) ("x": skip 8) diff --git a/testsuite/tests/asmcomp/tagged-quicksort.cmm b/testsuite/tests/asmcomp/tagged-quicksort.cmm index 73fca1017..501e39160 100644 --- a/testsuite/tests/asmcomp/tagged-quicksort.cmm +++ b/testsuite/tests/asmcomp/tagged-quicksort.cmm @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (function "quick" (lo: int hi: int a: addr) (if (< lo hi) (let (i lo diff --git a/testsuite/tests/asmcomp/tagged-tak.cmm b/testsuite/tests/asmcomp/tagged-tak.cmm index 2bda22385..73e766848 100644 --- a/testsuite/tests/asmcomp/tagged-tak.cmm +++ b/testsuite/tests/asmcomp/tagged-tak.cmm @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (function "tak" (x:int y:int z:int) (if (> x y) (app "tak" (app "tak" (- x 2) y z int) diff --git a/testsuite/tests/asmcomp/tak.cmm b/testsuite/tests/asmcomp/tak.cmm index 26bbd9681..fe71cb8de 100644 --- a/testsuite/tests/asmcomp/tak.cmm +++ b/testsuite/tests/asmcomp/tak.cmm @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (function "tak" (x:int y:int z:int) (if (> x y) (app "tak" (app "tak" (- x 1) y z int) diff --git a/testsuite/tests/basic-more/tformat.ml b/testsuite/tests/basic-more/tformat.ml index 77d30ac34..64176d88f 100644 --- a/testsuite/tests/basic-more/tformat.ml +++ b/testsuite/tests/basic-more/tformat.ml @@ -10,7 +10,7 @@ (* *) (*************************************************************************) -(* $Id$ +(* A testbed file for the module Format. diff --git a/testsuite/tests/basic-private/length.ml b/testsuite/tests/basic-private/length.ml index 318e98cb1..c36e67027 100644 --- a/testsuite/tests/basic-private/length.ml +++ b/testsuite/tests/basic-private/length.ml @@ -1,4 +1,4 @@ -(* $Id$ +(* A testbed file for private type abbreviation definitions. diff --git a/testsuite/tests/basic-private/length.mli b/testsuite/tests/basic-private/length.mli index 6cd7e1214..67d055db6 100644 --- a/testsuite/tests/basic-private/length.mli +++ b/testsuite/tests/basic-private/length.mli @@ -1,4 +1,4 @@ -(* $Id$ +(* A testbed file for private type abbreviation definitions. diff --git a/testsuite/tests/basic-private/tlength.ml b/testsuite/tests/basic-private/tlength.ml index f1fd91af9..73f0bf954 100644 --- a/testsuite/tests/basic-private/tlength.ml +++ b/testsuite/tests/basic-private/tlength.ml @@ -1,4 +1,4 @@ -(* $Id$ +(* A testbed file for private type abbreviation definitions. diff --git a/testsuite/tests/basic/maps.ml b/testsuite/tests/basic/maps.ml index f021e00cc..199f6fe4d 100644 --- a/testsuite/tests/basic/maps.ml +++ b/testsuite/tests/basic/maps.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - module IntMap = Map.Make(struct type t = int let compare x y = x-y end) let m1 = IntMap.add 4 "Y" (IntMap.singleton 3 "X1") diff --git a/testsuite/tests/basic/sets.ml b/testsuite/tests/basic/sets.ml index f2fa158c3..d5eb3b717 100644 --- a/testsuite/tests/basic/sets.ml +++ b/testsuite/tests/basic/sets.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - module IntSet = Set.Make(struct type t = int let compare x y = x-y end) let even = List.fold_right IntSet.add [0; -2; 2; 4; 6; -10] IntSet.empty diff --git a/testsuite/tests/lib-bigarray/fftba.ml b/testsuite/tests/lib-bigarray/fftba.ml index f7149252c..801553f37 100644 --- a/testsuite/tests/lib-bigarray/fftba.ml +++ b/testsuite/tests/lib-bigarray/fftba.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Bigarray let pi = 3.14159265358979323846 diff --git a/testsuite/tests/lib-scanf/tscanf.ml b/testsuite/tests/lib-scanf/tscanf.ml index 8eb7d9936..989e488e8 100644 --- a/testsuite/tests/lib-scanf/tscanf.ml +++ b/testsuite/tests/lib-scanf/tscanf.ml @@ -10,7 +10,7 @@ (* *) (*************************************************************************) -(* $Id$ +(* A testbed file for the module Scanf. diff --git a/testsuite/tests/misc-kb/equations.ml b/testsuite/tests/misc-kb/equations.ml index 1d905e015..0ea3bb111 100644 --- a/testsuite/tests/misc-kb/equations.ml +++ b/testsuite/tests/misc-kb/equations.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (****************** Equation manipulations *************) open Terms diff --git a/testsuite/tests/misc-kb/equations.mli b/testsuite/tests/misc-kb/equations.mli index 49b1a461e..db80f4816 100644 --- a/testsuite/tests/misc-kb/equations.mli +++ b/testsuite/tests/misc-kb/equations.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Terms type rule = diff --git a/testsuite/tests/misc-kb/kb.ml b/testsuite/tests/misc-kb/kb.ml index 5045a3188..0892a90c8 100644 --- a/testsuite/tests/misc-kb/kb.ml +++ b/testsuite/tests/misc-kb/kb.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Terms open Equations diff --git a/testsuite/tests/misc-kb/kb.mli b/testsuite/tests/misc-kb/kb.mli index 27aa2e986..c0578e56f 100644 --- a/testsuite/tests/misc-kb/kb.mli +++ b/testsuite/tests/misc-kb/kb.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Terms open Equations diff --git a/testsuite/tests/misc-kb/kbmain.ml b/testsuite/tests/misc-kb/kbmain.ml index a0d4ff715..753f73533 100644 --- a/testsuite/tests/misc-kb/kbmain.ml +++ b/testsuite/tests/misc-kb/kbmain.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Terms open Equations open Orderings diff --git a/testsuite/tests/misc-kb/orderings.ml b/testsuite/tests/misc-kb/orderings.ml index 6da73df8d..488f87037 100644 --- a/testsuite/tests/misc-kb/orderings.ml +++ b/testsuite/tests/misc-kb/orderings.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (*********************** Recursive Path Ordering ****************************) open Terms diff --git a/testsuite/tests/misc-kb/orderings.mli b/testsuite/tests/misc-kb/orderings.mli index d75c58a02..d67e3796d 100644 --- a/testsuite/tests/misc-kb/orderings.mli +++ b/testsuite/tests/misc-kb/orderings.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Terms type ordering = diff --git a/testsuite/tests/misc-kb/terms.ml b/testsuite/tests/misc-kb/terms.ml index f7a1c3e7b..b490c81fa 100644 --- a/testsuite/tests/misc-kb/terms.ml +++ b/testsuite/tests/misc-kb/terms.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (****************** Term manipulations *****************) type term = diff --git a/testsuite/tests/misc-kb/terms.mli b/testsuite/tests/misc-kb/terms.mli index 40c771081..aa1dd2cdc 100644 --- a/testsuite/tests/misc-kb/terms.mli +++ b/testsuite/tests/misc-kb/terms.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type term = Var of int | Term of string * term list diff --git a/testsuite/tests/misc-unsafe/fft.ml b/testsuite/tests/misc-unsafe/fft.ml index d9668cb89..2c1cf38b0 100644 --- a/testsuite/tests/misc-unsafe/fft.ml +++ b/testsuite/tests/misc-unsafe/fft.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - let pi = 3.14159265358979323846 let tpi = 2.0 *. pi diff --git a/testsuite/tests/misc-unsafe/quicksort.ml b/testsuite/tests/misc-unsafe/quicksort.ml index d5d8fb4dd..4f872fd24 100644 --- a/testsuite/tests/misc-unsafe/quicksort.ml +++ b/testsuite/tests/misc-unsafe/quicksort.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Good test for loops. Best compiled with -unsafe. *) let rec qsort lo hi (a : int array) = diff --git a/testsuite/tests/misc-unsafe/soli.ml b/testsuite/tests/misc-unsafe/soli.ml index 163939860..e4aa72157 100644 --- a/testsuite/tests/misc-unsafe/soli.ml +++ b/testsuite/tests/misc-unsafe/soli.ml @@ -10,9 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - - type peg = Out | Empty | Peg let board = [| diff --git a/testsuite/tests/misc/bdd.ml b/testsuite/tests/misc/bdd.ml index 0d54bd808..954edc164 100644 --- a/testsuite/tests/misc/bdd.ml +++ b/testsuite/tests/misc/bdd.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Translated to OCaml by Xavier Leroy *) (* Original code written in SML by ... *) diff --git a/testsuite/tests/misc/boyer.ml b/testsuite/tests/misc/boyer.ml index 57912d1bd..09bfd649f 100644 --- a/testsuite/tests/misc/boyer.ml +++ b/testsuite/tests/misc/boyer.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Manipulations over terms *) type term = diff --git a/testsuite/tests/misc/fib.ml b/testsuite/tests/misc/fib.ml index 7311c8128..adaf54885 100644 --- a/testsuite/tests/misc/fib.ml +++ b/testsuite/tests/misc/fib.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - let rec fib n = if n < 2 then 1 else fib(n-1) + fib(n-2) diff --git a/testsuite/tests/misc/hamming.ml b/testsuite/tests/misc/hamming.ml index 872454401..7c49c2b4c 100644 --- a/testsuite/tests/misc/hamming.ml +++ b/testsuite/tests/misc/hamming.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* We cannot use bignums because we don't do custom runtimes, but int64 is a bit short, so we roll our own 37-digit numbers... *) diff --git a/testsuite/tests/misc/nucleic.ml b/testsuite/tests/misc/nucleic.ml index 624300806..6b5b196f5 100644 --- a/testsuite/tests/misc/nucleic.ml +++ b/testsuite/tests/misc/nucleic.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Use floating-point arithmetic *) external (+) : float -> float -> float = "%addfloat" diff --git a/testsuite/tests/misc/sieve.ml b/testsuite/tests/misc/sieve.ml index 0cf4b3101..7d8d21bdb 100644 --- a/testsuite/tests/misc/sieve.ml +++ b/testsuite/tests/misc/sieve.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Eratosthene's sieve *) (* interval min max = [min; min+1; ...; max-1; max] *) diff --git a/testsuite/tests/misc/sorts.ml b/testsuite/tests/misc/sorts.ml index 7ae00beff..fb7db47a9 100644 --- a/testsuite/tests/misc/sorts.ml +++ b/testsuite/tests/misc/sorts.ml @@ -4475,5 +4475,3 @@ let main () = ;; if not !Sys.interactive then Printexc.catch main ();; - -(* $Id$ *) diff --git a/testsuite/tests/misc/takc.ml b/testsuite/tests/misc/takc.ml index 89bb38755..667ff5a74 100644 --- a/testsuite/tests/misc/takc.ml +++ b/testsuite/tests/misc/takc.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - let rec tak x y z = if x > y then tak (tak (x-1) y z) (tak (y-1) z x) (tak (z-1) x y) else z diff --git a/testsuite/tests/misc/taku.ml b/testsuite/tests/misc/taku.ml index 31e617eed..47d94c88b 100644 --- a/testsuite/tests/misc/taku.ml +++ b/testsuite/tests/misc/taku.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - let rec tak (x, y, z) = if x > y then tak(tak (x-1, y, z), tak (y-1, z, x), tak (z-1, x, y)) else z diff --git a/testsuite/tests/misc/weaktest.ml b/testsuite/tests/misc/weaktest.ml index 92ab5576d..85c1a6a29 100644 --- a/testsuite/tests/misc/weaktest.ml +++ b/testsuite/tests/misc/weaktest.ml @@ -1,5 +1,3 @@ -(* $Id$ *) - let debug = false;; open Printf;; diff --git a/testsuite/tests/tool-lexyacc/gram_aux.ml b/testsuite/tests/tool-lexyacc/gram_aux.ml index c082ea1bc..255f58f3e 100644 --- a/testsuite/tests/tool-lexyacc/gram_aux.ml +++ b/testsuite/tests/tool-lexyacc/gram_aux.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Auxiliaries for the parser. *) open Syntax diff --git a/testsuite/tests/tool-lexyacc/grammar.mly b/testsuite/tests/tool-lexyacc/grammar.mly index 267b71e3d..a18213676 100644 --- a/testsuite/tests/tool-lexyacc/grammar.mly +++ b/testsuite/tests/tool-lexyacc/grammar.mly @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - /* The grammar for lexer definitions */ %{ diff --git a/testsuite/tests/tool-lexyacc/input b/testsuite/tests/tool-lexyacc/input index da2f06aa7..c0d785945 100644 --- a/testsuite/tests/tool-lexyacc/input +++ b/testsuite/tests/tool-lexyacc/input @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The lexical analyzer for lexer definitions. *) { diff --git a/testsuite/tests/tool-lexyacc/lexgen.ml b/testsuite/tests/tool-lexyacc/lexgen.ml index 8a3e36a61..1a5995728 100644 --- a/testsuite/tests/tool-lexyacc/lexgen.ml +++ b/testsuite/tests/tool-lexyacc/lexgen.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compiling a lexer definition *) open Syntax diff --git a/testsuite/tests/tool-lexyacc/main.ml b/testsuite/tests/tool-lexyacc/main.ml index a9337d4b9..529eb12d7 100644 --- a/testsuite/tests/tool-lexyacc/main.ml +++ b/testsuite/tests/tool-lexyacc/main.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The lexer generator. Command-line parsing. *) open Syntax diff --git a/testsuite/tests/tool-lexyacc/output.ml b/testsuite/tests/tool-lexyacc/output.ml index 0956b4069..d8e854402 100644 --- a/testsuite/tests/tool-lexyacc/output.ml +++ b/testsuite/tests/tool-lexyacc/output.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Generating a DFA as a set of mutually recursive functions *) open Syntax diff --git a/testsuite/tests/tool-lexyacc/scan_aux.ml b/testsuite/tests/tool-lexyacc/scan_aux.ml index 54da13ede..81168f336 100644 --- a/testsuite/tests/tool-lexyacc/scan_aux.ml +++ b/testsuite/tests/tool-lexyacc/scan_aux.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Auxiliaries for the lexical analyzer *) let brace_depth = ref 0 diff --git a/testsuite/tests/tool-lexyacc/scanner.mll b/testsuite/tests/tool-lexyacc/scanner.mll index c30480629..7d71c6852 100644 --- a/testsuite/tests/tool-lexyacc/scanner.mll +++ b/testsuite/tests/tool-lexyacc/scanner.mll @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The lexical analyzer for lexer definitions. *) { diff --git a/testsuite/tests/tool-lexyacc/syntax.ml b/testsuite/tests/tool-lexyacc/syntax.ml index e2ff025ee..8f634466b 100644 --- a/testsuite/tests/tool-lexyacc/syntax.ml +++ b/testsuite/tests/tool-lexyacc/syntax.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The shallow abstract syntax *) type location = diff --git a/testsuite/tests/tool-ocaml/lib.ml b/testsuite/tests/tool-ocaml/lib.ml index 557fc04ad..9ab742719 100644 --- a/testsuite/tests/tool-ocaml/lib.ml +++ b/testsuite/tests/tool-ocaml/lib.ml @@ -1,5 +1,3 @@ -(* file $Id$ *) - external raise : exn -> 'a = "%raise" external not : bool -> bool = "%boolnot" @@ -42,5 +40,3 @@ external weak_set : 'a weak_t -> int -> 'a option -> unit = "caml_weak_set";; external weak_get: 'a weak_t -> int -> 'a option = "caml_weak_get";; let x = 42;; - -(* eof $Id$ *) diff --git a/testsuite/tests/tool-ocaml/t301-object.ml b/testsuite/tests/tool-ocaml/t301-object.ml index 5b053c006..ac4a4e03d 100644 --- a/testsuite/tests/tool-ocaml/t301-object.ml +++ b/testsuite/tests/tool-ocaml/t301-object.ml @@ -7,8 +7,6 @@ ocamlc -nostdlib -I ../../stdlib \ t301-object.ml -o t301-object.byte ***) -(* $Id$ *) - class c = object (self) method pubmet = 1 @@ -25,5 +23,3 @@ let (x,y,z) = f () in if x <> 1 then raise Not_found; if y <> 2 then raise Not_found; if z <> 4 then raise Not_found;; - -(**** eof $Id$ *) diff --git a/testsuite/tests/tool-ocamldoc/odoc_test.ml b/testsuite/tests/tool-ocamldoc/odoc_test.ml index 3600d6547..918cadc40 100644 --- a/testsuite/tests/tool-ocamldoc/odoc_test.ml +++ b/testsuite/tests/tool-ocamldoc/odoc_test.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Custom generator to perform test on ocamldoc. *) open Odoc_info diff --git a/testsuite/tests/typing-labels/mixin.ml b/testsuite/tests/typing-labels/mixin.ml index 83e7571f8..5ca686a11 100644 --- a/testsuite/tests/typing-labels/mixin.ml +++ b/testsuite/tests/typing-labels/mixin.ml @@ -1,5 +1,3 @@ -(* $Id$ *) - open StdLabels open MoreLabels diff --git a/testsuite/tests/typing-labels/mixin2.ml b/testsuite/tests/typing-labels/mixin2.ml index 34d6bf50a..8a5498fa3 100644 --- a/testsuite/tests/typing-labels/mixin2.ml +++ b/testsuite/tests/typing-labels/mixin2.ml @@ -1,5 +1,3 @@ -(* $Id$ *) - (* Full fledge version, using objects to structure code *) open StdLabels diff --git a/testsuite/tests/typing-labels/mixin3.ml b/testsuite/tests/typing-labels/mixin3.ml index d8b037b7a..0b9db2428 100644 --- a/testsuite/tests/typing-labels/mixin3.ml +++ b/testsuite/tests/typing-labels/mixin3.ml @@ -1,5 +1,3 @@ -(* $Id$ *) - (* Full fledge version, using objects to structure code *) open StdLabels diff --git a/testsuite/tests/typing-poly/poly.ml b/testsuite/tests/typing-poly/poly.ml index b0a5f97b8..52d362a57 100644 --- a/testsuite/tests/typing-poly/poly.ml +++ b/testsuite/tests/typing-poly/poly.ml @@ -1,4 +1,3 @@ -(* $Id$ *) (* Polymorphic methods are now available in the main branch. Enjoy. diff --git a/tools/Makefile b/tools/Makefile index da87fa99e..e2f3cb26e 100644 --- a/tools/Makefile +++ b/tools/Makefile @@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - include Makefile.shared # To make custom toplevels diff --git a/tools/Makefile.nt b/tools/Makefile.nt index b22e35d28..052af81c2 100644 --- a/tools/Makefile.nt +++ b/tools/Makefile.nt @@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - include Makefile.shared # To make custom toplevels diff --git a/tools/Makefile.shared b/tools/Makefile.shared index 39004d41e..9f7e841bb 100644 --- a/tools/Makefile.shared +++ b/tools/Makefile.shared @@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - include ../config/Makefile CAMLRUN=../boot/ocamlrun diff --git a/tools/addlabels.ml b/tools/addlabels.ml index c12bde847..01dbe2cbe 100644 --- a/tools/addlabels.ml +++ b/tools/addlabels.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open StdLabels open Asttypes open Parsetree diff --git a/tools/check-typo b/tools/check-typo index 6c7da5963..f1e37a3be 100755 --- a/tools/check-typo +++ b/tools/check-typo @@ -24,7 +24,7 @@ # - presence of a LF character at the end of the file (missing-lf) # - maximum line length of 80 characters (long-line) # - presence of a copyright header (missing-header) -# - absence of a leftover "$Id$" string (svn-keyword) +# - absence of a leftover "$Id" string (svn-keyword) # Exceptions are handled with a SVN property: "ocaml:typo". # Its value for a given file is a comma-separated list of rule names, @@ -172,7 +172,7 @@ IGNORE_DIRS=" err("white-at-eol", "whitespace at end of line"); } - match($0, /\$Id\$/) { + match($0, /\$Id(: .*)?\$/) { err("svn-keyword", "SVN keyword marker"); } diff --git a/tools/checkstack.c b/tools/checkstack.c index 9289c678c..dea6a0a6a 100644 --- a/tools/checkstack.c +++ b/tools/checkstack.c @@ -10,8 +10,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ - #include <stdio.h> #include <stdlib.h> #include <sys/types.h> diff --git a/tools/cvt_emit.mll b/tools/cvt_emit.mll index 723274c4a..d54243e27 100644 --- a/tools/cvt_emit.mll +++ b/tools/cvt_emit.mll @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - { let first_item = ref false let command_beginning = ref 0 diff --git a/tools/depend.ml b/tools/depend.ml index 80edef03e..282521834 100644 --- a/tools/depend.ml +++ b/tools/depend.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Asttypes open Format open Location diff --git a/tools/depend.mli b/tools/depend.mli index de7663335..f859cfef2 100644 --- a/tools/depend.mli +++ b/tools/depend.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (** Module dependencies. *) module StringSet : Set.S with type elt = string diff --git a/tools/dumpobj.ml b/tools/dumpobj.ml index 5a40cfc39..d68f3e101 100644 --- a/tools/dumpobj.ml +++ b/tools/dumpobj.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Disassembler for executable and .cmo object files *) open Asttypes diff --git a/tools/lexer299.mll b/tools/lexer299.mll index 38241af0a..e7709602d 100644 --- a/tools/lexer299.mll +++ b/tools/lexer299.mll @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The lexer definition *) { diff --git a/tools/lexer301.mll b/tools/lexer301.mll index 4548de57e..24bd807f7 100644 --- a/tools/lexer301.mll +++ b/tools/lexer301.mll @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The lexer definition *) { diff --git a/tools/make-package-macosx b/tools/make-package-macosx index 40a2e1462..8b1f7737b 100755 --- a/tools/make-package-macosx +++ b/tools/make-package-macosx @@ -12,8 +12,6 @@ # # ######################################################################### -# $Id$ - cd package-macosx rm -rf ocaml.pkg ocaml-rw.dmg diff --git a/tools/objinfo.ml b/tools/objinfo.ml index 1e0a38e10..186d7f5ae 100644 --- a/tools/objinfo.ml +++ b/tools/objinfo.ml @@ -13,8 +13,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Dump info on .cmi, .cmo, .cmx, .cma, .cmxa, .cmxs files and on bytecode executables. *) diff --git a/tools/ocaml-objcopy-macosx b/tools/ocaml-objcopy-macosx index b4584a073..e3fb6cbc3 100755 --- a/tools/ocaml-objcopy-macosx +++ b/tools/ocaml-objcopy-macosx @@ -12,9 +12,6 @@ # # ######################################################################### -# $Id$ - - TMP="${TMPDIR=/tmp}" TEMP="${TMP}"/ocaml-objcopy-$$.o UNDEF="${TMP}"/ocaml-objcopy-$$.sym diff --git a/tools/ocaml299to3.ml b/tools/ocaml299to3.ml index fb66c7616..8ff98a8f6 100644 --- a/tools/ocaml299to3.ml +++ b/tools/ocaml299to3.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Lexer299 let input_buffer = Buffer.create 16383 diff --git a/tools/ocamlcp.ml b/tools/ocamlcp.ml index 953dd250a..eb9036bf6 100644 --- a/tools/ocamlcp.ml +++ b/tools/ocamlcp.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Printf let compargs = ref ([] : string list) diff --git a/tools/ocamldep.ml b/tools/ocamldep.ml index 00d10beca..8cec34b45 100644 --- a/tools/ocamldep.ml +++ b/tools/ocamldep.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Longident open Parsetree diff --git a/tools/ocamlmklib.mlp b/tools/ocamlmklib.mlp index b795e39f7..c566e6d00 100644 --- a/tools/ocamlmklib.mlp +++ b/tools/ocamlmklib.mlp @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Printf open Myocamlbuild_config diff --git a/tools/ocamlmktop.ml b/tools/ocamlmktop.ml index be1eddd73..ee21f76e4 100644 --- a/tools/ocamlmktop.ml +++ b/tools/ocamlmktop.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - let _ = let args = Ccomp.quote_files (List.tl (Array.to_list Sys.argv)) in exit(Sys.command("ocamlc -I +compiler-libs -linkall ocamlcommon.cma ocamlbytecomp.cma ocamltoplevel.cma " ^ args ^ " topstart.cmo")) diff --git a/tools/ocamlmktop.tpl b/tools/ocamlmktop.tpl index f3a64d6e6..6f94a9496 100644 --- a/tools/ocamlmktop.tpl +++ b/tools/ocamlmktop.tpl @@ -11,6 +11,4 @@ # # ######################################################################### -# $Id$ - exec %%BINDIR%%/ocamlc -I +compiler-libs -linkall ocamlcommon.cma ocamlbytecomp.cma ocamltoplevel.cma "$@" topstart.cmo diff --git a/tools/ocamloptp.ml b/tools/ocamloptp.ml index 0d87ef2d9..8eb08f440 100644 --- a/tools/ocamloptp.ml +++ b/tools/ocamloptp.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id: ocamlcp.ml 11890 2011-12-20 10:35:43Z frisch $ *) - open Printf let compargs = ref ([] : string list) diff --git a/tools/ocamlprof.ml b/tools/ocamlprof.ml index 1fd123cea..d88c70c59 100644 --- a/tools/ocamlprof.ml +++ b/tools/ocamlprof.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Printf open Clflags diff --git a/tools/primreq.ml b/tools/primreq.ml index c1764f5df..aea932f8d 100644 --- a/tools/primreq.ml +++ b/tools/primreq.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Determine the set of C primitives required by the given .cmo and .cma files *) diff --git a/tools/profiling.ml b/tools/profiling.ml index 06c976109..5dae8e461 100644 --- a/tools/profiling.ml +++ b/tools/profiling.ml @@ -12,8 +12,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Run-time library for profiled programs *) type profiling_counters = (string * (string * int array)) list diff --git a/tools/profiling.mli b/tools/profiling.mli index 61be2be76..baedc2410 100644 --- a/tools/profiling.mli +++ b/tools/profiling.mli @@ -12,8 +12,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Run-time library for profiled programs *) val counters: (string * (string * int array)) list ref;; diff --git a/tools/scrapelabels.ml b/tools/scrapelabels.ml index 3d8ab032c..392793202 100644 --- a/tools/scrapelabels.ml +++ b/tools/scrapelabels.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open StdLabels open Lexer301 diff --git a/toplevel/expunge.ml b/toplevel/expunge.ml index ca3dc802a..fa6fd7ca5 100644 --- a/toplevel/expunge.ml +++ b/toplevel/expunge.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* "Expunge" a toplevel by removing compiler modules from the global List.map. Usage: expunge <source file> <dest file> <names of modules to keep> *) diff --git a/toplevel/genprintval.ml b/toplevel/genprintval.ml index 82448b6fb..17846be32 100644 --- a/toplevel/genprintval.ml +++ b/toplevel/genprintval.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* To print values *) open Misc diff --git a/toplevel/genprintval.mli b/toplevel/genprintval.mli index a98ef3d1c..8ddf0796b 100644 --- a/toplevel/genprintval.mli +++ b/toplevel/genprintval.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Printing of values *) open Types diff --git a/toplevel/opttopdirs.ml b/toplevel/opttopdirs.ml index 8655ef96b..e473ad6a8 100644 --- a/toplevel/opttopdirs.ml +++ b/toplevel/opttopdirs.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Toplevel directives *) open Format diff --git a/toplevel/opttopdirs.mli b/toplevel/opttopdirs.mli index 9a8573e57..8caf71d44 100644 --- a/toplevel/opttopdirs.mli +++ b/toplevel/opttopdirs.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The toplevel directives. *) open Format diff --git a/toplevel/opttoploop.ml b/toplevel/opttoploop.ml index 8d83908d0..5634b38af 100644 --- a/toplevel/opttoploop.ml +++ b/toplevel/opttoploop.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The interactive toplevel loop *) open Path diff --git a/toplevel/opttoploop.mli b/toplevel/opttoploop.mli index cdd32de12..3be9a51ea 100644 --- a/toplevel/opttoploop.mli +++ b/toplevel/opttoploop.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Format (* Set the load paths, before running anything *) diff --git a/toplevel/opttopmain.ml b/toplevel/opttopmain.ml index ac32a5c10..f603981f6 100644 --- a/toplevel/opttopmain.ml +++ b/toplevel/opttopmain.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Clflags let usage = "Usage: ocamlnat <options> <object-files> [script-file]\noptions are:" diff --git a/toplevel/opttopmain.mli b/toplevel/opttopmain.mli index 61747d892..74044e514 100644 --- a/toplevel/opttopmain.mli +++ b/toplevel/opttopmain.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Start the [ocaml] toplevel loop *) val main: unit -> unit diff --git a/toplevel/opttopstart.ml b/toplevel/opttopstart.ml index db279940e..9fa9b47fc 100644 --- a/toplevel/opttopstart.ml +++ b/toplevel/opttopstart.ml @@ -10,6 +10,4 @@ (* *) (***********************************************************************) -(* $Id$ *) - let _ = Opttopmain.main() diff --git a/toplevel/topdirs.ml b/toplevel/topdirs.ml index 5bdbbfeff..a7d90d916 100644 --- a/toplevel/topdirs.ml +++ b/toplevel/topdirs.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Toplevel directives *) open Format diff --git a/toplevel/topdirs.mli b/toplevel/topdirs.mli index 266efccfe..42ea4ddb5 100644 --- a/toplevel/topdirs.mli +++ b/toplevel/topdirs.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The toplevel directives. *) open Format diff --git a/toplevel/toploop.ml b/toplevel/toploop.ml index 821561587..c528a5040 100644 --- a/toplevel/toploop.ml +++ b/toplevel/toploop.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The interactive toplevel loop *) open Path diff --git a/toplevel/toploop.mli b/toplevel/toploop.mli index e9afb5a0d..1b5196906 100644 --- a/toplevel/toploop.mli +++ b/toplevel/toploop.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Format (* Accessors for the table of toplevel value bindings. These functions diff --git a/toplevel/topmain.ml b/toplevel/topmain.ml index 27b2ca287..e173f53a1 100644 --- a/toplevel/topmain.ml +++ b/toplevel/topmain.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Clflags let usage = "Usage: ocaml <options> <object-files> [script-file [arguments]]\n\ diff --git a/toplevel/topmain.mli b/toplevel/topmain.mli index 61747d892..74044e514 100644 --- a/toplevel/topmain.mli +++ b/toplevel/topmain.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Start the [ocaml] toplevel loop *) val main: unit -> unit diff --git a/toplevel/topstart.ml b/toplevel/topstart.ml index 823b4c813..f03e2aa6a 100644 --- a/toplevel/topstart.ml +++ b/toplevel/topstart.ml @@ -10,6 +10,4 @@ (* *) (***********************************************************************) -(* $Id$ *) - let _ = Topmain.main() diff --git a/toplevel/trace.ml b/toplevel/trace.ml index 104f39fe4..60cfb9539 100644 --- a/toplevel/trace.ml +++ b/toplevel/trace.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The "trace" facility *) open Format diff --git a/toplevel/trace.mli b/toplevel/trace.mli index 0675dd1bf..41c119e66 100644 --- a/toplevel/trace.mli +++ b/toplevel/trace.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* The "trace" facility *) open Format diff --git a/typing/annot.mli b/typing/annot.mli index 934438194..f75d4c199 100644 --- a/typing/annot.mli +++ b/typing/annot.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Data types for annotations (Stypes.ml) *) type call = Tail | Stack | Inline;; diff --git a/typing/btype.ml b/typing/btype.ml index aa1190e75..08a4a4565 100644 --- a/typing/btype.ml +++ b/typing/btype.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Basic operations on core types *) open Types diff --git a/typing/btype.mli b/typing/btype.mli index ddb34a8fb..ba595ad59 100644 --- a/typing/btype.mli +++ b/typing/btype.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Basic operations on core types *) open Asttypes diff --git a/typing/ctype.ml b/typing/ctype.ml index 15302dc97..8bdc4f8f2 100644 --- a/typing/ctype.ml +++ b/typing/ctype.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Operations on core types *) open Misc diff --git a/typing/ctype.mli b/typing/ctype.mli index b254881eb..5638ba3ba 100644 --- a/typing/ctype.mli +++ b/typing/ctype.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Operations on core types *) open Asttypes diff --git a/typing/datarepr.ml b/typing/datarepr.ml index 443123aa9..f9bda5e96 100644 --- a/typing/datarepr.ml +++ b/typing/datarepr.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compute constructor and label descriptions from type declarations, determining their representation. *) diff --git a/typing/datarepr.mli b/typing/datarepr.mli index 527fecb57..30754cb6e 100644 --- a/typing/datarepr.mli +++ b/typing/datarepr.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compute constructor and label descriptions from type declarations, determining their representation. *) diff --git a/typing/env.ml b/typing/env.ml index 47cd1f005..0813b3966 100644 --- a/typing/env.ml +++ b/typing/env.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Environment handling *) open Cmi_format diff --git a/typing/env.mli b/typing/env.mli index 71680ebba..1c53ff96b 100644 --- a/typing/env.mli +++ b/typing/env.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Environment handling *) open Types diff --git a/typing/envaux.ml b/typing/envaux.ml index 8b1ba637a..4edf3b46a 100644 --- a/typing/envaux.ml +++ b/typing/envaux.ml @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Misc open Types open Env diff --git a/typing/envaux.mli b/typing/envaux.mli index 45a1e7ac0..b893c1412 100644 --- a/typing/envaux.mli +++ b/typing/envaux.mli @@ -11,8 +11,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Format (* Convert environment summaries to environments *) diff --git a/typing/ident.ml b/typing/ident.ml index 4196bb833..d1e708366 100644 --- a/typing/ident.ml +++ b/typing/ident.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Format type t = { stamp: int; name: string; mutable flags: int } diff --git a/typing/ident.mli b/typing/ident.mli index f9e575421..7095cde7e 100644 --- a/typing/ident.mli +++ b/typing/ident.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Identifiers (unique names) *) type t = { stamp: int; name: string; mutable flags: int } diff --git a/typing/includeclass.ml b/typing/includeclass.ml index 8dc35115e..05a49bf43 100644 --- a/typing/includeclass.ml +++ b/typing/includeclass.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Inclusion checks for the class language *) open Types diff --git a/typing/includeclass.mli b/typing/includeclass.mli index 27784e960..48c5c0ca3 100644 --- a/typing/includeclass.mli +++ b/typing/includeclass.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Inclusion checks for the class language *) open Types diff --git a/typing/includecore.ml b/typing/includecore.ml index ebc281a02..3a2d9df82 100644 --- a/typing/includecore.ml +++ b/typing/includecore.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Inclusion checks for the core language *) open Asttypes diff --git a/typing/includecore.mli b/typing/includecore.mli index 8ddfcb163..083624194 100644 --- a/typing/includecore.mli +++ b/typing/includecore.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Inclusion checks for the core language *) open Typedtree diff --git a/typing/includemod.ml b/typing/includemod.ml index 367938a92..5a1d4b942 100644 --- a/typing/includemod.ml +++ b/typing/includemod.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Inclusion checks for the module language *) open Misc diff --git a/typing/includemod.mli b/typing/includemod.mli index c060a580a..5f2c414ae 100644 --- a/typing/includemod.mli +++ b/typing/includemod.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Inclusion checks for the module language *) open Typedtree diff --git a/typing/mtype.ml b/typing/mtype.ml index cda8186db..3d7dc2234 100644 --- a/typing/mtype.ml +++ b/typing/mtype.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Operations on module types *) open Asttypes diff --git a/typing/mtype.mli b/typing/mtype.mli index a24756dc0..0f821d64f 100644 --- a/typing/mtype.mli +++ b/typing/mtype.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Operations on module types *) open Types diff --git a/typing/oprint.ml b/typing/oprint.ml index e89402737..da6067e25 100644 --- a/typing/oprint.ml +++ b/typing/oprint.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Format open Outcometree diff --git a/typing/oprint.mli b/typing/oprint.mli index 5724355b8..56caa6095 100644 --- a/typing/oprint.mli +++ b/typing/oprint.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Format open Outcometree diff --git a/typing/outcometree.mli b/typing/outcometree.mli index 7d95672a0..13b0e6f93 100644 --- a/typing/outcometree.mli +++ b/typing/outcometree.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Module [Outcometree]: results displayed by the toplevel *) (* These types represent messages that the toplevel displays as normal diff --git a/typing/parmatch.ml b/typing/parmatch.ml index e8886297e..3d05b574e 100644 --- a/typing/parmatch.ml +++ b/typing/parmatch.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Detection of partial matches and unused match cases. *) open Misc diff --git a/typing/parmatch.mli b/typing/parmatch.mli index 77530d7ed..35b9884b3 100644 --- a/typing/parmatch.mli +++ b/typing/parmatch.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Detection of partial matches and unused match cases. *) open Asttypes open Typedtree diff --git a/typing/path.ml b/typing/path.ml index 7dc821a1e..260fc0731 100644 --- a/typing/path.ml +++ b/typing/path.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type t = Pident of Ident.t | Pdot of t * string * int diff --git a/typing/path.mli b/typing/path.mli index bdcc6ccab..c3f84130d 100644 --- a/typing/path.mli +++ b/typing/path.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Access paths *) type t = diff --git a/typing/predef.ml b/typing/predef.ml index f951bb8b3..7d05a7d2d 100644 --- a/typing/predef.ml +++ b/typing/predef.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Predefined type constructors (with special typing rules in typecore) *) open Asttypes diff --git a/typing/predef.mli b/typing/predef.mli index ced95d847..a2f472471 100644 --- a/typing/predef.mli +++ b/typing/predef.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Predefined type constructors (with special typing rules in typecore) *) open Types diff --git a/typing/primitive.ml b/typing/primitive.ml index a5c376596..17abeb34f 100644 --- a/typing/primitive.ml +++ b/typing/primitive.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Description of primitive functions *) open Misc diff --git a/typing/primitive.mli b/typing/primitive.mli index 0b48079a8..585dba0d1 100644 --- a/typing/primitive.mli +++ b/typing/primitive.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Description of primitive functions *) type description = diff --git a/typing/printtyp.ml b/typing/printtyp.ml index 9ccbc87e7..dd5774bf8 100644 --- a/typing/printtyp.ml +++ b/typing/printtyp.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Printing functions *) open Misc diff --git a/typing/printtyp.mli b/typing/printtyp.mli index b54667030..9b513e0ee 100644 --- a/typing/printtyp.mli +++ b/typing/printtyp.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Printing functions *) open Format diff --git a/typing/stypes.ml b/typing/stypes.ml index 158062f21..b70523187 100644 --- a/typing/stypes.ml +++ b/typing/stypes.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Recording and dumping (partial) type information *) (* diff --git a/typing/stypes.mli b/typing/stypes.mli index c51c45e25..02a467f57 100644 --- a/typing/stypes.mli +++ b/typing/stypes.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Recording and dumping (partial) type information *) (* Clflags.save_types must be true *) diff --git a/typing/subst.ml b/typing/subst.ml index 26c8a2300..a8d25fb18 100644 --- a/typing/subst.ml +++ b/typing/subst.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Substitutions *) open Misc diff --git a/typing/subst.mli b/typing/subst.mli index b5e200829..18d22ff3e 100644 --- a/typing/subst.mli +++ b/typing/subst.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Substitutions *) open Types diff --git a/typing/typeclass.ml b/typing/typeclass.ml index cab5cfc13..2becf5d01 100644 --- a/typing/typeclass.ml +++ b/typing/typeclass.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Parsetree open Asttypes open Path diff --git a/typing/typeclass.mli b/typing/typeclass.mli index 3329a8206..19a0a2aad 100644 --- a/typing/typeclass.mli +++ b/typing/typeclass.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Asttypes open Types open Format diff --git a/typing/typecore.ml b/typing/typecore.ml index 33182148d..c23d89aa5 100644 --- a/typing/typecore.ml +++ b/typing/typecore.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Typechecking for the core language *) open Misc diff --git a/typing/typecore.mli b/typing/typecore.mli index 92df37f0b..b7a1d667a 100644 --- a/typing/typecore.mli +++ b/typing/typecore.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Type inference for the core language *) open Asttypes diff --git a/typing/typedecl.ml b/typing/typedecl.ml index b6b74b4fa..65b582cb4 100644 --- a/typing/typedecl.ml +++ b/typing/typedecl.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (**** Typing of type definitions ****) open Misc diff --git a/typing/typedecl.mli b/typing/typedecl.mli index d911d059c..60d6b5797 100644 --- a/typing/typedecl.mli +++ b/typing/typedecl.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Typing of type definitions and primitive definitions *) open Asttypes diff --git a/typing/typedtree.ml b/typing/typedtree.ml index fda05b041..e83ec5e39 100644 --- a/typing/typedtree.ml +++ b/typing/typedtree.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Abstract syntax tree after typing *) open Misc diff --git a/typing/typedtree.mli b/typing/typedtree.mli index 81242993d..4418ed5ff 100644 --- a/typing/typedtree.mli +++ b/typing/typedtree.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Abstract syntax tree after typing *) open Asttypes diff --git a/typing/typemod.ml b/typing/typemod.ml index 8812ea3a6..7c737a12d 100644 --- a/typing/typemod.ml +++ b/typing/typemod.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Misc open Longident open Path diff --git a/typing/typemod.mli b/typing/typemod.mli index c339825d9..c90a12e45 100644 --- a/typing/typemod.mli +++ b/typing/typemod.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Type-checking of the module language *) open Types diff --git a/typing/types.ml b/typing/types.ml index 0ac4a9dab..b81824f61 100644 --- a/typing/types.ml +++ b/typing/types.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Representation of types and declarations *) open Asttypes diff --git a/typing/types.mli b/typing/types.mli index 33c1c8012..bc3cc62d7 100644 --- a/typing/types.mli +++ b/typing/types.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Representation of types and declarations *) open Asttypes diff --git a/typing/typetexp.mli b/typing/typetexp.mli index 0b6d09d30..0156c885c 100644 --- a/typing/typetexp.mli +++ b/typing/typetexp.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Typechecking of type expressions for the core language *) open Format;; diff --git a/utils/ccomp.ml b/utils/ccomp.ml index 66525e5b9..cd318b48c 100644 --- a/utils/ccomp.ml +++ b/utils/ccomp.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compiling C files and building C libraries *) let command cmdline = diff --git a/utils/ccomp.mli b/utils/ccomp.mli index 687c701fa..63a190c33 100644 --- a/utils/ccomp.mli +++ b/utils/ccomp.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Compiling C files and building C libraries *) val command: string -> int diff --git a/utils/clflags.ml b/utils/clflags.ml index ab10bcf4c..42ec3405b 100644 --- a/utils/clflags.ml +++ b/utils/clflags.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Command-line parameters *) let objfiles = ref ([] : string list) (* .cmo and .cma files *) diff --git a/utils/clflags.mli b/utils/clflags.mli index c73b7a15e..1560964b3 100644 --- a/utils/clflags.mli +++ b/utils/clflags.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - val objfiles : string list ref val ccobjs : string list ref val dllibs : string list ref diff --git a/utils/config.mlbuild b/utils/config.mlbuild index 06fc7da2b..b4189200e 100644 --- a/utils/config.mlbuild +++ b/utils/config.mlbuild @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (***********************************************************************) (** **) (** WARNING WARNING WARNING **) diff --git a/utils/config.mli b/utils/config.mli index a201dd43d..7829b9ee1 100644 --- a/utils/config.mli +++ b/utils/config.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* System configuration *) val version: string diff --git a/utils/config.mlp b/utils/config.mlp index f59243e95..4f3a40512 100644 --- a/utils/config.mlp +++ b/utils/config.mlp @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (***********************************************************************) (** **) (** WARNING WARNING WARNING **) diff --git a/utils/consistbl.ml b/utils/consistbl.ml index f724e4f8f..4bc42dc5b 100644 --- a/utils/consistbl.ml +++ b/utils/consistbl.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Consistency tables: for checking consistency of module CRCs *) type t = (string, Digest.t * string) Hashtbl.t diff --git a/utils/consistbl.mli b/utils/consistbl.mli index a877733b5..d3f2afcec 100644 --- a/utils/consistbl.mli +++ b/utils/consistbl.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Consistency tables: for checking consistency of module CRCs *) type t diff --git a/utils/misc.ml b/utils/misc.ml index f2891ee25..4930334e5 100644 --- a/utils/misc.ml +++ b/utils/misc.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Errors *) exception Fatal_error diff --git a/utils/misc.mli b/utils/misc.mli index b982a9444..a65d73989 100644 --- a/utils/misc.mli +++ b/utils/misc.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Miscellaneous useful types and functions *) val fatal_error: string -> 'a diff --git a/utils/tbl.ml b/utils/tbl.ml index 63c133a20..265bf3b8c 100644 --- a/utils/tbl.ml +++ b/utils/tbl.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - type ('a, 'b) t = Empty | Node of ('a, 'b) t * 'a * 'b * ('a, 'b) t * int diff --git a/utils/tbl.mli b/utils/tbl.mli index 626fd4c13..3167aa986 100644 --- a/utils/tbl.mli +++ b/utils/tbl.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Association tables from any ordered type to any type. We use the generic ordering to compare keys. *) diff --git a/utils/terminfo.ml b/utils/terminfo.ml index 4619ac61c..509e495c5 100644 --- a/utils/terminfo.ml +++ b/utils/terminfo.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Basic interface to the terminfo database *) type status = diff --git a/utils/terminfo.mli b/utils/terminfo.mli index 5fa3aa14e..3e8ab512f 100644 --- a/utils/terminfo.mli +++ b/utils/terminfo.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* Basic interface to the terminfo database *) type status = diff --git a/utils/warnings.ml b/utils/warnings.ml index 02621ea67..7067e561a 100644 --- a/utils/warnings.ml +++ b/utils/warnings.ml @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - (* When you change this, you need to update the documentation: - man/ocamlc.m in ocaml - man/ocamlopt.m in ocaml diff --git a/utils/warnings.mli b/utils/warnings.mli index fbffb33df..23785efde 100644 --- a/utils/warnings.mli +++ b/utils/warnings.mli @@ -10,8 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) - open Format type t = diff --git a/yacc/Makefile b/yacc/Makefile index fb560cfd3..deec351ae 100644 --- a/yacc/Makefile +++ b/yacc/Makefile @@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - # Makefile for the parser generator. include ../config/Makefile diff --git a/yacc/Makefile.nt b/yacc/Makefile.nt index 14a69f02d..32caa41e9 100644 --- a/yacc/Makefile.nt +++ b/yacc/Makefile.nt @@ -10,8 +10,6 @@ # # ######################################################################### -# $Id$ - # Makefile for the parser generator. include ../config/Makefile diff --git a/yacc/closure.c b/yacc/closure.c index b3f4659d0..d84c125bf 100644 --- a/yacc/closure.c +++ b/yacc/closure.c @@ -12,8 +12,6 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ - #include "defs.h" short *itemset; diff --git a/yacc/defs.h b/yacc/defs.h index 75c8ef101..0a823874f 100644 --- a/yacc/defs.h +++ b/yacc/defs.h @@ -12,8 +12,6 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ - #include <assert.h> #include <ctype.h> #include <errno.h> diff --git a/yacc/error.c b/yacc/error.c index f0b92d2d6..bae0565ae 100644 --- a/yacc/error.c +++ b/yacc/error.c @@ -12,8 +12,6 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ - /* routines for printing error messages */ #include "defs.h" diff --git a/yacc/lalr.c b/yacc/lalr.c index d595e76d7..781998011 100644 --- a/yacc/lalr.c +++ b/yacc/lalr.c @@ -12,8 +12,6 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ - #include "defs.h" typedef diff --git a/yacc/lr0.c b/yacc/lr0.c index 3da50da00..a5a62d341 100644 --- a/yacc/lr0.c +++ b/yacc/lr0.c @@ -12,9 +12,6 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ - - #include "defs.h" extern short *itemset; diff --git a/yacc/main.c b/yacc/main.c index 282dc0b23..f6cac60d4 100644 --- a/yacc/main.c +++ b/yacc/main.c @@ -12,8 +12,6 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ - #include <signal.h> #include <string.h> #include "defs.h" diff --git a/yacc/mkpar.c b/yacc/mkpar.c index 0e20724bf..55f4d4e55 100644 --- a/yacc/mkpar.c +++ b/yacc/mkpar.c @@ -12,9 +12,6 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ - - #include "defs.h" action **parser; diff --git a/yacc/output.c b/yacc/output.c index 9723d3fa6..4a497ebba 100644 --- a/yacc/output.c +++ b/yacc/output.c @@ -12,8 +12,6 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ - #include "defs.h" static int nvectors; diff --git a/yacc/reader.c b/yacc/reader.c index 1c36843d4..cf6d7021d 100644 --- a/yacc/reader.c +++ b/yacc/reader.c @@ -12,8 +12,6 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ - #include <string.h> #include "defs.h" diff --git a/yacc/skeleton.c b/yacc/skeleton.c index ffc47a3f0..976bec63f 100644 --- a/yacc/skeleton.c +++ b/yacc/skeleton.c @@ -12,8 +12,6 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ - #include "defs.h" char *header[] = diff --git a/yacc/symtab.c b/yacc/symtab.c index f30e4a90d..9d6e2c33b 100644 --- a/yacc/symtab.c +++ b/yacc/symtab.c @@ -12,8 +12,6 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ - #include <string.h> #include "defs.h" diff --git a/yacc/verbose.c b/yacc/verbose.c index 799c4969a..b28c87119 100644 --- a/yacc/verbose.c +++ b/yacc/verbose.c @@ -12,9 +12,6 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ - - #include "defs.h" diff --git a/yacc/warshall.c b/yacc/warshall.c index c9ec782be..f341cdfbc 100644 --- a/yacc/warshall.c +++ b/yacc/warshall.c @@ -12,8 +12,6 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ - #include "defs.h" void transitive_closure(unsigned int *R, int n) |