diff options
734 files changed, 1077 insertions, 1135 deletions
diff --git a/asmcomp/amd64/arch.ml b/asmcomp/amd64/arch.ml index 8e065d9ae0..3383f09a5f 100644 --- a/asmcomp/amd64/arch.ml +++ b/asmcomp/amd64/arch.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: arch.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Machine-specific command-line options *) diff --git a/asmcomp/asmgen.ml b/asmcomp/asmgen.ml index 5f513db1bb..a830f3c9fd 100644 --- a/asmcomp/asmgen.ml +++ b/asmcomp/asmgen.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: asmgen.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* From lambda to assembly code *) diff --git a/asmcomp/asmgen.mli b/asmcomp/asmgen.mli index f71cba8f7c..3a96a6b719 100644 --- a/asmcomp/asmgen.mli +++ b/asmcomp/asmgen.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: asmgen.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* From lambda to assembly code *) diff --git a/asmcomp/asmlibrarian.ml b/asmcomp/asmlibrarian.ml index e0d2170b5a..644a79f6ab 100644 --- a/asmcomp/asmlibrarian.ml +++ b/asmcomp/asmlibrarian.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: asmlibrarian.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Build libraries of .cmx files *) diff --git a/asmcomp/asmlibrarian.mli b/asmcomp/asmlibrarian.mli index 20a0380c9c..3016969f95 100644 --- a/asmcomp/asmlibrarian.mli +++ b/asmcomp/asmlibrarian.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: asmlibrarian.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Build libraries of .cmx files *) diff --git a/asmcomp/asmlink.mli b/asmcomp/asmlink.mli index b9465f8090..10939cb4cf 100644 --- a/asmcomp/asmlink.mli +++ b/asmcomp/asmlink.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: asmlink.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Link a set of .cmx/.o files and produce an executable or a plugin *) diff --git a/asmcomp/asmpackager.mli b/asmcomp/asmpackager.mli index fafccfea3b..6d630ff9a5 100644 --- a/asmcomp/asmpackager.mli +++ b/asmcomp/asmpackager.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: asmpackager.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* "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 9a01de819e..2d62ac6d15 100644 --- a/asmcomp/clambda.ml +++ b/asmcomp/clambda.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: clambda.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* 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 808c1c6dae..e51ba9644e 100644 --- a/asmcomp/clambda.mli +++ b/asmcomp/clambda.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: clambda.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* 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 03ed0c1241..8ec1a41bb7 100644 --- a/asmcomp/closure.ml +++ b/asmcomp/closure.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: closure.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Introduction of closures, uncurrying, recognition of direct calls *) diff --git a/asmcomp/closure.mli b/asmcomp/closure.mli index f406603c2c..385ba175de 100644 --- a/asmcomp/closure.mli +++ b/asmcomp/closure.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: closure.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Introduction of closures, uncurrying, recognition of direct calls *) diff --git a/asmcomp/cmm.ml b/asmcomp/cmm.ml index 7787a22042..c848033bc3 100644 --- a/asmcomp/cmm.ml +++ b/asmcomp/cmm.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: cmm.ml 12858 2012-08-10 14:45:51Z maranget $ *) type machtype_component = Addr diff --git a/asmcomp/cmm.mli b/asmcomp/cmm.mli index 5787bcb961..55de7b07d8 100644 --- a/asmcomp/cmm.mli +++ b/asmcomp/cmm.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: cmm.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Second intermediate language (machine independent) *) diff --git a/asmcomp/cmmgen.mli b/asmcomp/cmmgen.mli index a192b985e1..67101a481d 100644 --- a/asmcomp/cmmgen.mli +++ b/asmcomp/cmmgen.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: cmmgen.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Translation from closed lambda to C-- *) diff --git a/asmcomp/cmx_format.mli b/asmcomp/cmx_format.mli index 69cd38234f..ca729839c5 100644 --- a/asmcomp/cmx_format.mli +++ b/asmcomp/cmx_format.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: cmx_format.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Format of .cmx, .cmxa and .cmxs files *) diff --git a/asmcomp/codegen.ml b/asmcomp/codegen.ml index 4b71503f9d..6ba20c8755 100644 --- a/asmcomp/codegen.ml +++ b/asmcomp/codegen.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: codegen.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* From C-- to assembly code *) diff --git a/asmcomp/codegen.mli b/asmcomp/codegen.mli index 43f98e50b2..29d5acf651 100644 --- a/asmcomp/codegen.mli +++ b/asmcomp/codegen.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: codegen.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* From C-- to assembly code *) diff --git a/asmcomp/coloring.ml b/asmcomp/coloring.ml index 06c1eb8246..12fb24a747 100644 --- a/asmcomp/coloring.ml +++ b/asmcomp/coloring.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: coloring.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Register allocation by coloring of the interference graph *) diff --git a/asmcomp/coloring.mli b/asmcomp/coloring.mli index 72576fa10a..fda369943c 100644 --- a/asmcomp/coloring.mli +++ b/asmcomp/coloring.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: coloring.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Register allocation by coloring of the interference graph *) diff --git a/asmcomp/comballoc.ml b/asmcomp/comballoc.ml index 9767d2638a..873a4ea3a3 100644 --- a/asmcomp/comballoc.ml +++ b/asmcomp/comballoc.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: comballoc.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Combine heap allocations occurring in the same basic block *) diff --git a/asmcomp/comballoc.mli b/asmcomp/comballoc.mli index 20be980544..0c25ccaf37 100644 --- a/asmcomp/comballoc.mli +++ b/asmcomp/comballoc.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: comballoc.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Combine heap allocations occurring in the same basic block *) diff --git a/asmcomp/compilenv.ml b/asmcomp/compilenv.ml index 4c6e72d0b5..8ac13bde65 100644 --- a/asmcomp/compilenv.ml +++ b/asmcomp/compilenv.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: compilenv.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Compilation environments for compilation units *) diff --git a/asmcomp/emit.mli b/asmcomp/emit.mli index e2ff68ffcd..df0ec75605 100644 --- a/asmcomp/emit.mli +++ b/asmcomp/emit.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: emit.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Generation of assembly code *) diff --git a/asmcomp/emitaux.mli b/asmcomp/emitaux.mli index c7fe802e51..471a135f0e 100644 --- a/asmcomp/emitaux.mli +++ b/asmcomp/emitaux.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: emitaux.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Common functions for emitting assembly code *) diff --git a/asmcomp/i386/emit_nt.mlp b/asmcomp/i386/emit_nt.mlp index 48704ab401..ac0ed41433 100644 --- a/asmcomp/i386/emit_nt.mlp +++ b/asmcomp/i386/emit_nt.mlp @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: emit_nt.mlp 12858 2012-08-10 14:45:51Z maranget $ *) (* Emission of Intel 386 assembly code, MASM syntax. *) diff --git a/asmcomp/interf.mli b/asmcomp/interf.mli index 9e16f83641..7c5a08158e 100644 --- a/asmcomp/interf.mli +++ b/asmcomp/interf.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: interf.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Construction of the interference graph. Annotate pseudoregs with interference lists and preference lists. *) diff --git a/asmcomp/linearize.ml b/asmcomp/linearize.ml index 8a5411876a..e70179f9b5 100644 --- a/asmcomp/linearize.ml +++ b/asmcomp/linearize.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: linearize.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Transformation of Mach code into a list of pseudo-instructions. *) diff --git a/asmcomp/linearize.mli b/asmcomp/linearize.mli index 9fbe14ddb0..a1448b839a 100644 --- a/asmcomp/linearize.mli +++ b/asmcomp/linearize.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: linearize.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Transformation of Mach code into a list of pseudo-instructions. *) diff --git a/asmcomp/liveness.ml b/asmcomp/liveness.ml index 74a034fb39..5df43a6f09 100644 --- a/asmcomp/liveness.ml +++ b/asmcomp/liveness.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: liveness.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* 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 8a25a27bc6..c230a7b26c 100644 --- a/asmcomp/liveness.mli +++ b/asmcomp/liveness.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: liveness.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* 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 3d29bde11b..30277d64f7 100644 --- a/asmcomp/mach.ml +++ b/asmcomp/mach.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: mach.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Representation of machine code by sequences of pseudoinstructions *) diff --git a/asmcomp/mach.mli b/asmcomp/mach.mli index 05cc999b53..547a0302d6 100644 --- a/asmcomp/mach.mli +++ b/asmcomp/mach.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: mach.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Representation of machine code by sequences of pseudoinstructions *) diff --git a/asmcomp/power/reload.ml b/asmcomp/power/reload.ml index ef0ab79df6..14c76de415 100644 --- a/asmcomp/power/reload.ml +++ b/asmcomp/power/reload.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: reload.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Reloading for the PowerPC *) diff --git a/asmcomp/power/scheduling.ml b/asmcomp/power/scheduling.ml index 90d08831d5..104521efea 100644 --- a/asmcomp/power/scheduling.ml +++ b/asmcomp/power/scheduling.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: scheduling.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Instruction scheduling for the Power PC *) diff --git a/asmcomp/power/selection.ml b/asmcomp/power/selection.ml index 179548af5c..ab83df58ec 100644 --- a/asmcomp/power/selection.ml +++ b/asmcomp/power/selection.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: selection.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Instruction selection for the Power PC processor *) diff --git a/asmcomp/printcmm.ml b/asmcomp/printcmm.ml index ca1c0f11c3..514671e39e 100644 --- a/asmcomp/printcmm.ml +++ b/asmcomp/printcmm.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printcmm.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Pretty-printing of C-- code *) diff --git a/asmcomp/printcmm.mli b/asmcomp/printcmm.mli index c646576531..1c3502dea8 100644 --- a/asmcomp/printcmm.mli +++ b/asmcomp/printcmm.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printcmm.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Pretty-printing of C-- code *) diff --git a/asmcomp/printlinear.ml b/asmcomp/printlinear.ml index 0ac6e06551..9feaa3c659 100644 --- a/asmcomp/printlinear.ml +++ b/asmcomp/printlinear.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printlinear.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Pretty-printing of linearized machine code *) diff --git a/asmcomp/printlinear.mli b/asmcomp/printlinear.mli index bb179c94c1..ecaf2a19e3 100644 --- a/asmcomp/printlinear.mli +++ b/asmcomp/printlinear.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printlinear.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Pretty-printing of linearized machine code *) diff --git a/asmcomp/printmach.ml b/asmcomp/printmach.ml index 93d0a02247..57c474fa2c 100644 --- a/asmcomp/printmach.ml +++ b/asmcomp/printmach.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printmach.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Pretty-printing of pseudo machine code *) diff --git a/asmcomp/printmach.mli b/asmcomp/printmach.mli index 509018d54c..d65a0260aa 100644 --- a/asmcomp/printmach.mli +++ b/asmcomp/printmach.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printmach.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Pretty-printing of pseudo machine code *) diff --git a/asmcomp/proc.mli b/asmcomp/proc.mli index 7d0a5e485b..520e4dab09 100644 --- a/asmcomp/proc.mli +++ b/asmcomp/proc.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: proc.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Processor descriptions *) diff --git a/asmcomp/reg.ml b/asmcomp/reg.ml index 30c0ab5ab0..a46cb7fd31 100644 --- a/asmcomp/reg.ml +++ b/asmcomp/reg.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: reg.ml 12858 2012-08-10 14:45:51Z maranget $ *) open Cmm diff --git a/asmcomp/reg.mli b/asmcomp/reg.mli index 11e314f613..81ab363d65 100644 --- a/asmcomp/reg.mli +++ b/asmcomp/reg.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: reg.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Pseudo-registers *) diff --git a/asmcomp/reload.mli b/asmcomp/reload.mli index ff4b1637a5..102379783a 100644 --- a/asmcomp/reload.mli +++ b/asmcomp/reload.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: reload.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Insert load/stores for pseudoregs that got assigned to stack locations. *) diff --git a/asmcomp/reloadgen.ml b/asmcomp/reloadgen.ml index 9da79587a2..d541455ff5 100644 --- a/asmcomp/reloadgen.ml +++ b/asmcomp/reloadgen.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: reloadgen.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Insert load/stores for pseudoregs that got assigned to stack locations. *) diff --git a/asmcomp/reloadgen.mli b/asmcomp/reloadgen.mli index 9f0b2b4e1d..bda3f112d0 100644 --- a/asmcomp/reloadgen.mli +++ b/asmcomp/reloadgen.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: reloadgen.mli 12858 2012-08-10 14:45:51Z maranget $ *) class reload_generic : object method reload_operation : diff --git a/asmcomp/schedgen.mli b/asmcomp/schedgen.mli index e2c046d229..d31c12e9ea 100644 --- a/asmcomp/schedgen.mli +++ b/asmcomp/schedgen.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: schedgen.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Instruction scheduling *) diff --git a/asmcomp/scheduling.mli b/asmcomp/scheduling.mli index a006d1f13f..195f9a100e 100644 --- a/asmcomp/scheduling.mli +++ b/asmcomp/scheduling.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: scheduling.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Instruction scheduling *) diff --git a/asmcomp/selectgen.ml b/asmcomp/selectgen.ml index e2ffd34ac8..e626c85338 100644 --- a/asmcomp/selectgen.ml +++ b/asmcomp/selectgen.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: selectgen.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Selection of pseudo-instructions, assignment of pseudo-registers, sequentialization. *) diff --git a/asmcomp/selectgen.mli b/asmcomp/selectgen.mli index 058f9e73e1..3f3642330f 100644 --- a/asmcomp/selectgen.mli +++ b/asmcomp/selectgen.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: selectgen.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Selection of pseudo-instructions, assignment of pseudo-registers, sequentialization. *) diff --git a/asmcomp/selection.mli b/asmcomp/selection.mli index a78cb1daec..cbb91ebf25 100644 --- a/asmcomp/selection.mli +++ b/asmcomp/selection.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: selection.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Selection of pseudo-instructions, assignment of pseudo-registers, sequentialization. *) diff --git a/asmcomp/sparc/proc.ml b/asmcomp/sparc/proc.ml index f7b204db5a..ad84b4a72b 100644 --- a/asmcomp/sparc/proc.ml +++ b/asmcomp/sparc/proc.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: proc.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Description of the Sparc processor *) diff --git a/asmcomp/sparc/scheduling.ml b/asmcomp/sparc/scheduling.ml index 180af4b193..9b5a2736a6 100644 --- a/asmcomp/sparc/scheduling.ml +++ b/asmcomp/sparc/scheduling.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: scheduling.ml 12858 2012-08-10 14:45:51Z maranget $ *) open Cmm open Mach diff --git a/asmcomp/spill.ml b/asmcomp/spill.ml index 7b055959e8..e3e6cbcb40 100644 --- a/asmcomp/spill.ml +++ b/asmcomp/spill.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: spill.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Insertion of moves to suggest possible spilling / reloading points before register allocation. *) diff --git a/asmcomp/spill.mli b/asmcomp/spill.mli index 4db4222272..ef6b280c2e 100644 --- a/asmcomp/spill.mli +++ b/asmcomp/spill.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: spill.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Insertion of moves to suggest possible spilling / reloading points before register allocation. *) diff --git a/asmcomp/split.mli b/asmcomp/split.mli index baf350d50b..03d5b7e664 100644 --- a/asmcomp/split.mli +++ b/asmcomp/split.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: split.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Renaming of registers at reload points to split live ranges. *) diff --git a/asmrun/Makefile b/asmrun/Makefile index 4d7e6552b8..a41b5cf8d7 100644 --- a/asmrun/Makefile +++ b/asmrun/Makefile @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile 12959 2012-09-27 13:12:51Z maranget $ include ../config/Makefile diff --git a/asmrun/Makefile.nt b/asmrun/Makefile.nt index 3cefe2d380..e5cdde16de 100644 --- a/asmrun/Makefile.nt +++ b/asmrun/Makefile.nt @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile.nt 12959 2012-09-27 13:12:51Z maranget $ include ../config/Makefile diff --git a/asmrun/amd64nt.asm b/asmrun/amd64nt.asm index 7dfb31437c..d96f83970e 100644 --- a/asmrun/amd64nt.asm +++ b/asmrun/amd64nt.asm @@ -11,7 +11,7 @@ ;* * ;*********************************************************************** -; $Id$ +; $Id: amd64nt.asm 12858 2012-08-10 14:45:51Z maranget $ ; Asm part of the runtime system, AMD64 processor, Intel syntax diff --git a/asmrun/arm.S b/asmrun/arm.S index 64829566e0..a2dd318dec 100644 --- a/asmrun/arm.S +++ b/asmrun/arm.S @@ -12,7 +12,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: arm.S 12858 2012-08-10 14:45:51Z maranget $ */ /* Asm part of the runtime system, ARM processor */ /* Must be preprocessed by cpp */ diff --git a/asmrun/backtrace.c b/asmrun/backtrace.c index 7b47c0bfc9..68043a9dd2 100644 --- a/asmrun/backtrace.c +++ b/asmrun/backtrace.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: backtrace.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Stack backtrace for uncaught exceptions */ diff --git a/asmrun/fail.c b/asmrun/fail.c index 77cf4246cb..70ff6413b3 100644 --- a/asmrun/fail.c +++ b/asmrun/fail.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: fail.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Raising exceptions from C. */ diff --git a/asmrun/i386nt.asm b/asmrun/i386nt.asm index 7649a8a41f..d45720ff9d 100644 --- a/asmrun/i386nt.asm +++ b/asmrun/i386nt.asm @@ -11,7 +11,7 @@ ;* * ;*********************************************************************** -; $Id$ +; $Id: i386nt.asm 12858 2012-08-10 14:45:51Z maranget $ ; Asm part of the runtime system, Intel 386 processor, Intel syntax diff --git a/asmrun/power-elf.S b/asmrun/power-elf.S index 8618b50a15..03c4090f68 100644 --- a/asmrun/power-elf.S +++ b/asmrun/power-elf.S @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: power-elf.S 12858 2012-08-10 14:45:51Z maranget $ */ #define Addrglobal(reg,glob) \ addis reg, 0, glob@ha; \ diff --git a/asmrun/power-rhapsody.S b/asmrun/power-rhapsody.S index 843e056af2..85f534ae02 100644 --- a/asmrun/power-rhapsody.S +++ b/asmrun/power-rhapsody.S @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: power-rhapsody.S 12858 2012-08-10 14:45:51Z maranget $ */ #ifdef __ppc64__ #define X(a,b) b diff --git a/asmrun/roots.c b/asmrun/roots.c index edb7429d7d..79a2422f24 100644 --- a/asmrun/roots.c +++ b/asmrun/roots.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: roots.c 12858 2012-08-10 14:45:51Z maranget $ */ /* To walk the memory roots for garbage collection */ diff --git a/asmrun/signals_asm.c b/asmrun/signals_asm.c index 9d42718b8f..2a9fb7fa6f 100644 --- a/asmrun/signals_asm.c +++ b/asmrun/signals_asm.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: signals_asm.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Signal handling, code specific to the native-code compiler */ diff --git a/asmrun/signals_osdep.h b/asmrun/signals_osdep.h index 830c43b386..bbc39f3c6d 100644 --- a/asmrun/signals_osdep.h +++ b/asmrun/signals_osdep.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: signals_osdep.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Processor- and OS-dependent signal interface */ diff --git a/asmrun/sparc.S b/asmrun/sparc.S index 261743159b..0847b3b919 100644 --- a/asmrun/sparc.S +++ b/asmrun/sparc.S @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: sparc.S 12858 2012-08-10 14:45:51Z maranget $ */ /* 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 9b575cb70c..3f430c8f7b 100644 --- a/asmrun/stack.h +++ b/asmrun/stack.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: stack.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Machine-dependent interface with the asm code */ diff --git a/asmrun/startup.c b/asmrun/startup.c index a04fa84fcb..4070579af5 100644 --- a/asmrun/startup.c +++ b/asmrun/startup.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: startup.c 12959 2012-09-27 13:12:51Z maranget $ */ /* Start-up code */ diff --git a/build/camlp4-targets.sh b/build/camlp4-targets.sh index 4f4f51979e..376fb4de77 100644 --- a/build/camlp4-targets.sh +++ b/build/camlp4-targets.sh @@ -12,7 +12,7 @@ # # ######################################################################### -# $Id$ +# $Id: camlp4-targets.sh 12858 2012-08-10 14:45:51Z maranget $ CAMLP4_COMMON="\ camlp4/Camlp4/Camlp4Ast.partial.ml \ camlp4/boot/camlp4boot.byte" diff --git a/build/otherlibs-targets.sh b/build/otherlibs-targets.sh index a3890d038a..57fd44d57d 100644 --- a/build/otherlibs-targets.sh +++ b/build/otherlibs-targets.sh @@ -12,7 +12,7 @@ # # ######################################################################### -# $Id$ +# $Id: otherlibs-targets.sh 12858 2012-08-10 14:45:51Z maranget $ OTHERLIBS_BYTE="" OTHERLIBS_NATIVE="" diff --git a/build/targets.sh b/build/targets.sh index f1214a1012..8d9b54d0d9 100644 --- a/build/targets.sh +++ b/build/targets.sh @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: targets.sh 12858 2012-08-10 14:45:51Z maranget $ . config/config.sh . build/otherlibs-targets.sh diff --git a/bytecomp/bytegen.ml b/bytecomp/bytegen.ml index 105be62d12..7492dbd2e7 100644 --- a/bytecomp/bytegen.ml +++ b/bytecomp/bytegen.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: bytegen.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* bytegen.ml : translation of lambda terms to lists of instructions. *) diff --git a/bytecomp/bytegen.mli b/bytecomp/bytegen.mli index e0cd5f6179..6158ed1479 100644 --- a/bytecomp/bytegen.mli +++ b/bytecomp/bytegen.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: bytegen.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Generation of bytecode from lambda terms *) diff --git a/bytecomp/bytelibrarian.ml b/bytecomp/bytelibrarian.ml index 21427c8440..0bb396b982 100644 --- a/bytecomp/bytelibrarian.ml +++ b/bytecomp/bytelibrarian.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: bytelibrarian.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Build libraries of .cmo files *) diff --git a/bytecomp/bytelibrarian.mli b/bytecomp/bytelibrarian.mli index 2420111593..99d8e1220d 100644 --- a/bytecomp/bytelibrarian.mli +++ b/bytecomp/bytelibrarian.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: bytelibrarian.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Build libraries of .cmo files *) diff --git a/bytecomp/bytelink.mli b/bytecomp/bytelink.mli index 1366a1686f..63e7b31a49 100644 --- a/bytecomp/bytelink.mli +++ b/bytecomp/bytelink.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: bytelink.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Link .cmo files and produce a bytecode executable. *) diff --git a/bytecomp/bytepackager.ml b/bytecomp/bytepackager.ml index 089c5f6dc0..aa25c5e286 100644 --- a/bytecomp/bytepackager.ml +++ b/bytecomp/bytepackager.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: bytepackager.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* "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 696b12aa09..47592011ca 100644 --- a/bytecomp/bytepackager.mli +++ b/bytecomp/bytepackager.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: bytepackager.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* "Package" a set of .cmo files into one .cmo file having the original compilation units as sub-modules. *) diff --git a/bytecomp/bytesections.mli b/bytecomp/bytesections.mli index c9264ad899..606b435cef 100644 --- a/bytecomp/bytesections.mli +++ b/bytecomp/bytesections.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: bytesections.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Handling of sections in bytecode executable files *) diff --git a/bytecomp/cmo_format.mli b/bytecomp/cmo_format.mli index b0cd05d67c..e4e252c4a2 100644 --- a/bytecomp/cmo_format.mli +++ b/bytecomp/cmo_format.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: cmo_format.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Symbol table information for .cmo and .cma files *) diff --git a/bytecomp/dll.ml b/bytecomp/dll.ml index ac6ce57e58..89a3f227a2 100644 --- a/bytecomp/dll.ml +++ b/bytecomp/dll.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: dll.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Handling of dynamically-linked libraries *) diff --git a/bytecomp/dll.mli b/bytecomp/dll.mli index 645db75a84..56bc64aee0 100644 --- a/bytecomp/dll.mli +++ b/bytecomp/dll.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: dll.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Handling of dynamically-linked libraries *) diff --git a/bytecomp/emitcode.ml b/bytecomp/emitcode.ml index f9a33db731..2e1cfb2fa7 100644 --- a/bytecomp/emitcode.ml +++ b/bytecomp/emitcode.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: emitcode.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Generation of bytecode + relocation information *) diff --git a/bytecomp/emitcode.mli b/bytecomp/emitcode.mli index 55f3dff11d..c74d81e106 100644 --- a/bytecomp/emitcode.mli +++ b/bytecomp/emitcode.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: emitcode.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Generation of bytecode for .cmo files *) diff --git a/bytecomp/instruct.ml b/bytecomp/instruct.ml index 7757c7d484..0d134a4823 100644 --- a/bytecomp/instruct.ml +++ b/bytecomp/instruct.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: instruct.ml 12858 2012-08-10 14:45:51Z maranget $ *) open Lambda diff --git a/bytecomp/instruct.mli b/bytecomp/instruct.mli index 010a579768..6a49ffc847 100644 --- a/bytecomp/instruct.mli +++ b/bytecomp/instruct.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: instruct.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* The type of the instructions of the abstract machine *) diff --git a/bytecomp/lambda.mli b/bytecomp/lambda.mli index 5d7dc9498e..3732d1a42f 100644 --- a/bytecomp/lambda.mli +++ b/bytecomp/lambda.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: lambda.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* The "lambda" intermediate code *) diff --git a/bytecomp/matching.mli b/bytecomp/matching.mli index 8c77abdd73..4b8b9024fa 100644 --- a/bytecomp/matching.mli +++ b/bytecomp/matching.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: matching.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Compilation of pattern-matching *) diff --git a/bytecomp/meta.ml b/bytecomp/meta.ml index 732bcc8a1a..638dc8fcd4 100644 --- a/bytecomp/meta.ml +++ b/bytecomp/meta.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: meta.ml 12858 2012-08-10 14:45:51Z maranget $ *) external global_data : unit -> Obj.t array = "caml_get_global_data" external realloc_global_data : int -> unit = "caml_realloc_global" diff --git a/bytecomp/meta.mli b/bytecomp/meta.mli index 93be656ad5..a639ece346 100644 --- a/bytecomp/meta.mli +++ b/bytecomp/meta.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: meta.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* To control the runtime system and bytecode interpreter *) diff --git a/bytecomp/printinstr.ml b/bytecomp/printinstr.ml index f2aa87dc37..c90be245cd 100644 --- a/bytecomp/printinstr.ml +++ b/bytecomp/printinstr.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printinstr.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Pretty-print lists of instructions *) diff --git a/bytecomp/printinstr.mli b/bytecomp/printinstr.mli index 57cea578b5..b6ed1b09e0 100644 --- a/bytecomp/printinstr.mli +++ b/bytecomp/printinstr.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printinstr.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Pretty-print lists of instructions *) diff --git a/bytecomp/printlambda.ml b/bytecomp/printlambda.ml index cb99003b29..96fc66ba8e 100644 --- a/bytecomp/printlambda.ml +++ b/bytecomp/printlambda.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printlambda.ml 12858 2012-08-10 14:45:51Z maranget $ *) open Format open Asttypes diff --git a/bytecomp/printlambda.mli b/bytecomp/printlambda.mli index 0cbd59ed60..ce95c93798 100644 --- a/bytecomp/printlambda.mli +++ b/bytecomp/printlambda.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printlambda.mli 12858 2012-08-10 14:45:51Z maranget $ *) open Lambda diff --git a/bytecomp/runtimedef.mli b/bytecomp/runtimedef.mli index 4892000947..954bd68063 100644 --- a/bytecomp/runtimedef.mli +++ b/bytecomp/runtimedef.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: runtimedef.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Values and functions known and/or provided by the runtime system *) diff --git a/bytecomp/simplif.ml b/bytecomp/simplif.ml index 1883f71518..ef70bf918d 100644 --- a/bytecomp/simplif.ml +++ b/bytecomp/simplif.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: simplif.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Elimination of useless Llet(Alias) bindings. Also transform let-bound references into variables. *) diff --git a/bytecomp/simplif.mli b/bytecomp/simplif.mli index 816c44b847..d02005d8f0 100644 --- a/bytecomp/simplif.mli +++ b/bytecomp/simplif.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: simplif.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Elimination of useless Llet(Alias) bindings. Transformation of let-bound references into variables. diff --git a/bytecomp/symtable.ml b/bytecomp/symtable.ml index 0785316f60..ef8e9be8fd 100644 --- a/bytecomp/symtable.ml +++ b/bytecomp/symtable.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: symtable.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* To assign numbers to globals and primitives *) diff --git a/bytecomp/symtable.mli b/bytecomp/symtable.mli index d9a2be3531..97d63d466c 100644 --- a/bytecomp/symtable.mli +++ b/bytecomp/symtable.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: symtable.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Assign locations and numbers to globals and primitives *) diff --git a/bytecomp/translclass.mli b/bytecomp/translclass.mli index 34dd7e671d..a4c225bc3d 100644 --- a/bytecomp/translclass.mli +++ b/bytecomp/translclass.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: translclass.mli 12959 2012-09-27 13:12:51Z maranget $ *) open Typedtree open Lambda diff --git a/bytecomp/translmod.mli b/bytecomp/translmod.mli index 5b6d0a0065..e209db8da7 100644 --- a/bytecomp/translmod.mli +++ b/bytecomp/translmod.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: translmod.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Translation from typed abstract syntax to lambda terms, for the module language *) diff --git a/bytecomp/translobj.ml b/bytecomp/translobj.ml index f72e34b0ae..2eb1656dc6 100644 --- a/bytecomp/translobj.ml +++ b/bytecomp/translobj.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: translobj.ml 12858 2012-08-10 14:45:51Z maranget $ *) open Misc open Primitive diff --git a/bytecomp/translobj.mli b/bytecomp/translobj.mli index be1e6a90fc..3dfb90138b 100644 --- a/bytecomp/translobj.mli +++ b/bytecomp/translobj.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: translobj.mli 12858 2012-08-10 14:45:51Z maranget $ *) open Lambda diff --git a/bytecomp/typeopt.mli b/bytecomp/typeopt.mli index f4efd7f0fc..c58ef37913 100644 --- a/bytecomp/typeopt.mli +++ b/bytecomp/typeopt.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: typeopt.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Auxiliaries for type-based optimizations, e.g. array kinds *) diff --git a/byterun/Makefile b/byterun/Makefile index e35121252b..8b1d0cb3c2 100644 --- a/byterun/Makefile +++ b/byterun/Makefile @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile 12959 2012-09-27 13:12:51Z maranget $ include Makefile.common diff --git a/byterun/Makefile.nt b/byterun/Makefile.nt index b93fa58a85..f627d0d5d3 100644 --- a/byterun/Makefile.nt +++ b/byterun/Makefile.nt @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile.nt 12858 2012-08-10 14:45:51Z maranget $ include Makefile.common diff --git a/byterun/alloc.c b/byterun/alloc.c index 034562e8ea..67893b2bc5 100644 --- a/byterun/alloc.c +++ b/byterun/alloc.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: alloc.c 12858 2012-08-10 14:45:51Z maranget $ */ /* 1. Allocation functions doing the same work as the macros in the case where [Setup_for_gc] and [Restore_after_gc] are no-ops. diff --git a/byterun/alloc.h b/byterun/alloc.h index 75dd5ec8f9..3d571604ed 100644 --- a/byterun/alloc.h +++ b/byterun/alloc.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: alloc.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_ALLOC_H #define CAML_ALLOC_H diff --git a/byterun/array.c b/byterun/array.c index 637fe9c804..8ab0c53d96 100644 --- a/byterun/array.c +++ b/byterun/array.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: array.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Operations on arrays */ diff --git a/byterun/backtrace.c b/byterun/backtrace.c index b5efdc3db6..8638dd2f68 100644 --- a/byterun/backtrace.c +++ b/byterun/backtrace.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: backtrace.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Stack backtrace for uncaught exceptions */ diff --git a/byterun/backtrace.h b/byterun/backtrace.h index 23c72e6c94..30f6882b82 100644 --- a/byterun/backtrace.h +++ b/byterun/backtrace.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: backtrace.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_BACKTRACE_H #define CAML_BACKTRACE_H diff --git a/byterun/callback.c b/byterun/callback.c index c7fc772208..7ccca6d098 100644 --- a/byterun/callback.c +++ b/byterun/callback.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: callback.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Callbacks from C to OCaml */ diff --git a/byterun/callback.h b/byterun/callback.h index dd094c4dec..a9919759e9 100644 --- a/byterun/callback.h +++ b/byterun/callback.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: callback.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Callbacks from C to OCaml */ diff --git a/byterun/compact.h b/byterun/compact.h index 949a2766ed..e8d13eaff7 100644 --- a/byterun/compact.h +++ b/byterun/compact.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: compact.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_COMPACT_H #define CAML_COMPACT_H diff --git a/byterun/compare.c b/byterun/compare.c index c0ee65a260..72015485ab 100644 --- a/byterun/compare.c +++ b/byterun/compare.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: compare.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <string.h> #include <stdlib.h> diff --git a/byterun/compare.h b/byterun/compare.h index c73a49a46f..9e7b376d93 100644 --- a/byterun/compare.h +++ b/byterun/compare.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: compare.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_COMPARE_H #define CAML_COMPARE_H diff --git a/byterun/compatibility.h b/byterun/compatibility.h index 429d2275d7..ec0f94e0d6 100644 --- a/byterun/compatibility.h +++ b/byterun/compatibility.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: compatibility.h 12858 2012-08-10 14:45:51Z maranget $ */ /* definitions for compatibility with old identifiers */ diff --git a/byterun/config.h b/byterun/config.h index b36b73c955..7ed7ca0c4c 100644 --- a/byterun/config.h +++ b/byterun/config.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: config.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_CONFIG_H #define CAML_CONFIG_H diff --git a/byterun/custom.c b/byterun/custom.c index 5f6e7f9a0a..181f0727ca 100644 --- a/byterun/custom.c +++ b/byterun/custom.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: custom.c 12959 2012-09-27 13:12:51Z maranget $ */ #include <string.h> diff --git a/byterun/custom.h b/byterun/custom.h index c6abad8ef0..949476ef2d 100644 --- a/byterun/custom.h +++ b/byterun/custom.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: custom.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_CUSTOM_H #define CAML_CUSTOM_H diff --git a/byterun/debugger.c b/byterun/debugger.c index a114b46cbc..c787b17851 100644 --- a/byterun/debugger.c +++ b/byterun/debugger.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: debugger.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Interface with the byte-code debugger */ diff --git a/byterun/debugger.h b/byterun/debugger.h index a9501abff1..5847684786 100644 --- a/byterun/debugger.h +++ b/byterun/debugger.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: debugger.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Interface with the debugger */ diff --git a/byterun/dynlink.c b/byterun/dynlink.c index 2a431e57d0..d6fe186a07 100644 --- a/byterun/dynlink.c +++ b/byterun/dynlink.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: dynlink.c 12959 2012-09-27 13:12:51Z maranget $ */ /* Dynamic loading of C primitives. */ diff --git a/byterun/dynlink.h b/byterun/dynlink.h index b1d14d844f..7a34bf08f5 100644 --- a/byterun/dynlink.h +++ b/byterun/dynlink.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: dynlink.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Dynamic loading of C primitives. */ diff --git a/byterun/exec.h b/byterun/exec.h index 88cf6d28b7..9c6af84e9e 100644 --- a/byterun/exec.h +++ b/byterun/exec.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: exec.h 12858 2012-08-10 14:45:51Z maranget $ */ /* exec.h : format of executable bytecode files */ diff --git a/byterun/fail.c b/byterun/fail.c index b0beaa437a..1fcde5af36 100644 --- a/byterun/fail.c +++ b/byterun/fail.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: fail.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Raising exceptions from C. */ diff --git a/byterun/fail.h b/byterun/fail.h index ee05eb7f8a..d3b3141167 100644 --- a/byterun/fail.h +++ b/byterun/fail.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: fail.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_FAIL_H #define CAML_FAIL_H diff --git a/byterun/finalise.c b/byterun/finalise.c index 9a93084ae4..307e38ddb5 100644 --- a/byterun/finalise.c +++ b/byterun/finalise.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: finalise.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Handling of finalised values. */ diff --git a/byterun/finalise.h b/byterun/finalise.h index e41baa320c..546c045d18 100644 --- a/byterun/finalise.h +++ b/byterun/finalise.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: finalise.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_FINALISE_H #define CAML_FINALISE_H diff --git a/byterun/fix_code.h b/byterun/fix_code.h index 05f9ae060b..15c8abf7df 100644 --- a/byterun/fix_code.h +++ b/byterun/fix_code.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: fix_code.h 12959 2012-09-27 13:12:51Z maranget $ */ /* Handling of blocks of bytecode (endianness switch, threading). */ diff --git a/byterun/floats.c b/byterun/floats.c index f708d70f70..636513fcb6 100644 --- a/byterun/floats.c +++ b/byterun/floats.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: floats.c 12858 2012-08-10 14:45:51Z maranget $ */ /* The interface of this file is in "mlvalues.h" and "alloc.h" */ diff --git a/byterun/freelist.c b/byterun/freelist.c index 6b50d3f9e6..85805ab4c5 100644 --- a/byterun/freelist.c +++ b/byterun/freelist.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: freelist.c 12959 2012-09-27 13:12:51Z maranget $ */ #define FREELIST_DEBUG 0 #if FREELIST_DEBUG diff --git a/byterun/freelist.h b/byterun/freelist.h index b4285d9556..92463f3c25 100644 --- a/byterun/freelist.h +++ b/byterun/freelist.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: freelist.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Free lists of heap blocks. */ diff --git a/byterun/gc.h b/byterun/gc.h index 4f67ed9066..4657f4b513 100644 --- a/byterun/gc.h +++ b/byterun/gc.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: gc.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_GC_H #define CAML_GC_H diff --git a/byterun/gc_ctrl.c b/byterun/gc_ctrl.c index 2ae3165d9f..0f646404d5 100644 --- a/byterun/gc_ctrl.c +++ b/byterun/gc_ctrl.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: gc_ctrl.c 12959 2012-09-27 13:12:51Z maranget $ */ #include "alloc.h" #include "compact.h" diff --git a/byterun/gc_ctrl.h b/byterun/gc_ctrl.h index 4dba74fa57..2167551b42 100644 --- a/byterun/gc_ctrl.h +++ b/byterun/gc_ctrl.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: gc_ctrl.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_GC_CTRL_H #define CAML_GC_CTRL_H diff --git a/byterun/globroots.c b/byterun/globroots.c index 513b7be553..a8ad387bb2 100644 --- a/byterun/globroots.c +++ b/byterun/globroots.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: globroots.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Registration of global memory roots */ diff --git a/byterun/globroots.h b/byterun/globroots.h index 97a1edab15..6b1b427137 100644 --- a/byterun/globroots.h +++ b/byterun/globroots.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: globroots.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Registration of global memory roots */ diff --git a/byterun/hash.c b/byterun/hash.c index 26a1bf5979..30532d2e06 100644 --- a/byterun/hash.c +++ b/byterun/hash.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: hash.c 12858 2012-08-10 14:45:51Z maranget $ */ /* The generic hashing primitive */ diff --git a/byterun/instrtrace.c b/byterun/instrtrace.c index 1c329daa69..e4cd99e1b2 100644 --- a/byterun/instrtrace.c +++ b/byterun/instrtrace.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: instrtrace.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Trace the instructions executed */ diff --git a/byterun/instrtrace.h b/byterun/instrtrace.h index 686b9e4ed6..9632b201b4 100644 --- a/byterun/instrtrace.h +++ b/byterun/instrtrace.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: instrtrace.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Trace the instructions executed */ diff --git a/byterun/instruct.h b/byterun/instruct.h index 92f228504c..78b71c2dad 100644 --- a/byterun/instruct.h +++ b/byterun/instruct.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: instruct.h 12858 2012-08-10 14:45:51Z maranget $ */ /* The instruction set. */ diff --git a/byterun/int64_emul.h b/byterun/int64_emul.h index ad48584d89..0c72a485e3 100644 --- a/byterun/int64_emul.h +++ b/byterun/int64_emul.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: int64_emul.h 12858 2012-08-10 14:45:51Z maranget $ */ /* 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 398357a607..8aba25fac4 100644 --- a/byterun/int64_format.h +++ b/byterun/int64_format.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: int64_format.h 12858 2012-08-10 14:45:51Z maranget $ */ /* 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 9aa45e3c0f..fa52d80762 100644 --- a/byterun/int64_native.h +++ b/byterun/int64_native.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: int64_native.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Wrapper macros around native 64-bit integer arithmetic, so that it has the same interface as the software emulation diff --git a/byterun/interp.c b/byterun/interp.c index cbec02a5cb..4d99914aec 100644 --- a/byterun/interp.c +++ b/byterun/interp.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: interp.c 12858 2012-08-10 14:45:51Z maranget $ */ /* The bytecode interpreter */ #include <stdio.h> diff --git a/byterun/interp.h b/byterun/interp.h index 7c3d26f289..a34e46d700 100644 --- a/byterun/interp.h +++ b/byterun/interp.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: interp.h 12858 2012-08-10 14:45:51Z maranget $ */ /* The bytecode interpreter */ diff --git a/byterun/intext.h b/byterun/intext.h index 8cdce36789..39f5690d1f 100644 --- a/byterun/intext.h +++ b/byterun/intext.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: intext.h 12959 2012-09-27 13:12:51Z maranget $ */ /* Structured input/output */ diff --git a/byterun/ints.c b/byterun/ints.c index 34b5db238a..20eafdd8c5 100644 --- a/byterun/ints.c +++ b/byterun/ints.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: ints.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> #include <string.h> diff --git a/byterun/io.h b/byterun/io.h index 89a85380c7..27814a3cc2 100644 --- a/byterun/io.h +++ b/byterun/io.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: io.h 12959 2012-09-27 13:12:51Z maranget $ */ /* Buffered input/output */ diff --git a/byterun/lexing.c b/byterun/lexing.c index cb763bce93..8d9c309d58 100644 --- a/byterun/lexing.c +++ b/byterun/lexing.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: lexing.c 12858 2012-08-10 14:45:51Z maranget $ */ /* The table-driven automaton for lexers generated by camllex. */ diff --git a/byterun/main.c b/byterun/main.c index 63355840f6..0389b427cb 100644 --- a/byterun/main.c +++ b/byterun/main.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: main.c 12858 2012-08-10 14:45:51Z maranget $ */ /* 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 1d290a5730..e9dd448f96 100644 --- a/byterun/major_gc.c +++ b/byterun/major_gc.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: major_gc.c 12959 2012-09-27 13:12:51Z maranget $ */ #include <limits.h> diff --git a/byterun/major_gc.h b/byterun/major_gc.h index 427312784c..3ea70dcd64 100644 --- a/byterun/major_gc.h +++ b/byterun/major_gc.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: major_gc.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_MAJOR_GC_H #define CAML_MAJOR_GC_H diff --git a/byterun/md5.h b/byterun/md5.h index 0c4239e550..87c1033359 100644 --- a/byterun/md5.h +++ b/byterun/md5.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: md5.h 12959 2012-09-27 13:12:51Z maranget $ */ /* MD5 message digest */ diff --git a/byterun/memory.c b/byterun/memory.c index b99825d185..635120cbcf 100644 --- a/byterun/memory.c +++ b/byterun/memory.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: memory.c 12959 2012-09-27 13:12:51Z maranget $ */ #include <stdlib.h> #include <string.h> diff --git a/byterun/memory.h b/byterun/memory.h index 69f5ff91c8..492fd06cc1 100644 --- a/byterun/memory.h +++ b/byterun/memory.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: memory.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Allocation macros and functions */ diff --git a/byterun/meta.c b/byterun/meta.c index a547b991b5..eab99db082 100644 --- a/byterun/meta.c +++ b/byterun/meta.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: meta.c 12959 2012-09-27 13:12:51Z maranget $ */ /* Primitives for the toplevel */ diff --git a/byterun/minor_gc.c b/byterun/minor_gc.c index 8b8b8ff0ed..b62b0faaba 100644 --- a/byterun/minor_gc.c +++ b/byterun/minor_gc.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: minor_gc.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <string.h> #include "config.h" diff --git a/byterun/minor_gc.h b/byterun/minor_gc.h index 82c82cd3f6..d2df478f9f 100644 --- a/byterun/minor_gc.h +++ b/byterun/minor_gc.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: minor_gc.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_MINOR_GC_H #define CAML_MINOR_GC_H diff --git a/byterun/misc.c b/byterun/misc.c index 927cbd81b1..ca87f6ff3c 100644 --- a/byterun/misc.c +++ b/byterun/misc.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: misc.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> #include "config.h" diff --git a/byterun/misc.h b/byterun/misc.h index e970d3d032..61a1c5ccf4 100644 --- a/byterun/misc.h +++ b/byterun/misc.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: misc.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Miscellaneous macros and variables. */ diff --git a/byterun/mlvalues.h b/byterun/mlvalues.h index 162a0cb0b7..f514d46825 100644 --- a/byterun/mlvalues.h +++ b/byterun/mlvalues.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: mlvalues.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_MLVALUES_H #define CAML_MLVALUES_H diff --git a/byterun/obj.c b/byterun/obj.c index 7d09105b78..a45843ac49 100644 --- a/byterun/obj.c +++ b/byterun/obj.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: obj.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Operations on objects */ diff --git a/byterun/osdeps.h b/byterun/osdeps.h index 902ea2de65..19479f557f 100644 --- a/byterun/osdeps.h +++ b/byterun/osdeps.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: osdeps.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Operating system - specific stuff */ diff --git a/byterun/parsing.c b/byterun/parsing.c index 3d5ea83323..479997898a 100644 --- a/byterun/parsing.c +++ b/byterun/parsing.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: parsing.c 12858 2012-08-10 14:45:51Z maranget $ */ /* The PDA automaton for parsers generated by camlyacc */ diff --git a/byterun/prims.h b/byterun/prims.h index 3d7bb6d82a..f9f53aff4a 100644 --- a/byterun/prims.h +++ b/byterun/prims.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: prims.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Interface with C primitives. */ diff --git a/byterun/printexc.c b/byterun/printexc.c index e891d9c677..72f512840e 100644 --- a/byterun/printexc.c +++ b/byterun/printexc.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: printexc.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Print an uncaught exception and abort */ diff --git a/byterun/printexc.h b/byterun/printexc.h index 4624086cb3..5a9fd3334a 100644 --- a/byterun/printexc.h +++ b/byterun/printexc.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: printexc.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_PRINTEXC_H #define CAML_PRINTEXC_H diff --git a/byterun/reverse.h b/byterun/reverse.h index a48b6f2558..c66093dd09 100644 --- a/byterun/reverse.h +++ b/byterun/reverse.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: reverse.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Swap byte-order in 16, 32, and 64-bit integers or floats */ diff --git a/byterun/roots.c b/byterun/roots.c index 8a4d23b33d..d73f0aeb58 100644 --- a/byterun/roots.c +++ b/byterun/roots.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: roots.c 12858 2012-08-10 14:45:51Z maranget $ */ /* To walk the memory roots for garbage collection */ diff --git a/byterun/roots.h b/byterun/roots.h index f2d3bd6940..92f6798b68 100644 --- a/byterun/roots.h +++ b/byterun/roots.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: roots.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_ROOTS_H #define CAML_ROOTS_H diff --git a/byterun/signals.c b/byterun/signals.c index 40ba0ab5e7..762884c09a 100644 --- a/byterun/signals.c +++ b/byterun/signals.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: signals.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Signal handling, code common to the bytecode and native systems */ diff --git a/byterun/signals.h b/byterun/signals.h index fb03b30dd5..e263059ab7 100644 --- a/byterun/signals.h +++ b/byterun/signals.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: signals.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_SIGNALS_H #define CAML_SIGNALS_H diff --git a/byterun/signals_byt.c b/byterun/signals_byt.c index f52ee5a455..b7bfc7cb8c 100644 --- a/byterun/signals_byt.c +++ b/byterun/signals_byt.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: signals_byt.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Signal handling, code specific to the bytecode interpreter */ diff --git a/byterun/signals_machdep.h b/byterun/signals_machdep.h index 0308d3c1f0..d3f65173bd 100644 --- a/byterun/signals_machdep.h +++ b/byterun/signals_machdep.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: signals_machdep.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Processor-specific operation: atomic "read and clear" */ diff --git a/byterun/stacks.c b/byterun/stacks.c index 5f7a871d04..5558c4c72b 100644 --- a/byterun/stacks.c +++ b/byterun/stacks.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: stacks.c 12858 2012-08-10 14:45:51Z maranget $ */ /* To initialize and resize the stacks */ diff --git a/byterun/stacks.h b/byterun/stacks.h index f8469572d8..674ad94141 100644 --- a/byterun/stacks.h +++ b/byterun/stacks.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: stacks.h 12858 2012-08-10 14:45:51Z maranget $ */ /* structure of the stacks */ diff --git a/byterun/startup.c b/byterun/startup.c index 8298fe83ff..ca9178466f 100644 --- a/byterun/startup.c +++ b/byterun/startup.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: startup.c 12959 2012-09-27 13:12:51Z maranget $ */ /* Start-up code */ diff --git a/byterun/startup.h b/byterun/startup.h index 5a42a73aaf..bb34604ec5 100644 --- a/byterun/startup.h +++ b/byterun/startup.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: startup.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_STARTUP_H #define CAML_STARTUP_H diff --git a/byterun/str.c b/byterun/str.c index 3941cae17d..b2381a9321 100644 --- a/byterun/str.c +++ b/byterun/str.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: str.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Operations on strings */ diff --git a/byterun/sys.c b/byterun/sys.c index ce364d8c1a..1f9227d78f 100644 --- a/byterun/sys.c +++ b/byterun/sys.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: sys.c 12959 2012-09-27 13:12:51Z maranget $ */ /* Basic system calls */ diff --git a/byterun/sys.h b/byterun/sys.h index c6f5d3204b..1e1cecef88 100644 --- a/byterun/sys.h +++ b/byterun/sys.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: sys.h 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef CAML_SYS_H #define CAML_SYS_H diff --git a/byterun/terminfo.c b/byterun/terminfo.c index 6797569679..a87652bed7 100644 --- a/byterun/terminfo.c +++ b/byterun/terminfo.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: terminfo.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Read and output terminal commands */ diff --git a/byterun/ui.h b/byterun/ui.h index 0c3309b393..0c08db4c71 100644 --- a/byterun/ui.h +++ b/byterun/ui.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: ui.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Function declarations for non-Unix user interfaces */ diff --git a/byterun/unix.c b/byterun/unix.c index 664c32b18c..d8572d2e32 100644 --- a/byterun/unix.c +++ b/byterun/unix.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: unix.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Unix-specific stuff */ diff --git a/byterun/weak.c b/byterun/weak.c index efdb15e9c4..ccb481a65e 100644 --- a/byterun/weak.c +++ b/byterun/weak.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: weak.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Operations on weak arrays */ diff --git a/byterun/weak.h b/byterun/weak.h index a30001a7e8..5f92ef92fa 100644 --- a/byterun/weak.h +++ b/byterun/weak.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: weak.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Operations on weak arrays */ diff --git a/config/Makefile-templ b/config/Makefile-templ index f58d516c1c..597097c4cd 100644 --- a/config/Makefile-templ +++ b/config/Makefile-templ @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile-templ 12858 2012-08-10 14:45:51Z maranget $ ### Compile-time configuration diff --git a/config/Makefile.mingw b/config/Makefile.mingw index 5176f34a0c..e7c93e13bc 100644 --- a/config/Makefile.mingw +++ b/config/Makefile.mingw @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile.mingw 12959 2012-09-27 13:12:51Z maranget $ # Configuration for Windows, Mingw compiler diff --git a/config/Makefile.msvc b/config/Makefile.msvc index be61fa95ee..ad3e378da5 100644 --- a/config/Makefile.msvc +++ b/config/Makefile.msvc @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile.msvc 12959 2012-09-27 13:12:51Z maranget $ # Configuration for Windows, Visual C++ compiler diff --git a/config/Makefile.msvc64 b/config/Makefile.msvc64 index 82e0aadedd..0eb312544a 100644 --- a/config/Makefile.msvc64 +++ b/config/Makefile.msvc64 @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile.msvc64 12959 2012-09-27 13:12:51Z maranget $ # Configuration for Windows, Visual C++ compiler diff --git a/config/auto-aux/align.c b/config/auto-aux/align.c index a04684b483..7733f11884 100644 --- a/config/auto-aux/align.c +++ b/config/auto-aux/align.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: align.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> #include <signal.h> diff --git a/config/auto-aux/async_io.c b/config/auto-aux/async_io.c index 2ce3da725a..9f9b6d9862 100644 --- a/config/auto-aux/async_io.c +++ b/config/auto-aux/async_io.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: async_io.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> #include <fcntl.h> diff --git a/config/auto-aux/bytecopy.c b/config/auto-aux/bytecopy.c index 2006147fd7..0df2364212 100644 --- a/config/auto-aux/bytecopy.c +++ b/config/auto-aux/bytecopy.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: bytecopy.c 12858 2012-08-10 14:45:51Z maranget $ */ char buffer[27]; diff --git a/config/auto-aux/dblalign.c b/config/auto-aux/dblalign.c index 91d4194c09..c4ad73eb7d 100644 --- a/config/auto-aux/dblalign.c +++ b/config/auto-aux/dblalign.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: dblalign.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> #include <signal.h> diff --git a/config/auto-aux/divmod.c b/config/auto-aux/divmod.c index d59bf31cc9..8d250a076a 100644 --- a/config/auto-aux/divmod.c +++ b/config/auto-aux/divmod.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: divmod.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Test semantics of division and modulus for negative arguments */ diff --git a/config/auto-aux/elf.c b/config/auto-aux/elf.c index 27be98d6b7..011feeded8 100644 --- a/config/auto-aux/elf.c +++ b/config/auto-aux/elf.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: elf.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> diff --git a/config/auto-aux/endian.c b/config/auto-aux/endian.c index b019eb1c7a..f0f2ffde83 100644 --- a/config/auto-aux/endian.c +++ b/config/auto-aux/endian.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: endian.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "m.h" diff --git a/config/auto-aux/getgroups.c b/config/auto-aux/getgroups.c index b69b0be41f..0b61f891c2 100644 --- a/config/auto-aux/getgroups.c +++ b/config/auto-aux/getgroups.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getgroups.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <sys/types.h> #include <limits.h> diff --git a/config/auto-aux/gethostbyaddr.c b/config/auto-aux/gethostbyaddr.c index f6d36a7f3b..a581af531d 100644 --- a/config/auto-aux/gethostbyaddr.c +++ b/config/auto-aux/gethostbyaddr.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: gethostbyaddr.c 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef _REENTRANT /* This helps detection on Digital Unix... */ diff --git a/config/auto-aux/gethostbyname.c b/config/auto-aux/gethostbyname.c index 96a39438d5..5278874feb 100644 --- a/config/auto-aux/gethostbyname.c +++ b/config/auto-aux/gethostbyname.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: gethostbyname.c 12858 2012-08-10 14:45:51Z maranget $ */ #ifndef _REENTRANT /* This helps detection on Digital Unix... */ diff --git a/config/auto-aux/ia32sse2.c b/config/auto-aux/ia32sse2.c index 8ba81601b6..f7f973b81b 100644 --- a/config/auto-aux/ia32sse2.c +++ b/config/auto-aux/ia32sse2.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: ia32sse2.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Test whether IA32 assembler supports SSE2 instructions */ diff --git a/config/auto-aux/initgroups.c b/config/auto-aux/initgroups.c index 7b9c239834..d693eff5a7 100644 --- a/config/auto-aux/initgroups.c +++ b/config/auto-aux/initgroups.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: initgroups.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <errno.h> diff --git a/config/auto-aux/int64align.c b/config/auto-aux/int64align.c index b087a3d66b..67f550cd04 100644 --- a/config/auto-aux/int64align.c +++ b/config/auto-aux/int64align.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: int64align.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> #include <signal.h> diff --git a/config/auto-aux/longlong.c b/config/auto-aux/longlong.c index 424e540fdf..c268a2036a 100644 --- a/config/auto-aux/longlong.c +++ b/config/auto-aux/longlong.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: longlong.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> #include <string.h> diff --git a/config/auto-aux/schar.c b/config/auto-aux/schar.c index e3e81e395e..89b55bda37 100644 --- a/config/auto-aux/schar.c +++ b/config/auto-aux/schar.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: schar.c 12858 2012-08-10 14:45:51Z maranget $ */ char foo[]="\377"; diff --git a/config/auto-aux/schar2.c b/config/auto-aux/schar2.c index d041af1830..976b9c81bf 100644 --- a/config/auto-aux/schar2.c +++ b/config/auto-aux/schar2.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: schar2.c 12858 2012-08-10 14:45:51Z maranget $ */ signed char foo[]="\377"; diff --git a/config/auto-aux/setgroups.c b/config/auto-aux/setgroups.c index 63ac1b8c34..6f225cba60 100644 --- a/config/auto-aux/setgroups.c +++ b/config/auto-aux/setgroups.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: setgroups.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <errno.h> diff --git a/config/auto-aux/sighandler.c b/config/auto-aux/sighandler.c index b36557c5f0..1a70d1cfe7 100644 --- a/config/auto-aux/sighandler.c +++ b/config/auto-aux/sighandler.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: sighandler.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <signal.h> diff --git a/config/auto-aux/signals.c b/config/auto-aux/signals.c index 78ba8de69d..a150ae002b 100644 --- a/config/auto-aux/signals.c +++ b/config/auto-aux/signals.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: signals.c 12858 2012-08-10 14:45:51Z maranget $ */ /* To determine the semantics of signal handlers (System V: signal is reset to default behavior on entrance to the handler diff --git a/config/auto-aux/sizes.c b/config/auto-aux/sizes.c index 58fd6b23fc..21dc64ff38 100644 --- a/config/auto-aux/sizes.c +++ b/config/auto-aux/sizes.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: sizes.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> diff --git a/config/auto-aux/stackov.c b/config/auto-aux/stackov.c index 47f252aa67..4ccbb04b69 100644 --- a/config/auto-aux/stackov.c +++ b/config/auto-aux/stackov.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: stackov.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> #include <signal.h> diff --git a/config/auto-aux/tclversion.c b/config/auto-aux/tclversion.c index 84a94033c6..2a43ddead6 100644 --- a/config/auto-aux/tclversion.c +++ b/config/auto-aux/tclversion.c @@ -14,7 +14,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: tclversion.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> #include <tcl.h> diff --git a/config/m-nt.h b/config/m-nt.h index 80e0b5ee6a..aa526f944b 100644 --- a/config/m-nt.h +++ b/config/m-nt.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: m-nt.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Machine configuration, Intel x86 processors, Win32, Visual C++ or Mingw compiler */ diff --git a/config/m-templ.h b/config/m-templ.h index 6e09f64e4a..76c49407f5 100644 --- a/config/m-templ.h +++ b/config/m-templ.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: m-templ.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Processor dependencies */ diff --git a/config/s-templ.h b/config/s-templ.h index 971bc48f1e..b66fd3ffa2 100644 --- a/config/s-templ.h +++ b/config/s-templ.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: s-templ.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Operating system and standard library dependencies. */ @@ -937,7 +937,7 @@ fi # Configuration for the libraries -otherlibraries="unix dynlink" +otherlibraries="unix dynlink bigarray" # For the Unix library diff --git a/driver/compile.mli b/driver/compile.mli index 779239a8cc..74e475a6ec 100644 --- a/driver/compile.mli +++ b/driver/compile.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: compile.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Compile a .ml or .mli file *) diff --git a/driver/errors.ml b/driver/errors.ml index 47ae99542f..2518ff2468 100644 --- a/driver/errors.ml +++ b/driver/errors.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: errors.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* WARNING: if you change something in this file, you must look at opterrors.ml and ocamldoc/odoc_analyse.ml diff --git a/driver/errors.mli b/driver/errors.mli index 9f7020d08a..8d95b09c23 100644 --- a/driver/errors.mli +++ b/driver/errors.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: errors.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Error report *) open Format diff --git a/driver/main.mli b/driver/main.mli index b949bb0fe9..38d7bbc375 100644 --- a/driver/main.mli +++ b/driver/main.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: main.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* this "empty" file is here to speed up garbage collection in ocamlc.opt diff --git a/driver/optcompile.mli b/driver/optcompile.mli index 779239a8cc..63b69f4db5 100644 --- a/driver/optcompile.mli +++ b/driver/optcompile.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: optcompile.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Compile a .ml or .mli file *) diff --git a/driver/opterrors.ml b/driver/opterrors.ml index a30c2de267..3ab119e266 100644 --- a/driver/opterrors.ml +++ b/driver/opterrors.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: opterrors.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* 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/optmain.mli b/driver/optmain.mli index 701508af28..19342e234f 100644 --- a/driver/optmain.mli +++ b/driver/optmain.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: optmain.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* this "empty" file is here to speed up garbage collection in ocamlopt.opt diff --git a/driver/pparse.mli b/driver/pparse.mli index 96c2594f1e..14bec16291 100644 --- a/driver/pparse.mli +++ b/driver/pparse.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: pparse.mli 12858 2012-08-10 14:45:51Z maranget $ *) open Format diff --git a/emacs/Makefile b/emacs/Makefile index 5b2c1a4899..d72e95f982 100644 --- a/emacs/Makefile +++ b/emacs/Makefile @@ -10,7 +10,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile 12858 2012-08-10 14:45:51Z maranget $ include ../config/Makefile diff --git a/emacs/README b/emacs/README index 9c30c8892d..4efd647368 100644 --- a/emacs/README +++ b/emacs/README @@ -1,4 +1,4 @@ - OCaml emacs mode, snapshot of $Date$ + OCaml emacs mode, snapshot of $Date: 2012-08-10 16:45:51 +0200 (Fri, 10 Aug 2012) $ The files in this archive define a caml-mode for emacs, for editing OCaml and Objective Label programs, as well as an diff --git a/emacs/caml-compat.el b/emacs/caml-compat.el index da54cd0dc0..4c45654d5e 100644 --- a/emacs/caml-compat.el +++ b/emacs/caml-compat.el @@ -10,7 +10,7 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) +;(* $Id: caml-compat.el 12858 2012-08-10 14:45:51Z maranget $ *) ;; function definitions for old versions of emacs diff --git a/emacs/caml-emacs.el b/emacs/caml-emacs.el index 06cabf3025..8bd42e71d3 100644 --- a/emacs/caml-emacs.el +++ b/emacs/caml-emacs.el @@ -10,7 +10,7 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) +;(* $Id: caml-emacs.el 12858 2012-08-10 14:45:51Z maranget $ *) ;; 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 12c318c90f..e80fc9c298 100644 --- a/emacs/caml-font-old.el +++ b/emacs/caml-font-old.el @@ -10,7 +10,7 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) +;(* $Id: caml-font-old.el 12858 2012-08-10 14:45:51Z maranget $ *) ;; useful colors diff --git a/emacs/caml-help.el b/emacs/caml-help.el index 101963294f..44e32657ae 100644 --- a/emacs/caml-help.el +++ b/emacs/caml-help.el @@ -10,7 +10,7 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) +;(* $Id: caml-help.el 12858 2012-08-10 14:45:51Z maranget $ *) ;; caml-info.el --- contextual completion and help to caml-mode diff --git a/emacs/caml-hilit.el b/emacs/caml-hilit.el index 5b89f0ecb4..02512a59ac 100644 --- a/emacs/caml-hilit.el +++ b/emacs/caml-hilit.el @@ -10,7 +10,7 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) +;(* $Id: caml-hilit.el 12858 2012-08-10 14:45:51Z maranget $ *) ; Highlighting patterns for hilit19 under caml-mode diff --git a/emacs/caml-types.el b/emacs/caml-types.el index d63eaf16a1..da7e088fb8 100644 --- a/emacs/caml-types.el +++ b/emacs/caml-types.el @@ -10,7 +10,7 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) +;(* $Id: caml-types.el 12959 2012-09-27 13:12:51Z maranget $ *) ; An emacs-lisp complement to the "-annot" option of ocamlc and ocamlopt. diff --git a/emacs/caml-xemacs.el b/emacs/caml-xemacs.el index 79321e0057..4ee7fec952 100644 --- a/emacs/caml-xemacs.el +++ b/emacs/caml-xemacs.el @@ -10,7 +10,7 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) +;(* $Id: caml-xemacs.el 12858 2012-08-10 14:45:51Z maranget $ *) (require 'overlay) diff --git a/emacs/caml.el b/emacs/caml.el index 2134e429c9..14dc74af60 100644 --- a/emacs/caml.el +++ b/emacs/caml.el @@ -10,7 +10,7 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) +;(* $Id: caml.el 12858 2012-08-10 14:45:51Z maranget $ *) ;;; caml.el --- OCaml code editing commands for Emacs ;; Luc Maranget, January 2008. A few jocaml additions. diff --git a/emacs/camldebug.el b/emacs/camldebug.el index 0fd353aef0..0c3be56aba 100644 --- a/emacs/camldebug.el +++ b/emacs/camldebug.el @@ -10,7 +10,7 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) +;(* $Id: camldebug.el 12858 2012-08-10 14:45:51Z maranget $ *) ;;; Run camldebug under Emacs ;;; Derived from gdb.el. diff --git a/emacs/inf-caml.el b/emacs/inf-caml.el index 5b864efcb0..407421a392 100644 --- a/emacs/inf-caml.el +++ b/emacs/inf-caml.el @@ -10,7 +10,7 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) +;(* $Id: inf-caml.el 12858 2012-08-10 14:45:51Z maranget $ *) ;;; inf-caml.el --- run the OCaml toplevel in an Emacs buffer diff --git a/emacs/ocamltags.in b/emacs/ocamltags.in index 2a6aadbfb7..f0a985709e 100644 --- a/emacs/ocamltags.in +++ b/emacs/ocamltags.in @@ -12,7 +12,7 @@ ;(* *) ;(***********************************************************************) -;(* $Id$ *) +;(* $Id: ocamltags.in 12858 2012-08-10 14:45:51Z maranget $ *) ;; Copyright (C) 1998 Ian Zimmerman <itz@transbay.net> ;; This program is free software; you can redistribute it and/or @@ -24,7 +24,7 @@ ;; 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$ +;; $Id: ocamltags.in 12858 2012-08-10 14:45:51Z maranget $ (require 'caml) diff --git a/experimental/garrigue/printers.ml b/experimental/garrigue/printers.ml index c80c42d66c..4a900e4663 100644 --- a/experimental/garrigue/printers.ml +++ b/experimental/garrigue/printers.ml @@ -1,4 +1,4 @@ -(* $Id$ *) +(* $Id: printers.ml 5492 2003-04-03 02:16:20Z garrigue $ *) open Types diff --git a/experimental/garrigue/tests.ml b/experimental/garrigue/tests.ml index c39d152fb2..4d22a4d07d 100644 --- a/experimental/garrigue/tests.ml +++ b/experimental/garrigue/tests.ml @@ -1,4 +1,4 @@ -(* $Id$ *) +(* $Id: tests.ml 2745 2000-01-07 16:47:25Z doligez $ *) let f1 = function `a x -> x=1 | `b -> true let f2 = function `a x -> x | `b -> true diff --git a/lex/Makefile.nt b/lex/Makefile.nt index 8443c57598..c3e44eb778 100644 --- a/lex/Makefile.nt +++ b/lex/Makefile.nt @@ -10,7 +10,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile.nt 12858 2012-08-10 14:45:51Z maranget $ # The lexer generator diff --git a/lex/compact.ml b/lex/compact.ml index 72cfd9e7c8..cd8c09d246 100644 --- a/lex/compact.ml +++ b/lex/compact.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: compact.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Compaction of an automata *) diff --git a/lex/cset.mli b/lex/cset.mli index b30c3b6718..79bdd3df1f 100644 --- a/lex/cset.mli +++ b/lex/cset.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: cset.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Set of characters encoded as list of intervals *) diff --git a/lex/lexer.mli b/lex/lexer.mli index 5097d30943..0ede985cba 100644 --- a/lex/lexer.mli +++ b/lex/lexer.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: lexer.mli 12858 2012-08-10 14:45:51Z maranget $ *) val main: Lexing.lexbuf -> Parser.token diff --git a/lex/lexer.mll b/lex/lexer.mll index b3f61bae0e..dd9cd37a14 100644 --- a/lex/lexer.mll +++ b/lex/lexer.mll @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: lexer.mll 12959 2012-09-27 13:12:51Z maranget $ *) (* The lexical analyzer for lexer definitions. Bootstrapped! *) diff --git a/lex/lexgen.ml b/lex/lexgen.ml index 37720be612..c2cac95eee 100644 --- a/lex/lexgen.ml +++ b/lex/lexgen.ml @@ -12,7 +12,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: lexgen.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Compiling a lexer definition *) diff --git a/lex/output.mli b/lex/output.mli index 5eae103143..1a75c0271e 100644 --- a/lex/output.mli +++ b/lex/output.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: output.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Output the DFA tables and its entry points *) diff --git a/lex/outputbis.mli b/lex/outputbis.mli index df6bf9600a..c427876709 100644 --- a/lex/outputbis.mli +++ b/lex/outputbis.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: outputbis.mli 12858 2012-08-10 14:45:51Z maranget $ *) val output_lexdef : string -> in_channel -> diff --git a/lex/parser.mly b/lex/parser.mly index c36d8e0202..9320db59ce 100644 --- a/lex/parser.mly +++ b/lex/parser.mly @@ -10,7 +10,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: parser.mly 12858 2012-08-10 14:45:51Z maranget $ */ /* The grammar for lexer definitions */ diff --git a/lex/syntax.ml b/lex/syntax.ml index 746a99a241..8b850d1eb7 100644 --- a/lex/syntax.ml +++ b/lex/syntax.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: syntax.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* This apparently useless implmentation file is in fact required by the pa_ocamllex syntax extension *) diff --git a/man/Makefile b/man/Makefile index 4c0cb81914..4c93a78879 100644 --- a/man/Makefile +++ b/man/Makefile @@ -10,7 +10,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile 12959 2012-09-27 13:12:51Z maranget $ include ../config/Makefile diff --git a/man/ocamldebug.m b/man/ocamldebug.m index 0eceeba3b8..4b3837365a 100644 --- a/man/ocamldebug.m +++ b/man/ocamldebug.m @@ -10,7 +10,7 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ +.\" $Id: ocamldebug.m 12858 2012-08-10 14:45:51Z maranget $ .\" .TH OCAMLDEBUG 1 diff --git a/man/ocamlprof.m b/man/ocamlprof.m index 3f20398f0e..8157c71699 100644 --- a/man/ocamlprof.m +++ b/man/ocamlprof.m @@ -10,7 +10,7 @@ .\"* * .\"*********************************************************************** .\" -.\" $Id$ +.\" $Id: ocamlprof.m 12858 2012-08-10 14:45:51Z maranget $ .\" .TH OCAMLPROF 1 diff --git a/ocamldoc/odoc.ml b/ocamldoc/odoc.ml index 5cceabd1df..6c6a3fe774 100644 --- a/ocamldoc/odoc.ml +++ b/ocamldoc/odoc.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc.ml 11010 2011-04-13 09:30:59Z maranget $ *) (** Main module for bytecode. @todo coucou le todo*) @@ -138,6 +138,6 @@ let _ = <<<<<<< .courant -(* eof $Id$ *) +(* eof $Id: odoc.ml 11010 2011-04-13 09:30:59Z maranget $ *) ======= >>>>>>> .fusion-droit.r10497 diff --git a/ocamldoc/odoc_analyse.mli b/ocamldoc/odoc_analyse.mli index b927ad4a06..5966134056 100644 --- a/ocamldoc/odoc_analyse.mli +++ b/ocamldoc/odoc_analyse.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_analyse.mli 11010 2011-04-13 09:30:59Z maranget $ *) (** Analysis of source files. *) diff --git a/ocamldoc/odoc_args.mli b/ocamldoc/odoc_args.mli index 0606eb0d70..9f7ade718c 100644 --- a/ocamldoc/odoc_args.mli +++ b/ocamldoc/odoc_args.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_args.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Analysis of the command line arguments. *) diff --git a/ocamldoc/odoc_ast.mli b/ocamldoc/odoc_ast.mli index d7c111f85b..86489fd4a8 100644 --- a/ocamldoc/odoc_ast.mli +++ b/ocamldoc/odoc_ast.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_ast.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** The module for analysing the typed abstract syntax tree and source code and creating modules, classes, ..., elements.*) diff --git a/ocamldoc/odoc_class.ml b/ocamldoc/odoc_class.ml index 28abf67031..ac6a66535c 100644 --- a/ocamldoc/odoc_class.ml +++ b/ocamldoc/odoc_class.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_class.ml 12959 2012-09-27 13:12:51Z maranget $ *) (** Representation and manipulation of classes and class types.*) @@ -250,4 +250,4 @@ let class_type_parameter_text_by_name clt label = None -(* eof $Id$ *) +(* eof $Id: odoc_class.ml 12959 2012-09-27 13:12:51Z maranget $ *) diff --git a/ocamldoc/odoc_comments.ml b/ocamldoc/odoc_comments.ml index 9d6e5fc89c..012cd79b27 100644 --- a/ocamldoc/odoc_comments.ml +++ b/ocamldoc/odoc_comments.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_comments.ml 12959 2012-09-27 13:12:51Z maranget $ *) (** Analysis of comments. *) @@ -322,7 +322,7 @@ module Info_retriever = module Basic_info_retriever = Info_retriever (Odoc_text.Texter) <<<<<<< .courant -(* eof $Id$ *) +(* eof $Id: odoc_comments.ml 12959 2012-09-27 13:12:51Z maranget $ *) ======= let info_of_string s = let dummy = diff --git a/ocamldoc/odoc_comments.mli b/ocamldoc/odoc_comments.mli index 0579926a90..2c063e3c2c 100644 --- a/ocamldoc/odoc_comments.mli +++ b/ocamldoc/odoc_comments.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_comments.mli 6336 2004-05-27 09:18:38Z maranget $ *) (** Analysis of comments. *) diff --git a/ocamldoc/odoc_comments_global.ml b/ocamldoc/odoc_comments_global.ml index a4366ceb71..9dfc30dfb3 100644 --- a/ocamldoc/odoc_comments_global.ml +++ b/ocamldoc/odoc_comments_global.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_comments_global.ml 10519 2010-06-04 19:19:34Z maranget $ *) (** The global variables used by the special comment parser.*) @@ -48,4 +48,4 @@ let init () = return_value := None ; customs := [] -(* eof $Id$ *) +(* eof $Id: odoc_comments_global.ml 10519 2010-06-04 19:19:34Z maranget $ *) diff --git a/ocamldoc/odoc_comments_global.mli b/ocamldoc/odoc_comments_global.mli index e9efbffc59..3927185d43 100644 --- a/ocamldoc/odoc_comments_global.mli +++ b/ocamldoc/odoc_comments_global.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_comments_global.mli 10519 2010-06-04 19:19:34Z maranget $ *) (** The global variables used by the special comment parser.*) diff --git a/ocamldoc/odoc_config.ml b/ocamldoc/odoc_config.ml index ced04ae2eb..4fe9ac9702 100644 --- a/ocamldoc/odoc_config.ml +++ b/ocamldoc/odoc_config.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_config.ml 6336 2004-05-27 09:18:38Z maranget $ *) let custom_generators_path = Filename.concat Config.standard_library diff --git a/ocamldoc/odoc_config.mli b/ocamldoc/odoc_config.mli index 622d8d3e18..ca5434897f 100644 --- a/ocamldoc/odoc_config.mli +++ b/ocamldoc/odoc_config.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_config.mli 6336 2004-05-27 09:18:38Z maranget $ *) (** Ocamldoc configuration contants. *) diff --git a/ocamldoc/odoc_control.ml b/ocamldoc/odoc_control.ml index b73796bf8a..3c94d1bb71 100644 --- a/ocamldoc/odoc_control.ml +++ b/ocamldoc/odoc_control.ml @@ -9,4 +9,4 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_control.ml 10519 2010-06-04 19:19:34Z maranget $ *) diff --git a/ocamldoc/odoc_cross.ml b/ocamldoc/odoc_cross.ml index 535c5381ec..b270033d61 100644 --- a/ocamldoc/odoc_cross.ml +++ b/ocamldoc/odoc_cross.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_cross.ml 12959 2012-09-27 13:12:51Z maranget $ *) (** Cross referencing. *) @@ -1126,4 +1126,4 @@ let associate module_list = ignore (associate_type_of_elements_in_comments module_list) -(* eof $Id$ *) +(* eof $Id: odoc_cross.ml 12959 2012-09-27 13:12:51Z maranget $ *) diff --git a/ocamldoc/odoc_cross.mli b/ocamldoc/odoc_cross.mli index 1c6a357027..2ba0554473 100644 --- a/ocamldoc/odoc_cross.mli +++ b/ocamldoc/odoc_cross.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_cross.mli 6336 2004-05-27 09:18:38Z maranget $ *) (** Cross-referencing. *) diff --git a/ocamldoc/odoc_dag2html.ml b/ocamldoc/odoc_dag2html.ml index cfdf9abcb4..b9cf51126e 100644 --- a/ocamldoc/odoc_dag2html.ml +++ b/ocamldoc/odoc_dag2html.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_dag2html.ml 7197 2005-10-27 11:14:16Z maranget $ *) (** The types and functions to create a html table representing a dag. Thanks to Daniel De Rauglaudre. *) diff --git a/ocamldoc/odoc_dag2html.mli b/ocamldoc/odoc_dag2html.mli index d377bce2ee..45a6a78586 100644 --- a/ocamldoc/odoc_dag2html.mli +++ b/ocamldoc/odoc_dag2html.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_dag2html.mli 10519 2010-06-04 19:19:34Z maranget $ *) (** 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 8878e723e0..c8528eb145 100644 --- a/ocamldoc/odoc_dep.ml +++ b/ocamldoc/odoc_dep.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_dep.ml 12858 2012-08-10 14:45:51Z maranget $ *) (** Top modules dependencies. *) diff --git a/ocamldoc/odoc_dot.ml b/ocamldoc/odoc_dot.ml index b7661f2661..fa4e9cd2df 100644 --- a/ocamldoc/odoc_dot.ml +++ b/ocamldoc/odoc_dot.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_dot.ml 12858 2012-08-10 14:45:51Z maranget $ *) (** Definition of a class which outputs a dot file showing top modules dependencies.*) diff --git a/ocamldoc/odoc_env.mli b/ocamldoc/odoc_env.mli index 75c0b38a4d..8dd7b12008 100644 --- a/ocamldoc/odoc_env.mli +++ b/ocamldoc/odoc_env.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_env.mli 10519 2010-06-04 19:19:34Z maranget $ *) (** Environment for finding complete names from relative names. *) diff --git a/ocamldoc/odoc_exception.ml b/ocamldoc/odoc_exception.ml index 74a2fb5a20..98121ff6e0 100644 --- a/ocamldoc/odoc_exception.ml +++ b/ocamldoc/odoc_exception.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_exception.ml 10519 2010-06-04 19:19:34Z maranget $ *) (** Representation and manipulation of exceptions. *) diff --git a/ocamldoc/odoc_html.ml b/ocamldoc/odoc_html.ml index 22f25cf016..ebb4447603 100644 --- a/ocamldoc/odoc_html.ml +++ b/ocamldoc/odoc_html.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_html.ml 12959 2012-09-27 13:12:51Z maranget $ *) (** Generation of html documentation. *) diff --git a/ocamldoc/odoc_info.ml b/ocamldoc/odoc_info.ml index c087646e7d..d35c824d44 100644 --- a/ocamldoc/odoc_info.ml +++ b/ocamldoc/odoc_info.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_info.ml 12959 2012-09-27 13:12:51Z maranget $ *) (** Interface for analysing documented OCaml source files and to the collected information. *) diff --git a/ocamldoc/odoc_info.mli b/ocamldoc/odoc_info.mli index f8eae5210b..b0f4ed35bc 100644 --- a/ocamldoc/odoc_info.mli +++ b/ocamldoc/odoc_info.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_info.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Interface to the information collected in source files. *) diff --git a/ocamldoc/odoc_inherit.ml b/ocamldoc/odoc_inherit.ml index b73796bf8a..695bdecc88 100644 --- a/ocamldoc/odoc_inherit.ml +++ b/ocamldoc/odoc_inherit.ml @@ -9,4 +9,4 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_inherit.ml 10519 2010-06-04 19:19:34Z maranget $ *) diff --git a/ocamldoc/odoc_latex.ml b/ocamldoc/odoc_latex.ml index e40a74142d..0cdf6ea1cd 100644 --- a/ocamldoc/odoc_latex.ml +++ b/ocamldoc/odoc_latex.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_latex.ml 12959 2012-09-27 13:12:51Z maranget $ *) (** Generation of LaTeX documentation. *) diff --git a/ocamldoc/odoc_latex_style.ml b/ocamldoc/odoc_latex_style.ml index db0964a71c..4fb7c47523 100644 --- a/ocamldoc/odoc_latex_style.ml +++ b/ocamldoc/odoc_latex_style.ml @@ -11,7 +11,7 @@ (** The content of the LaTeX style to generate when generating LaTeX code. *) -(* $Id$ *) +(* $Id: odoc_latex_style.ml 12845 2012-08-09 12:54:45Z maranget $ *) let content ="\ \n%% Support macros for LaTeX documentation generated by ocamldoc.\ diff --git a/ocamldoc/odoc_lexer.mll b/ocamldoc/odoc_lexer.mll index 318a839fff..c6e52a698c 100644 --- a/ocamldoc/odoc_lexer.mll +++ b/ocamldoc/odoc_lexer.mll @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_lexer.mll 11010 2011-04-13 09:30:59Z maranget $ *) (** The lexer for special comments. *) diff --git a/ocamldoc/odoc_man.ml b/ocamldoc/odoc_man.ml index 8bafcea4d5..9bad16d2bc 100644 --- a/ocamldoc/odoc_man.ml +++ b/ocamldoc/odoc_man.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_man.ml 12959 2012-09-27 13:12:51Z maranget $ *) (** The man pages generator. *) open Odoc_info diff --git a/ocamldoc/odoc_merge.ml b/ocamldoc/odoc_merge.ml index eb20d15d30..b4c5dba9b7 100644 --- a/ocamldoc/odoc_merge.ml +++ b/ocamldoc/odoc_merge.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_merge.ml 12845 2012-08-09 12:54:45Z maranget $ *) (** Merge of information from [.ml] and [.mli] for a module.*) @@ -996,4 +996,4 @@ let merge merge_options modules_list = in iter modules_list -(* eof $Id$ *) +(* eof $Id: odoc_merge.ml 12845 2012-08-09 12:54:45Z maranget $ *) diff --git a/ocamldoc/odoc_merge.mli b/ocamldoc/odoc_merge.mli index 3133c5e939..b8bcae55db 100644 --- a/ocamldoc/odoc_merge.mli +++ b/ocamldoc/odoc_merge.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_merge.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Merge of information from [.ml] and [.mli] for a module.*) diff --git a/ocamldoc/odoc_misc.ml b/ocamldoc/odoc_misc.ml index 561874d730..ca662723b8 100644 --- a/ocamldoc/odoc_misc.ml +++ b/ocamldoc/odoc_misc.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_misc.ml 12959 2012-09-27 13:12:51Z maranget $ *) let input_file_as_string nom = let chanin = open_in_bin nom in @@ -487,4 +487,4 @@ let remove_option typ = in { typ with Types.desc = iter typ.Types.desc } -(* eof $Id$ *) +(* eof $Id: odoc_misc.ml 12959 2012-09-27 13:12:51Z maranget $ *) diff --git a/ocamldoc/odoc_misc.mli b/ocamldoc/odoc_misc.mli index d3037519b9..447e3e9fb4 100644 --- a/ocamldoc/odoc_misc.mli +++ b/ocamldoc/odoc_misc.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_misc.mli 6857 2005-05-04 20:30:00Z habouzit $ *) (** Miscelaneous functions *) diff --git a/ocamldoc/odoc_module.ml b/ocamldoc/odoc_module.ml index a180cc7827..506a986da8 100644 --- a/ocamldoc/odoc_module.ml +++ b/ocamldoc/odoc_module.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_module.ml 12959 2012-09-27 13:12:51Z maranget $ *) (** Representation and manipulation of modules and module types. *) diff --git a/ocamldoc/odoc_name.ml b/ocamldoc/odoc_name.ml index 8f64708a5d..c2edf847ac 100644 --- a/ocamldoc/odoc_name.ml +++ b/ocamldoc/odoc_name.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_name.ml 12959 2012-09-27 13:12:51Z maranget $ *) (** Representation of element names. *) diff --git a/ocamldoc/odoc_name.mli b/ocamldoc/odoc_name.mli index 9bff7c22ff..f55b3c8be2 100644 --- a/ocamldoc/odoc_name.mli +++ b/ocamldoc/odoc_name.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_name.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Representation of element names. *) diff --git a/ocamldoc/odoc_ocamlhtml.mll b/ocamldoc/odoc_ocamlhtml.mll index 6364a900f6..af7ecd5cef 100644 --- a/ocamldoc/odoc_ocamlhtml.mll +++ b/ocamldoc/odoc_ocamlhtml.mll @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_ocamlhtml.mll 10519 2010-06-04 19:19:34Z maranget $ *) (** Generation of html code to display OCaml code. *) open Lexing diff --git a/ocamldoc/odoc_parameter.ml b/ocamldoc/odoc_parameter.ml index 56f175ecd4..105a8008c9 100644 --- a/ocamldoc/odoc_parameter.ml +++ b/ocamldoc/odoc_parameter.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_parameter.ml 10519 2010-06-04 19:19:34Z maranget $ *) (** Representation and manipulation of method / function / class parameters. *) diff --git a/ocamldoc/odoc_parser.mly b/ocamldoc/odoc_parser.mly index e62dcc5515..60904fbfc4 100644 --- a/ocamldoc/odoc_parser.mly +++ b/ocamldoc/odoc_parser.mly @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_parser.mly 10519 2010-06-04 19:19:34Z maranget $ *) open Odoc_types open Odoc_comments_global diff --git a/ocamldoc/odoc_print.mli b/ocamldoc/odoc_print.mli index 01b319c35b..a82874ed4a 100644 --- a/ocamldoc/odoc_print.mli +++ b/ocamldoc/odoc_print.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_print.mli 10519 2010-06-04 19:19:34Z maranget $ *) (** Printing functions. *) diff --git a/ocamldoc/odoc_scan.ml b/ocamldoc/odoc_scan.ml index 18a8f117c2..49c48549b2 100644 --- a/ocamldoc/odoc_scan.ml +++ b/ocamldoc/odoc_scan.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_scan.ml 12959 2012-09-27 13:12:51Z maranget $ *) (** Scanning of modules and elements. diff --git a/ocamldoc/odoc_search.ml b/ocamldoc/odoc_search.ml index 485e131561..75edcd41fc 100644 --- a/ocamldoc/odoc_search.ml +++ b/ocamldoc/odoc_search.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_search.ml 12959 2012-09-27 13:12:51Z maranget $ *) (** Research of elements through modules. *) @@ -683,4 +683,4 @@ let find_section mods regexp = Res_section (_,t) -> t | _ -> assert false -(* eof $Id$ *) +(* eof $Id: odoc_search.ml 12959 2012-09-27 13:12:51Z maranget $ *) diff --git a/ocamldoc/odoc_search.mli b/ocamldoc/odoc_search.mli index 2f882d5246..ded9a79f64 100644 --- a/ocamldoc/odoc_search.mli +++ b/ocamldoc/odoc_search.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_search.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Research of elements through modules. *) diff --git a/ocamldoc/odoc_see_lexer.mll b/ocamldoc/odoc_see_lexer.mll index b0570f7832..2ca41f217e 100644 --- a/ocamldoc/odoc_see_lexer.mll +++ b/ocamldoc/odoc_see_lexer.mll @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_see_lexer.mll 10519 2010-06-04 19:19:34Z maranget $ *) let print_DEBUG2 s = print_string s ; print_newline () diff --git a/ocamldoc/odoc_sig.mli b/ocamldoc/odoc_sig.mli index 11d852e757..8eba61f5eb 100644 --- a/ocamldoc/odoc_sig.mli +++ b/ocamldoc/odoc_sig.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_sig.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** The module for analysing a signature and source code and creating modules, classes, ..., elements.*) diff --git a/ocamldoc/odoc_str.ml b/ocamldoc/odoc_str.ml index ee97523dd4..e8403df618 100644 --- a/ocamldoc/odoc_str.ml +++ b/ocamldoc/odoc_str.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_str.ml 12959 2012-09-27 13:12:51Z maranget $ *) (** The functions to get a string from different kinds of elements (types, modules, ...). *) @@ -286,4 +286,4 @@ let string_of_method m = None -> "" | Some i -> Odoc_misc.string_of_info i) -(* eof $Id$ *) +(* eof $Id: odoc_str.ml 12959 2012-09-27 13:12:51Z maranget $ *) diff --git a/ocamldoc/odoc_str.mli b/ocamldoc/odoc_str.mli index 5d68c6d234..7c790451af 100644 --- a/ocamldoc/odoc_str.mli +++ b/ocamldoc/odoc_str.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_str.mli 10519 2010-06-04 19:19:34Z maranget $ *) (** The functions to get a string from different kinds of elements (types, modules, ...). *) diff --git a/ocamldoc/odoc_test.ml b/ocamldoc/odoc_test.ml index a903b1c151..dcf8917b5b 100644 --- a/ocamldoc/odoc_test.ml +++ b/ocamldoc/odoc_test.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_test.ml 12959 2012-09-27 13:12:51Z maranget $ *) (** Custom generator to perform test on ocamldoc. *) diff --git a/ocamldoc/odoc_texi.ml b/ocamldoc/odoc_texi.ml index ea0eae13f9..23f7b7c02e 100644 --- a/ocamldoc/odoc_texi.ml +++ b/ocamldoc/odoc_texi.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_texi.ml 12858 2012-08-10 14:45:51Z maranget $ *) (** Generation of Texinfo documentation. *) diff --git a/ocamldoc/odoc_text.ml b/ocamldoc/odoc_text.ml index a33c053b18..3965cecdb0 100644 --- a/ocamldoc/odoc_text.ml +++ b/ocamldoc/odoc_text.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_text.ml 12959 2012-09-27 13:12:51Z maranget $ *) exception Text_syntax of int * int * string (* line, char, string *) diff --git a/ocamldoc/odoc_text.mli b/ocamldoc/odoc_text.mli index f4f8e911e4..b99eb874de 100644 --- a/ocamldoc/odoc_text.mli +++ b/ocamldoc/odoc_text.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_text.mli 10519 2010-06-04 19:19:34Z maranget $ *) (** A module with a function to parse strings to obtain a [Odoc_types.text] value. *) diff --git a/ocamldoc/odoc_text_lexer.mll b/ocamldoc/odoc_text_lexer.mll index 082211f555..bae118db71 100644 --- a/ocamldoc/odoc_text_lexer.mll +++ b/ocamldoc/odoc_text_lexer.mll @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_text_lexer.mll 12959 2012-09-27 13:12:51Z maranget $ *) (** The lexer for string to build text structures. *) diff --git a/ocamldoc/odoc_text_parser.mly b/ocamldoc/odoc_text_parser.mly index 811aa239be..fc771050ae 100644 --- a/ocamldoc/odoc_text_parser.mly +++ b/ocamldoc/odoc_text_parser.mly @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_text_parser.mly 12959 2012-09-27 13:12:51Z maranget $ *) open Odoc_types diff --git a/ocamldoc/odoc_to_text.ml b/ocamldoc/odoc_to_text.ml index 591f81d613..101cbbe01f 100644 --- a/ocamldoc/odoc_to_text.ml +++ b/ocamldoc/odoc_to_text.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_to_text.ml 10519 2010-06-04 19:19:34Z maranget $ *) (** Text generation. diff --git a/ocamldoc/odoc_type.ml b/ocamldoc/odoc_type.ml index ee973a01d7..14fe2a76be 100644 --- a/ocamldoc/odoc_type.ml +++ b/ocamldoc/odoc_type.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_type.ml 12858 2012-08-10 14:45:51Z maranget $ *) (** Representation and manipulation of a type, but not class nor module type.*) diff --git a/ocamldoc/odoc_types.ml b/ocamldoc/odoc_types.ml index bbb6a2e386..d2e5266a7a 100644 --- a/ocamldoc/odoc_types.ml +++ b/ocamldoc/odoc_types.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_types.ml 12959 2012-09-27 13:12:51Z maranget $ *) type ref_kind = RK_module diff --git a/ocamldoc/odoc_types.mli b/ocamldoc/odoc_types.mli index 0913842591..ba33d48c67 100644 --- a/ocamldoc/odoc_types.mli +++ b/ocamldoc/odoc_types.mli @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_types.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Types for the information collected in comments. *) diff --git a/ocamldoc/odoc_value.ml b/ocamldoc/odoc_value.ml index a075302c0e..b715acca07 100644 --- a/ocamldoc/odoc_value.ml +++ b/ocamldoc/odoc_value.ml @@ -9,7 +9,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: odoc_value.ml 12858 2012-08-10 14:45:51Z maranget $ *) (** Representation and manipulation of values, class attributes and class methods. *) diff --git a/ocamldoc/runocamldoc b/ocamldoc/runocamldoc index 3aba71923a..82074d0290 100644 --- a/ocamldoc/runocamldoc +++ b/ocamldoc/runocamldoc @@ -12,7 +12,7 @@ # # ####################################################################### -# $Id$ +# $Id: runocamldoc 12858 2012-08-10 14:45:51Z maranget $ case "$1" in true) shift diff --git a/otherlibs/bigarray/.depend b/otherlibs/bigarray/.depend index b866e20fff..2a2fc2ea59 100644 --- a/otherlibs/bigarray/.depend +++ b/otherlibs/bigarray/.depend @@ -1,22 +1,24 @@ bigarray_stubs.o: bigarray_stubs.c ../../byterun/alloc.h \ - ../../byterun/misc.h ../../byterun/config.h ../../byterun/../config/m.h \ - ../../byterun/../config/s.h ../../byterun/mlvalues.h bigarray.h \ - ../../byterun/config.h ../../byterun/mlvalues.h ../../byterun/custom.h \ - ../../byterun/fail.h ../../byterun/intext.h ../../byterun/io.h \ - ../../byterun/fix_code.h ../../byterun/memory.h ../../byterun/gc.h \ - ../../byterun/major_gc.h ../../byterun/freelist.h \ - ../../byterun/minor_gc.h -mmap_unix.o: mmap_unix.c bigarray.h ../../byterun/config.h \ - ../../byterun/../config/m.h ../../byterun/../config/s.h \ - ../../byterun/mlvalues.h ../../byterun/config.h ../../byterun/misc.h \ - ../../byterun/custom.h ../../byterun/mlvalues.h ../../byterun/fail.h \ - ../../byterun/io.h ../../byterun/sys.h ../../byterun/signals.h -mmap_win32.o: mmap_win32.c bigarray.h ../../byterun/config.h \ - ../../byterun/../config/m.h ../../byterun/../config/s.h \ - ../../byterun/mlvalues.h ../../byterun/config.h ../../byterun/misc.h \ - ../../byterun/alloc.h ../../byterun/mlvalues.h ../../byterun/custom.h \ - ../../byterun/fail.h ../../byterun/sys.h ../unix/unixsupport.h -bigarray.cmi: -bigarray.cmo: bigarray.cmi -bigarray.cmx: bigarray.cmi ->>>>>>> .fusion-droit.r10497 + ../../byterun/compatibility.h ../../byterun/misc.h \ + ../../byterun/config.h ../../byterun/../config/m.h \ + ../../byterun/../config/s.h ../../byterun/mlvalues.h bigarray.h \ + ../../byterun/compatibility.h ../../byterun/config.h \ + ../../byterun/mlvalues.h ../../byterun/custom.h ../../byterun/fail.h \ + ../../byterun/intext.h ../../byterun/io.h ../../byterun/hash.h \ + ../../byterun/memory.h ../../byterun/gc.h ../../byterun/major_gc.h \ + ../../byterun/freelist.h ../../byterun/minor_gc.h +mmap_unix.o: mmap_unix.c bigarray.h ../../byterun/compatibility.h \ + ../../byterun/config.h ../../byterun/../config/m.h \ + ../../byterun/../config/s.h ../../byterun/compatibility.h \ + ../../byterun/mlvalues.h ../../byterun/config.h ../../byterun/misc.h \ + ../../byterun/custom.h ../../byterun/mlvalues.h ../../byterun/fail.h \ + ../../byterun/io.h ../../byterun/sys.h ../../byterun/signals.h +mmap_win32.o: mmap_win32.c bigarray.h ../../byterun/compatibility.h \ + ../../byterun/config.h ../../byterun/../config/m.h \ + ../../byterun/../config/s.h ../../byterun/compatibility.h \ + ../../byterun/mlvalues.h ../../byterun/config.h ../../byterun/misc.h \ + ../../byterun/alloc.h ../../byterun/mlvalues.h ../../byterun/custom.h \ + ../../byterun/fail.h ../../byterun/sys.h ../unix/unixsupport.h +bigarray.cmi : +bigarray.cmo : bigarray.cmi +bigarray.cmx : bigarray.cmi diff --git a/otherlibs/bigarray/Makefile b/otherlibs/bigarray/Makefile index 290df11896..83b3152586 100644 --- a/otherlibs/bigarray/Makefile +++ b/otherlibs/bigarray/Makefile @@ -13,63 +13,17 @@ # $Id$ -include ../../config/Makefile +LIBNAME=bigarray +EXTRACFLAGS=-I../unix -DIN_OCAML_BIGARRAY -DCAML_NAME_SPACE +EXTRACAMLFLAGS=-I ../unix +COBJS=bigarray_stubs.$(O) mmap_unix.$(O) +CAMLOBJS=bigarray.cmo +HEADERS=bigarray.h -CC=$(BYTECC) -CFLAGS=-I../../byterun -O $(BYTECCCOMPOPTS) $(SHAREDCCCOMPOPTS) -CAMLC=../../ocamlcomp.sh -I ../unix -CAMLOPT=../../ocamlcompopt.sh -I ../unix -MKLIB=../../boot/ocamlrun ../../tools/ocamlmklib -COMPFLAGS=-warn-error A -nojoin -g - - -C_OBJS=bigarray_stubs.o mmap_unix.o - -CAML_OBJS=bigarray.cmo - -all: libbigarray.a bigarray.cma - -allopt: libbigarray.a bigarray.cmxa - -libbigarray.a: $(C_OBJS) - $(MKLIB) -o bigarray $(C_OBJS) - -bigarray.cma: $(CAML_OBJS) - $(MKLIB) -ocamlc '$(CAMLC)' -linkall -o bigarray $(CAML_OBJS) - -bigarray.cmxa: $(CAML_OBJS:.cmo=.cmx) - $(MKLIB) -ocamlopt '$(CAMLOPT)' -linkall -o bigarray \ - $(CAML_OBJS:.cmo=.cmx) - -install: - if test -f dllbigarray.so; then cp dllbigarray.so $(STUBLIBDIR)/dllbigarray.so; fi - cp bigarray.cmi bigarray.mli libbigarray.a bigarray.cma $(LIBDIR) - cd $(LIBDIR); $(RANLIB) libbigarray.a - cp bigarray.h $(LIBDIR)/caml/bigarray.h - -installopt: - cp bigarray.a $(CAML_OBJS:.cmo=.cmx) bigarray.cmxa $(LIBDIR) - cd $(LIBDIR); $(RANLIB) bigarray.a - -partialclean: - rm -f *.cm* - -clean: partialclean - rm -f *.o *.so *.a - -.SUFFIXES: .ml .mli .cmo .cmi .cmx - -.mli.cmi: - $(CAMLC) -c $(COMPFLAGS) $< - -.ml.cmo: - $(CAMLC) -c $(COMPFLAGS) $< - -.ml.cmx: - $(CAMLOPT) -c $(COMPFLAGS) $< +include ../Makefile depend: - gcc -MM -I../../byterun -I../unix *.c > .depend + gcc -MM $(CFLAGS) *.c > .depend ../../boot/ocamlrun ../../tools/ocamldep *.mli *.ml >> .depend include .depend diff --git a/otherlibs/bigarray/Makefile.nt b/otherlibs/bigarray/Makefile.nt index 78674e625c..e845ad62e0 100644 --- a/otherlibs/bigarray/Makefile.nt +++ b/otherlibs/bigarray/Makefile.nt @@ -13,70 +13,14 @@ # $Id$ -include ../../config/Makefile - -CC=$(BYTECC) -CFLAGS=-I../../byterun -I../win32unix -DIN_OCAML_BIGARRAY -CAMLC=../../boot/ocamlrun ../../ocamlc -I ../../stdlib -I ../win32unix -CAMLOPT=../../boot/ocamlrun ../../ocamlopt -I ../../stdlib -I ../win32unix -COMPFLAGS=-warn-error A -g - -C_OBJS=bigarray_stubs.obj mmap_win32.obj - -CAML_OBJS=bigarray.cmo - -all: dllbigarray.dll libbigarray.$(A) bigarray.cma - -allopt: libbigarray.$(A) bigarray.cmxa - -dllbigarray.dll: $(C_OBJS:.obj=.$(DO)) - $(call MKDLL,dllbigarray.dll,dllbigarray.$(A),\ - $(C_OBJS:.obj=.$(DO)) ../../byterun/ocamlrun.$(A)) - -libbigarray.$(A): $(C_OBJS:.obj=.$(SO)) - $(call MKLIB,libbigarray.$(A),$(C_OBJS:.obj=.$(SO))) - -bigarray.cma: $(CAML_OBJS) - $(CAMLC) -a -linkall -o bigarray.cma $(CAML_OBJS) \ - -dllib -lbigarray -cclib -lbigarray - -bigarray.cmxa: $(CAML_OBJS:.cmo=.cmx) - $(CAMLOPT) -a -linkall -o bigarray.cmxa \ - $(CAML_OBJS:.cmo=.cmx) -cclib -lbigarray - -install: - cp dllbigarray.dll $(STUBLIBDIR) - cp libbigarray.$(A) dllbigarray.$(A) $(LIBDIR) - cp bigarray.cmi bigarray.mli bigarray.cma $(LIBDIR) - cp bigarray.h $(LIBDIR)/caml/bigarray.h - -installopt: - cp bigarray.$(A) $(CAML_OBJS:.cmo=.cmx) bigarray.cmxa $(LIBDIR) - -partialclean: - rm -f *.cm* - -clean: partialclean - rm -f *.dll *.$(A) *.$(O) - -.SUFFIXES: .ml .mli .cmo .cmi .cmx .$(DO) .$(SO) - -.mli.cmi: - $(CAMLC) -c $(COMPFLAGS) $< - -.ml.cmo: - $(CAMLC) -c $(COMPFLAGS) $< - -.ml.cmx: - $(CAMLOPT) -c $(COMPFLAGS) $< - -.c.$(DO): - $(BYTECC) $(DLLCCCOMPOPTS) $(CFLAGS) -c $< - mv $*.$(O) $*.$(DO) - -.c.$(SO): - $(BYTECC) $(BYTECCCOMPOPTS) $(CFLAGS) -c $< - mv $*.$(O) $*.$(SO) +LIBNAME=bigarray +EXTRACFLAGS=-I../win32unix -DIN_OCAML_BIGARRAY -DCAML_NAME_SPACE +EXTRACAMLFLAGS=-I ../win32unix +COBJS=bigarray_stubs.$(O) mmap_win32.$(O) +CAMLOBJS=bigarray.cmo +HEADERS=bigarray.h + +include ../Makefile.nt depend: gcc -MM $(CFLAGS) *.c > .depend diff --git a/otherlibs/bigarray/bigarray.h b/otherlibs/bigarray/bigarray.h index f310307f2a..f6552107a6 100644 --- a/otherlibs/bigarray/bigarray.h +++ b/otherlibs/bigarray/bigarray.h @@ -95,5 +95,6 @@ CAMLBAextern value caml_ba_alloc(int flags, int num_dims, void * data, intnat * dim); CAMLBAextern value caml_ba_alloc_dims(int flags, int num_dims, void * data, ... /*dimensions, with type intnat */); +CAMLBAextern uintnat caml_ba_byte_size(struct caml_ba_array * b); #endif diff --git a/otherlibs/bigarray/bigarray.ml b/otherlibs/bigarray/bigarray.ml index 2451bd8094..1d3dbcf971 100644 --- a/otherlibs/bigarray/bigarray.ml +++ b/otherlibs/bigarray/bigarray.ml @@ -107,6 +107,8 @@ module Array1 = struct Genarray.create kind layout [|dim|] external get: ('a, 'b, 'c) t -> int -> 'a = "%caml_ba_ref_1" external set: ('a, 'b, 'c) t -> int -> 'a -> unit = "%caml_ba_set_1" + external unsafe_get: ('a, 'b, 'c) t -> int -> 'a = "%caml_ba_unsafe_ref_1" + external unsafe_set: ('a, 'b, 'c) t -> int -> 'a -> unit = "%caml_ba_unsafe_set_1" let dim a = Genarray.nth_dim a 0 external kind: ('a, 'b, 'c) t -> ('a, 'b) kind = "caml_ba_kind" external layout: ('a, 'b, 'c) t -> 'c layout = "caml_ba_layout" @@ -116,7 +118,7 @@ module Array1 = struct let of_array kind layout data = let ba = create kind layout (Array.length data) in let ofs = if layout = c_layout then 0 else 1 in - for i = 0 to Array.length data - 1 do set ba (i + ofs) data.(i) done; + for i = 0 to Array.length data - 1 do unsafe_set ba (i + ofs) data.(i) done; ba let map_file fd ?pos kind layout shared dim = Genarray.map_file fd ?pos kind layout shared [|dim|] @@ -128,6 +130,8 @@ module Array2 = struct Genarray.create kind layout [|dim1; dim2|] external get: ('a, 'b, 'c) t -> int -> int -> 'a = "%caml_ba_ref_2" external set: ('a, 'b, 'c) t -> int -> int -> 'a -> unit = "%caml_ba_set_2" + external unsafe_get: ('a, 'b, 'c) t -> int -> int -> 'a = "%caml_ba_unsafe_ref_2" + external unsafe_set: ('a, 'b, 'c) t -> int -> int -> 'a -> unit = "%caml_ba_unsafe_set_2" let dim1 a = Genarray.nth_dim a 0 let dim2 a = Genarray.nth_dim a 1 external kind: ('a, 'b, 'c) t -> ('a, 'b) kind = "caml_ba_kind" @@ -151,7 +155,7 @@ module Array2 = struct if Array.length row <> dim2 then invalid_arg("Bigarray.Array2.of_array: non-rectangular data"); for j = 0 to dim2 - 1 do - set ba (i + ofs) (j + ofs) row.(j) + unsafe_set ba (i + ofs) (j + ofs) row.(j) done done; ba @@ -166,6 +170,8 @@ module Array3 = struct external get: ('a, 'b, 'c) t -> int -> int -> int -> 'a = "%caml_ba_ref_3" external set: ('a, 'b, 'c) t -> int -> int -> int -> 'a -> unit = "%caml_ba_set_3" + external unsafe_get: ('a, 'b, 'c) t -> int -> int -> int -> 'a = "%caml_ba_unsafe_ref_3" + external unsafe_set: ('a, 'b, 'c) t -> int -> int -> int -> 'a -> unit = "%caml_ba_unsafe_set_3" let dim1 a = Genarray.nth_dim a 0 let dim2 a = Genarray.nth_dim a 1 let dim3 a = Genarray.nth_dim a 2 @@ -197,7 +203,7 @@ module Array3 = struct if Array.length col <> dim3 then invalid_arg("Bigarray.Array3.of_array: non-cubic data"); for k = 0 to dim3 - 1 do - set ba (i + ofs) (j + ofs) (k + ofs) col.(k) + unsafe_set ba (i + ofs) (j + ofs) (k + ofs) col.(k) done done done; @@ -238,3 +244,10 @@ let _ = let _ = Array2.get in let _ = Array3.get in () + +external get1: unit -> unit = "caml_ba_get_1" +external get2: unit -> unit = "caml_ba_get_2" +external get3: unit -> unit = "caml_ba_get_3" +external set1: unit -> unit = "caml_ba_set_1" +external set2: unit -> unit = "caml_ba_set_2" +external set3: unit -> unit = "caml_ba_set_3" diff --git a/otherlibs/bigarray/bigarray.mli b/otherlibs/bigarray/bigarray.mli index b4d18d79eb..fb252cb421 100644 --- a/otherlibs/bigarray/bigarray.mli +++ b/otherlibs/bigarray/bigarray.mli @@ -227,7 +227,7 @@ module Genarray : Big arrays returned by [Genarray.create] are not initialized: the initial values of array elements is unspecified. - [Genarray.create] raises [Invalid_arg] if the number of dimensions + [Genarray.create] raises [Invalid_argument] if the number of dimensions is not in the range 1 to 16 inclusive, or if one of the dimensions is negative. *) @@ -243,7 +243,7 @@ module Genarray : big array [a]. The first dimension corresponds to [n = 0]; the second dimension corresponds to [n = 1]; the last dimension, to [n = Genarray.num_dims a - 1]. - Raise [Invalid_arg] if [n] is less than 0 or greater or equal than + Raise [Invalid_argument] if [n] is less than 0 or greater or equal than [Genarray.num_dims a]. *) external kind: ('a, 'b, 'c) t -> ('a, 'b) kind = "caml_ba_kind" @@ -262,7 +262,7 @@ module Genarray : and strictly less than the corresponding dimensions of [a]. If [a] has Fortran layout, the coordinates must be greater or equal than 1 and less or equal than the corresponding dimensions of [a]. - Raise [Invalid_arg] if the array [a] does not have exactly [N] + Raise [Invalid_argument] if the array [a] does not have exactly [N] dimensions, or if the coordinates are outside the array bounds. If [N > 3], alternate syntax is provided: you can write @@ -280,7 +280,7 @@ module Genarray : The array [a] must have exactly [N] dimensions, and all coordinates must lie inside the array bounds, as described for [Genarray.get]; - otherwise, [Invalid_arg] is raised. + otherwise, [Invalid_argument] is raised. If [N > 3], alternate syntax is provided: you can write [a.{i1, i2, ..., iN} <- v] instead of @@ -304,7 +304,7 @@ module Genarray : array [a]. [Genarray.sub_left] applies only to big arrays in C layout. - Raise [Invalid_arg] if [ofs] and [len] do not designate + Raise [Invalid_argument] if [ofs] and [len] do not designate a valid sub-array of [a], that is, if [ofs < 0], or [len < 0], or [ofs + len > Genarray.nth_dim a 0]. *) @@ -324,7 +324,7 @@ module Genarray : array [a]. [Genarray.sub_right] applies only to big arrays in Fortran layout. - Raise [Invalid_arg] if [ofs] and [len] do not designate + Raise [Invalid_argument] if [ofs] and [len] do not designate a valid sub-array of [a], that is, if [ofs < 1], or [len < 0], or [ofs + len > Genarray.nth_dim a (Genarray.num_dims a - 1)]. *) @@ -343,7 +343,7 @@ module Genarray : the original array share the same storage space. [Genarray.slice_left] applies only to big arrays in C layout. - Raise [Invalid_arg] if [M >= N], or if [[|i1; ... ; iM|]] + Raise [Invalid_argument] if [M >= N], or if [[|i1; ... ; iM|]] is outside the bounds of [a]. *) external slice_right: @@ -361,7 +361,7 @@ module Genarray : the original array share the same storage space. [Genarray.slice_right] applies only to big arrays in Fortran layout. - Raise [Invalid_arg] if [M >= N], or if [[|i1; ... ; iM|]] + Raise [Invalid_argument] if [M >= N], or if [[|i1; ... ; iM|]] is outside the bounds of [a]. *) external blit: ('a, 'b, 'c) t -> ('a, 'b, 'c) t -> unit @@ -391,7 +391,7 @@ module Genarray : the file descriptor [fd] (as opened previously with [Unix.openfile], for example). The optional [pos] parameter is the byte offset in the file of the data being mapped; - it default to 0 (map from the beginning of the file). + it defaults to 0 (map from the beginning of the file). If [shared] is [true], all modifications performed on the array are reflected in the file. This requires that [fd] be opened @@ -464,14 +464,14 @@ module Array1 : sig [x] must be greater or equal than [0] and strictly less than [Array1.dim a] if [a] has C layout. If [a] has Fortran layout, [x] must be greater or equal than [1] and less or equal than - [Array1.dim a]. Otherwise, [Invalid_arg] is raised. *) + [Array1.dim a]. Otherwise, [Invalid_argument] is raised. *) external set: ('a, 'b, 'c) t -> int -> 'a -> unit = "%caml_ba_set_1" (** [Array1.set a x v], also written [a.{x} <- v], stores the value [v] at index [x] in [a]. [x] must be inside the bounds of [a] as described in {!Bigarray.Array1.get}; - otherwise, [Invalid_arg] is raised. *) + otherwise, [Invalid_argument] is raised. *) external sub: ('a, 'b, 'c) t -> int -> int -> ('a, 'b, 'c) t = "caml_ba_sub" @@ -495,6 +495,18 @@ module Array1 : sig bool -> int -> ('a, 'b, 'c) t (** Memory mapping of a file as a one-dimensional big array. See {!Bigarray.Genarray.map_file} for more details. *) + + external unsafe_get: ('a, 'b, 'c) t -> int -> 'a = "%caml_ba_unsafe_ref_1" + (** Like {!Bigarray.Array1.get}, but bounds checking is not always performed. + Use with caution and only when the program logic guarantees that + the access is within bounds. *) + + external unsafe_set: ('a, 'b, 'c) t -> int -> 'a -> unit + = "%caml_ba_unsafe_set_1" + (** Like {!Bigarray.Array1.set}, but bounds checking is not always performed. + Use with caution and only when the program logic guarantees that + the access is within bounds. *) + end @@ -533,14 +545,14 @@ module Array2 : returns the element of [a] at coordinates ([x], [y]). [x] and [y] must be within the bounds of [a], as described for {!Bigarray.Genarray.get}; - otherwise, [Invalid_arg] is raised. *) + otherwise, [Invalid_argument] is raised. *) external set: ('a, 'b, 'c) t -> int -> int -> 'a -> unit = "%caml_ba_set_2" (** [Array2.set a x y v], or alternatively [a.{x,y} <- v], stores the value [v] at coordinates ([x], [y]) in [a]. [x] and [y] must be within the bounds of [a], as described for {!Bigarray.Genarray.set}; - otherwise, [Invalid_arg] is raised. *) + otherwise, [Invalid_argument] is raised. *) external sub_left: ('a, 'b, c_layout) t -> int -> int -> ('a, 'b, c_layout) t = "caml_ba_sub" @@ -589,7 +601,17 @@ module Array2 : (** Memory mapping of a file as a two-dimensional big array. See {!Bigarray.Genarray.map_file} for more details. *) - end + external unsafe_get: ('a, 'b, 'c) t -> int -> int -> 'a + = "%caml_ba_unsafe_ref_2" + (** Like {!Bigarray.Array2.get}, but bounds checking is not always + performed. *) + + external unsafe_set: ('a, 'b, 'c) t -> int -> int -> 'a -> unit + = "%caml_ba_unsafe_set_2" + (** Like {!Bigarray.Array2.set}, but bounds checking is not always + performed. *) + +end (** {6 Three-dimensional arrays} *) @@ -629,7 +651,7 @@ module Array3 : returns the element of [a] at coordinates ([x], [y], [z]). [x], [y] and [z] must be within the bounds of [a], as described for {!Bigarray.Genarray.get}; - otherwise, [Invalid_arg] is raised. *) + otherwise, [Invalid_argument] is raised. *) external set: ('a, 'b, 'c) t -> int -> int -> int -> 'a -> unit = "%caml_ba_set_3" @@ -637,7 +659,7 @@ module Array3 : stores the value [v] at coordinates ([x], [y], [z]) in [a]. [x], [y] and [z] must be within the bounds of [a], as described for {!Bigarray.Genarray.set}; - otherwise, [Invalid_arg] is raised. *) + otherwise, [Invalid_argument] is raised. *) external sub_left: ('a, 'b, c_layout) t -> int -> int -> ('a, 'b, c_layout) t = "caml_ba_sub" @@ -706,7 +728,18 @@ module Array3 : bool -> int -> int -> int -> ('a, 'b, 'c) t (** Memory mapping of a file as a three-dimensional big array. See {!Bigarray.Genarray.map_file} for more details. *) - end + + external unsafe_get: ('a, 'b, 'c) t -> int -> int -> int -> 'a + = "%caml_ba_unsafe_ref_3" + (** Like {!Bigarray.Array3.get}, but bounds checking is not always + performed. *) + + external unsafe_set: ('a, 'b, 'c) t -> int -> int -> int -> 'a -> unit + = "%caml_ba_unsafe_set_3" + (** Like {!Bigarray.Array3.set}, but bounds checking is not always + performed. *) + +end (** {6 Coercions between generic big arrays and fixed-dimension big arrays} *) @@ -727,17 +760,17 @@ external genarray_of_array3 : val array1_of_genarray : ('a, 'b, 'c) Genarray.t -> ('a, 'b, 'c) Array1.t (** Return the one-dimensional big array corresponding to the given - generic big array. Raise [Invalid_arg] if the generic big array + generic big array. Raise [Invalid_argument] if the generic big array does not have exactly one dimension. *) val array2_of_genarray : ('a, 'b, 'c) Genarray.t -> ('a, 'b, 'c) Array2.t (** Return the two-dimensional big array corresponding to the given - generic big array. Raise [Invalid_arg] if the generic big array + generic big array. Raise [Invalid_argument] if the generic big array does not have exactly two dimensions. *) val array3_of_genarray : ('a, 'b, 'c) Genarray.t -> ('a, 'b, 'c) Array3.t (** Return the three-dimensional big array corresponding to the given - generic big array. Raise [Invalid_arg] if the generic big array + generic big array. Raise [Invalid_argument] if the generic big array does not have exactly three dimensions. *) @@ -757,7 +790,7 @@ val reshape : ('a, 'b, 'c) Genarray.t -> int array -> ('a, 'b, 'c) Genarray.t The returned big array must have exactly the same number of elements as the original big array [b]. That is, the product of the dimensions of [b] must be equal to [i1 * ... * iN]. - Otherwise, [Invalid_arg] is raised. *) + Otherwise, [Invalid_argument] is raised. *) val reshape_1 : ('a, 'b, 'c) Genarray.t -> int -> ('a, 'b, 'c) Array1.t (** Specialized version of {!Bigarray.reshape} for reshaping to diff --git a/otherlibs/bigarray/bigarray_stubs.c b/otherlibs/bigarray/bigarray_stubs.c index 5b8259ad0c..c66ccbcc3b 100644 --- a/otherlibs/bigarray/bigarray_stubs.c +++ b/otherlibs/bigarray/bigarray_stubs.c @@ -25,12 +25,17 @@ #include "memory.h" #include "mlvalues.h" +#define int8 caml_ba_int8 +#define uint8 caml_ba_uint8 +#define int16 caml_ba_int16 +#define uint16 caml_ba_uint16 + extern void caml_ba_unmap_file(void * addr, uintnat len); /* from mmap_xxx.c */ /* Compute the number of elements of a big array */ -static uintnat caml_ba_num_elts(struct caml_bigarray * b) +static uintnat caml_ba_num_elts(struct caml_ba_array * b) { uintnat num_elts; int i; @@ -52,7 +57,7 @@ int caml_ba_element_size[] = /* Compute the number of bytes for the elements of a big array */ -uintnat caml_ba_byte_size(struct caml_bigarray * b) +CAMLexport uintnat caml_ba_byte_size(struct caml_ba_array * b) { return caml_ba_num_elts(b) * caml_ba_element_size[b->flags & CAML_BA_KIND_MASK]; @@ -134,11 +139,11 @@ caml_ba_alloc(int flags, int num_dims, void * data, intnat * dim) uintnat num_elts, asize, size; int overflow, i; value res; - struct caml_bigarray * b; - intnat dimcopy[MAX_NUM_DIMS]; + struct caml_ba_array * b; + intnat dimcopy[CAML_BA_MAX_NUM_DIMS]; - Assert(num_dims >= 1 && num_dims <= MAX_NUM_DIMS); - Assert((flags & BIGARRAY_KIND_MASK) <= BIGARRAY_COMPLEX64); + Assert(num_dims >= 1 && num_dims <= CAML_BA_MAX_NUM_DIMS); + Assert((flags & CAML_BA_KIND_MASK) <= CAML_BA_COMPLEX64); for (i = 0; i < num_dims; i++) dimcopy[i] = dim[i]; size = 0; if (data == NULL) { @@ -148,12 +153,12 @@ caml_ba_alloc(int flags, int num_dims, void * data, intnat * dim) num_elts = caml_ba_multov(num_elts, dimcopy[i], &overflow); } size = caml_ba_multov(num_elts, - caml_ba_element_size[flags & BIGARRAY_KIND_MASK], + caml_ba_element_size[flags & CAML_BA_KIND_MASK], &overflow); - if (overflow) raise_out_of_memory(); + if (overflow) caml_raise_out_of_memory(); data = malloc(size); - if (data == NULL && size != 0) raise_out_of_memory(); - flags |= BIGARRAY_MANAGED; + if (data == NULL && size != 0) caml_raise_out_of_memory(); + flags |= CAML_BA_MANAGED; } /* PR#5516: use C99's flexible array types if possible */ #if (__STDC_VERSION__ >= 199901L) @@ -177,7 +182,7 @@ caml_ba_alloc(int flags, int num_dims, void * data, intnat * dim) CAMLexport value caml_ba_alloc_dims(int flags, int num_dims, void * data, ...) { va_list ap; - intnat dim[MAX_NUM_DIMS]; + intnat dim[CAML_BA_MAX_NUM_DIMS]; int i; value res; @@ -193,22 +198,17 @@ CAMLexport value caml_ba_alloc_dims(int flags, int num_dims, void * data, ...) CAMLprim value caml_ba_create(value vkind, value vlayout, value vdim) { - intnat dim[MAX_NUM_DIMS]; + intnat dim[CAML_BA_MAX_NUM_DIMS]; mlsize_t num_dims; int i, flags; num_dims = Wosize_val(vdim); - if (num_dims < 1 || num_dims > MAX_NUM_DIMS) - invalid_argument("Bigarray.create: bad number of dimensions"); + if (num_dims < 1 || num_dims > CAML_BA_MAX_NUM_DIMS) + caml_invalid_argument("Bigarray.create: bad number of dimensions"); for (i = 0; i < num_dims; i++) { dim[i] = Long_val(Field(vdim, i)); -<<<<<<< .courant - if (dim[i] < 0 || dim[i] > 0x7FFFFFFFL) - invalid_argument("Bigarray.create: negative dimension"); -======= if (dim[i] < 0) caml_invalid_argument("Bigarray.create: negative dimension"); ->>>>>>> .fusion-droit.r10497 } flags = Int_val(vkind) | Int_val(vlayout); return caml_ba_alloc(flags, num_dims, NULL, dim); @@ -224,18 +224,18 @@ static long caml_ba_offset(struct caml_ba_array * b, intnat * index) int i; offset = 0; - if ((b->flags & BIGARRAY_LAYOUT_MASK) == BIGARRAY_C_LAYOUT) { + if ((b->flags & CAML_BA_LAYOUT_MASK) == CAML_BA_C_LAYOUT) { /* C-style layout: row major, indices start at 0 */ for (i = 0; i < b->num_dims; i++) { if ((uintnat) index[i] >= (uintnat) b->dim[i]) - array_bound_error(); + caml_array_bound_error(); offset = offset * b->dim[i] + index[i]; } } else { /* Fortran-style layout: column major, indices start at 1 */ for (i = b->num_dims - 1; i >= 0; i--) { if ((uintnat) (index[i] - 1) >= (uintnat) b->dim[i]) - array_bound_error(); + caml_array_bound_error(); offset = offset * b->dim[i] + (index[i] - 1); } } @@ -246,7 +246,7 @@ static long caml_ba_offset(struct caml_ba_array * b, intnat * index) static value copy_two_doubles(double d0, double d1) { - value res = alloc_small(2 * Double_wosize, Double_array_tag); + value res = caml_alloc_small(2 * Double_wosize, Double_array_tag); Store_double_field(res, 0, d0); Store_double_field(res, 1, d1); return res; @@ -256,46 +256,46 @@ static value copy_two_doubles(double d0, double d1) value caml_ba_get_N(value vb, value * vind, int nind) { - struct caml_bigarray * b = Bigarray_val(vb); - intnat index[MAX_NUM_DIMS]; + struct caml_ba_array * b = Caml_ba_array_val(vb); + intnat index[CAML_BA_MAX_NUM_DIMS]; int i; intnat offset; /* Check number of indices = number of dimensions of array (maybe not necessary if ML typing guarantees this) */ if (nind != b->num_dims) - invalid_argument("Bigarray.get: wrong number of indices"); + caml_invalid_argument("Bigarray.get: wrong number of indices"); /* Compute offset and check bounds */ for (i = 0; i < b->num_dims; i++) index[i] = Long_val(vind[i]); offset = caml_ba_offset(b, index); /* Perform read */ - switch ((b->flags) & BIGARRAY_KIND_MASK) { + switch ((b->flags) & CAML_BA_KIND_MASK) { default: Assert(0); - case BIGARRAY_FLOAT32: - return copy_double(((float *) b->data)[offset]); - case BIGARRAY_FLOAT64: - return copy_double(((double *) b->data)[offset]); - case BIGARRAY_SINT8: + case CAML_BA_FLOAT32: + return caml_copy_double(((float *) b->data)[offset]); + case CAML_BA_FLOAT64: + return caml_copy_double(((double *) b->data)[offset]); + case CAML_BA_SINT8: return Val_int(((int8 *) b->data)[offset]); - case BIGARRAY_UINT8: + case CAML_BA_UINT8: return Val_int(((uint8 *) b->data)[offset]); - case BIGARRAY_SINT16: + case CAML_BA_SINT16: return Val_int(((int16 *) b->data)[offset]); - case BIGARRAY_UINT16: + case CAML_BA_UINT16: return Val_int(((uint16 *) b->data)[offset]); - case BIGARRAY_INT32: - return copy_int32(((int32 *) b->data)[offset]); - case BIGARRAY_INT64: - return copy_int64(((int64 *) b->data)[offset]); - case BIGARRAY_NATIVE_INT: - return copy_nativeint(((intnat *) b->data)[offset]); - case BIGARRAY_CAML_INT: + case CAML_BA_INT32: + return caml_copy_int32(((int32 *) b->data)[offset]); + case CAML_BA_INT64: + return caml_copy_int64(((int64 *) b->data)[offset]); + case CAML_BA_NATIVE_INT: + return caml_copy_nativeint(((intnat *) b->data)[offset]); + case CAML_BA_CAML_INT: return Val_long(((intnat *) b->data)[offset]); - case BIGARRAY_COMPLEX32: + case CAML_BA_COMPLEX32: { float * p = ((float *) b->data) + offset * 2; return copy_two_doubles(p[0], p[1]); } - case BIGARRAY_COMPLEX64: + case CAML_BA_COMPLEX64: { double * p = ((double *) b->data) + offset * 2; return copy_two_doubles(p[0], p[1]); } } @@ -357,46 +357,46 @@ CAMLprim value caml_ba_get_generic(value vb, value vind) static value caml_ba_set_aux(value vb, value * vind, intnat nind, value newval) { - struct caml_bigarray * b = Bigarray_val(vb); - intnat index[MAX_NUM_DIMS]; + struct caml_ba_array * b = Caml_ba_array_val(vb); + intnat index[CAML_BA_MAX_NUM_DIMS]; int i; intnat offset; /* Check number of indices = number of dimensions of array (maybe not necessary if ML typing guarantees this) */ if (nind != b->num_dims) - invalid_argument("Bigarray.set: wrong number of indices"); + caml_invalid_argument("Bigarray.set: wrong number of indices"); /* Compute offset and check bounds */ for (i = 0; i < b->num_dims; i++) index[i] = Long_val(vind[i]); offset = caml_ba_offset(b, index); /* Perform write */ - switch (b->flags & BIGARRAY_KIND_MASK) { + switch (b->flags & CAML_BA_KIND_MASK) { default: Assert(0); - case BIGARRAY_FLOAT32: + case CAML_BA_FLOAT32: ((float *) b->data)[offset] = Double_val(newval); break; - case BIGARRAY_FLOAT64: + case CAML_BA_FLOAT64: ((double *) b->data)[offset] = Double_val(newval); break; - case BIGARRAY_SINT8: - case BIGARRAY_UINT8: + case CAML_BA_SINT8: + case CAML_BA_UINT8: ((int8 *) b->data)[offset] = Int_val(newval); break; - case BIGARRAY_SINT16: - case BIGARRAY_UINT16: + case CAML_BA_SINT16: + case CAML_BA_UINT16: ((int16 *) b->data)[offset] = Int_val(newval); break; - case BIGARRAY_INT32: + case CAML_BA_INT32: ((int32 *) b->data)[offset] = Int32_val(newval); break; - case BIGARRAY_INT64: + case CAML_BA_INT64: ((int64 *) b->data)[offset] = Int64_val(newval); break; - case BIGARRAY_NATIVE_INT: + case CAML_BA_NATIVE_INT: ((intnat *) b->data)[offset] = Nativeint_val(newval); break; - case BIGARRAY_CAML_INT: + case CAML_BA_CAML_INT: ((intnat *) b->data)[offset] = Long_val(newval); break; - case BIGARRAY_COMPLEX32: + case CAML_BA_COMPLEX32: { float * p = ((float *) b->data) + offset * 2; p[0] = Double_field(newval, 0); p[1] = Double_field(newval, 1); break; } - case BIGARRAY_COMPLEX64: + case CAML_BA_COMPLEX64: { double * p = ((double *) b->data) + offset * 2; p[0] = Double_field(newval, 0); p[1] = Double_field(newval, 1); @@ -468,7 +468,7 @@ CAMLprim value caml_ba_set_generic(value vb, value vind, value newval) CAMLprim value caml_ba_num_dims(value vb) { - struct caml_bigarray * b = Bigarray_val(vb); + struct caml_ba_array * b = Caml_ba_array_val(vb); return Val_long(b->num_dims); } @@ -476,9 +476,9 @@ CAMLprim value caml_ba_num_dims(value vb) CAMLprim value caml_ba_dim(value vb, value vn) { - struct caml_bigarray * b = Bigarray_val(vb); + struct caml_ba_array * b = Caml_ba_array_val(vb); intnat n = Long_val(vn); - if (n >= b->num_dims) invalid_argument("Bigarray.dim"); + if (n >= b->num_dims) caml_invalid_argument("Bigarray.dim"); return Val_long(b->dim[n]); } @@ -486,42 +486,42 @@ CAMLprim value caml_ba_dim(value vb, value vn) CAMLprim value caml_ba_kind(value vb) { - return Val_int(Bigarray_val(vb)->flags & BIGARRAY_KIND_MASK); + return Val_int(Caml_ba_array_val(vb)->flags & CAML_BA_KIND_MASK); } /* Return the layout of a big array */ CAMLprim value caml_ba_layout(value vb) { - return Val_int(Bigarray_val(vb)->flags & BIGARRAY_LAYOUT_MASK); + return Val_int(Caml_ba_array_val(vb)->flags & CAML_BA_LAYOUT_MASK); } /* Finalization of a big array */ static void caml_ba_finalize(value v) { - struct caml_bigarray * b = Bigarray_val(v); + struct caml_ba_array * b = Caml_ba_array_val(v); - switch (b->flags & BIGARRAY_MANAGED_MASK) { - case BIGARRAY_EXTERNAL: + switch (b->flags & CAML_BA_MANAGED_MASK) { + case CAML_BA_EXTERNAL: break; - case BIGARRAY_MANAGED: + case CAML_BA_MANAGED: if (b->proxy == NULL) { free(b->data); } else { if (-- b->proxy->refcount == 0) { free(b->proxy->data); - stat_free(b->proxy); + caml_stat_free(b->proxy); } } break; - case BIGARRAY_MAPPED_FILE: + case CAML_BA_MAPPED_FILE: if (b->proxy == NULL) { caml_ba_unmap_file(b->data, caml_ba_byte_size(b)); } else { if (-- b->proxy->refcount == 0) { caml_ba_unmap_file(b->proxy->data, b->proxy->size); - stat_free(b->proxy); + caml_stat_free(b->proxy); } } break; @@ -532,8 +532,8 @@ static void caml_ba_finalize(value v) static int caml_ba_compare(value v1, value v2) { - struct caml_bigarray * b1 = Bigarray_val(v1); - struct caml_bigarray * b2 = Bigarray_val(v2); + struct caml_ba_array * b1 = Caml_ba_array_val(v1); + struct caml_ba_array * b2 = Caml_ba_array_val(v2); uintnat n, num_elts; intnat flags1, flags2; int i; @@ -569,7 +569,7 @@ static int caml_ba_compare(value v1, value v2) if (e1 < e2) return -1; \ if (e1 > e2) return 1; \ if (e1 != e2) { \ - compare_unordered = 1; \ + caml_compare_unordered = 1; \ if (e1 == e1) return 1; \ if (e2 == e2) return -1; \ } \ @@ -577,26 +577,26 @@ static int caml_ba_compare(value v1, value v2) return 0; \ } - switch (b1->flags & BIGARRAY_KIND_MASK) { - case BIGARRAY_COMPLEX32: + switch (b1->flags & CAML_BA_KIND_MASK) { + case CAML_BA_COMPLEX32: num_elts *= 2; /*fallthrough*/ - case BIGARRAY_FLOAT32: + case CAML_BA_FLOAT32: DO_FLOAT_COMPARISON(float); - case BIGARRAY_COMPLEX64: + case CAML_BA_COMPLEX64: num_elts *= 2; /*fallthrough*/ - case BIGARRAY_FLOAT64: + case CAML_BA_FLOAT64: DO_FLOAT_COMPARISON(double); - case BIGARRAY_SINT8: + case CAML_BA_SINT8: DO_INTEGER_COMPARISON(int8); - case BIGARRAY_UINT8: + case CAML_BA_UINT8: DO_INTEGER_COMPARISON(uint8); - case BIGARRAY_SINT16: + case CAML_BA_SINT16: DO_INTEGER_COMPARISON(int16); - case BIGARRAY_UINT16: + case CAML_BA_UINT16: DO_INTEGER_COMPARISON(uint16); - case BIGARRAY_INT32: + case CAML_BA_INT32: DO_INTEGER_COMPARISON(int32); - case BIGARRAY_INT64: + case CAML_BA_INT64: #ifdef ARCH_INT64_TYPE DO_INTEGER_COMPARISON(int64); #else @@ -611,8 +611,8 @@ static int caml_ba_compare(value v1, value v2) return 0; } #endif - case BIGARRAY_CAML_INT: - case BIGARRAY_NATIVE_INT: + case CAML_BA_CAML_INT: + case CAML_BA_NATIVE_INT: DO_INTEGER_COMPARISON(intnat); default: Assert(0); @@ -626,7 +626,7 @@ static int caml_ba_compare(value v1, value v2) static intnat caml_ba_hash(value v) { - struct caml_bigarray * b = Bigarray_val(v); + struct caml_ba_array * b = Caml_ba_array_val(v); intnat num_elts, n; uint32 h, w; int i; @@ -635,9 +635,9 @@ static intnat caml_ba_hash(value v) for (i = 0; i < b->num_dims; i++) num_elts = num_elts * b->dim[i]; h = 0; - switch (b->flags & BIGARRAY_KIND_MASK) { - case BIGARRAY_SINT8: - case BIGARRAY_UINT8: { + switch (b->flags & CAML_BA_KIND_MASK) { + case CAML_BA_SINT8: + case CAML_BA_UINT8: { uint8 * p = b->data; if (num_elts > 256) num_elts = 256; for (n = 0; n + 4 <= num_elts; n += 4, p += 4) { @@ -653,8 +653,8 @@ static intnat caml_ba_hash(value v) } break; } - case BIGARRAY_SINT16: - case BIGARRAY_UINT16: { + case CAML_BA_SINT16: + case CAML_BA_UINT16: { uint16 * p = b->data; if (num_elts > 128) num_elts = 128; for (n = 0; n + 2 <= num_elts; n += 2, p += 2) { @@ -672,8 +672,8 @@ static intnat caml_ba_hash(value v) for (n = 0; n < num_elts; n++, p++) h = caml_hash_mix_uint32(h, *p); break; } - case BIGARRAY_CAML_INT: - case BIGARRAY_NATIVE_INT: + case CAML_BA_CAML_INT: + case CAML_BA_NATIVE_INT: { intnat * p = b->data; if (num_elts > 64) num_elts = 64; @@ -720,21 +720,16 @@ static void caml_ba_serialize_longarray(void * data, if (*p < min_val || *p > max_val) { overflow_32 = 1; break; } } if (overflow_32) { - serialize_int_1(1); - serialize_block_8(data, num_elts); + caml_serialize_int_1(1); + caml_serialize_block_8(data, num_elts); } else { -<<<<<<< .courant - serialize_int_1(0); - for (n = 0, p = data; n < num_elts; n++, p++) serialize_int_4((int32) *p); -======= caml_serialize_int_1(0); for (n = 0, p = data; n < num_elts; n++, p++) caml_serialize_int_4((int32) *p); ->>>>>>> .fusion-droit.r10497 } #else - serialize_int_1(0); - serialize_block_4(data, num_elts); + caml_serialize_int_1(0); + caml_serialize_block_4(data, num_elts); #endif } @@ -742,126 +737,126 @@ static void caml_ba_serialize(value v, uintnat * wsize_32, uintnat * wsize_64) { - struct caml_bigarray * b = Bigarray_val(v); + struct caml_ba_array * b = Caml_ba_array_val(v); intnat num_elts; int i; /* Serialize header information */ - serialize_int_4(b->num_dims); - serialize_int_4(b->flags & (BIGARRAY_KIND_MASK | BIGARRAY_LAYOUT_MASK)); - for (i = 0; i < b->num_dims; i++) serialize_int_4(b->dim[i]); + caml_serialize_int_4(b->num_dims); + caml_serialize_int_4(b->flags & (CAML_BA_KIND_MASK | CAML_BA_LAYOUT_MASK)); + /* On a 64-bit machine, if any of the dimensions is >= 2^32, + the size of the marshaled data will be >= 2^32 and + extern_value() will fail. So, it is safe to write the dimensions + as 32-bit unsigned integers. */ + for (i = 0; i < b->num_dims; i++) caml_serialize_int_4(b->dim[i]); /* Compute total number of elements */ num_elts = 1; for (i = 0; i < b->num_dims; i++) num_elts = num_elts * b->dim[i]; /* Serialize elements */ - switch (b->flags & BIGARRAY_KIND_MASK) { - case BIGARRAY_SINT8: - case BIGARRAY_UINT8: - serialize_block_1(b->data, num_elts); break; - case BIGARRAY_SINT16: - case BIGARRAY_UINT16: - serialize_block_2(b->data, num_elts); break; - case BIGARRAY_FLOAT32: - case BIGARRAY_INT32: - serialize_block_4(b->data, num_elts); break; - case BIGARRAY_COMPLEX32: - serialize_block_4(b->data, num_elts * 2); break; - case BIGARRAY_FLOAT64: - case BIGARRAY_INT64: - serialize_block_8(b->data, num_elts); break; - case BIGARRAY_COMPLEX64: - serialize_block_8(b->data, num_elts * 2); break; - case BIGARRAY_CAML_INT: + switch (b->flags & CAML_BA_KIND_MASK) { + case CAML_BA_SINT8: + case CAML_BA_UINT8: + caml_serialize_block_1(b->data, num_elts); break; + case CAML_BA_SINT16: + case CAML_BA_UINT16: + caml_serialize_block_2(b->data, num_elts); break; + case CAML_BA_FLOAT32: + case CAML_BA_INT32: + caml_serialize_block_4(b->data, num_elts); break; + case CAML_BA_COMPLEX32: + caml_serialize_block_4(b->data, num_elts * 2); break; + case CAML_BA_FLOAT64: + case CAML_BA_INT64: + caml_serialize_block_8(b->data, num_elts); break; + case CAML_BA_COMPLEX64: + caml_serialize_block_8(b->data, num_elts * 2); break; + case CAML_BA_CAML_INT: caml_ba_serialize_longarray(b->data, num_elts, -0x40000000, 0x3FFFFFFF); break; - case BIGARRAY_NATIVE_INT: + case CAML_BA_NATIVE_INT: caml_ba_serialize_longarray(b->data, num_elts, -0x80000000, 0x7FFFFFFF); break; } /* Compute required size in OCaml heap. Assumes struct caml_ba_array is exactly 4 + num_dims words */ - Assert(sizeof(struct caml_bigarray) == 5 * sizeof(value)); + Assert(sizeof(struct caml_ba_array) == 5 * sizeof(value)); *wsize_32 = (4 + b->num_dims) * 4; *wsize_64 = (4 + b->num_dims) * 8; } static void caml_ba_deserialize_longarray(void * dest, intnat num_elts) { - int sixty = deserialize_uint_1(); + int sixty = caml_deserialize_uint_1(); #ifdef ARCH_SIXTYFOUR if (sixty) { - deserialize_block_8(dest, num_elts); + caml_deserialize_block_8(dest, num_elts); } else { intnat * p, n; -<<<<<<< .courant - for (n = 0, p = dest; n < num_elts; n++, p++) *p = deserialize_sint_4(); -======= for (n = 0, p = dest; n < num_elts; n++, p++) *p = caml_deserialize_sint_4(); ->>>>>>> .fusion-droit.r10497 } #else if (sixty) - deserialize_error("input_value: cannot read bigarray " + caml_deserialize_error("input_value: cannot read bigarray " "with 64-bit OCaml ints"); - deserialize_block_4(dest, num_elts); + caml_deserialize_block_4(dest, num_elts); #endif } uintnat caml_ba_deserialize(void * dst) { - struct caml_bigarray * b = dst; + struct caml_ba_array * b = dst; int i, elt_size; uintnat num_elts; /* Read back header information */ - b->num_dims = deserialize_uint_4(); - b->flags = deserialize_uint_4() | BIGARRAY_MANAGED; + b->num_dims = caml_deserialize_uint_4(); + b->flags = caml_deserialize_uint_4() | CAML_BA_MANAGED; b->proxy = NULL; - for (i = 0; i < b->num_dims; i++) b->dim[i] = deserialize_uint_4(); + for (i = 0; i < b->num_dims; i++) b->dim[i] = caml_deserialize_uint_4(); /* Compute total number of elements */ num_elts = caml_ba_num_elts(b); /* Determine element size in bytes */ - if ((b->flags & BIGARRAY_KIND_MASK) > BIGARRAY_COMPLEX64) - deserialize_error("input_value: bad bigarray kind"); - elt_size = caml_ba_element_size[b->flags & BIGARRAY_KIND_MASK]; + if ((b->flags & CAML_BA_KIND_MASK) > CAML_BA_COMPLEX64) + caml_deserialize_error("input_value: bad bigarray kind"); + elt_size = caml_ba_element_size[b->flags & CAML_BA_KIND_MASK]; /* Allocate room for data */ b->data = malloc(elt_size * num_elts); if (b->data == NULL) - deserialize_error("input_value: out of memory for bigarray"); + caml_deserialize_error("input_value: out of memory for bigarray"); /* Read data */ - switch (b->flags & BIGARRAY_KIND_MASK) { - case BIGARRAY_SINT8: - case BIGARRAY_UINT8: - deserialize_block_1(b->data, num_elts); break; - case BIGARRAY_SINT16: - case BIGARRAY_UINT16: - deserialize_block_2(b->data, num_elts); break; - case BIGARRAY_FLOAT32: - case BIGARRAY_INT32: - deserialize_block_4(b->data, num_elts); break; - case BIGARRAY_COMPLEX32: - deserialize_block_4(b->data, num_elts * 2); break; - case BIGARRAY_FLOAT64: - case BIGARRAY_INT64: - deserialize_block_8(b->data, num_elts); break; - case BIGARRAY_COMPLEX64: - deserialize_block_8(b->data, num_elts * 2); break; - case BIGARRAY_CAML_INT: - case BIGARRAY_NATIVE_INT: + switch (b->flags & CAML_BA_KIND_MASK) { + case CAML_BA_SINT8: + case CAML_BA_UINT8: + caml_deserialize_block_1(b->data, num_elts); break; + case CAML_BA_SINT16: + case CAML_BA_UINT16: + caml_deserialize_block_2(b->data, num_elts); break; + case CAML_BA_FLOAT32: + case CAML_BA_INT32: + caml_deserialize_block_4(b->data, num_elts); break; + case CAML_BA_COMPLEX32: + caml_deserialize_block_4(b->data, num_elts * 2); break; + case CAML_BA_FLOAT64: + case CAML_BA_INT64: + caml_deserialize_block_8(b->data, num_elts); break; + case CAML_BA_COMPLEX64: + caml_deserialize_block_8(b->data, num_elts * 2); break; + case CAML_BA_CAML_INT: + case CAML_BA_NATIVE_INT: caml_ba_deserialize_longarray(b->data, num_elts); break; } - return sizeof(struct caml_bigarray) + (b->num_dims - 1) * sizeof(intnat); + return sizeof(struct caml_ba_array) + (b->num_dims - 1) * sizeof(intnat); } /* Create / update proxy to indicate that b2 is a sub-array of b1 */ -static void caml_ba_update_proxy(struct caml_bigarray * b1, - struct caml_bigarray * b2) +static void caml_ba_update_proxy(struct caml_ba_array * b1, + struct caml_ba_array * b2) { - struct caml_bigarray_proxy * proxy; + struct caml_ba_proxy * proxy; /* Nothing to do for un-managed arrays */ - if ((b1->flags & BIGARRAY_MANAGED_MASK) == BIGARRAY_EXTERNAL) return; + if ((b1->flags & CAML_BA_MANAGED_MASK) == CAML_BA_EXTERNAL) return; if (b1->proxy != NULL) { /* If b1 is already a proxy for a larger array, increment refcount of proxy */ @@ -869,11 +864,11 @@ static void caml_ba_update_proxy(struct caml_bigarray * b1, ++ b1->proxy->refcount; } else { /* Otherwise, create proxy and attach it to both b1 and b2 */ - proxy = stat_alloc(sizeof(struct caml_bigarray_proxy)); + proxy = caml_stat_alloc(sizeof(struct caml_ba_proxy)); proxy->refcount = 2; /* original array + sub array */ proxy->data = b1->data; proxy->size = - b1->flags & BIGARRAY_MAPPED_FILE ? caml_ba_byte_size(b1) : 0; + b1->flags & CAML_BA_MAPPED_FILE ? caml_ba_byte_size(b1) : 0; b1->proxy = proxy; b2->proxy = proxy; } @@ -884,9 +879,9 @@ static void caml_ba_update_proxy(struct caml_bigarray * b1, CAMLprim value caml_ba_slice(value vb, value vind) { CAMLparam2 (vb, vind); - #define b ((struct caml_bigarray *) Bigarray_val(vb)) + #define b ((struct caml_ba_array *) Caml_ba_array_val(vb)) CAMLlocal1 (res); - intnat index[MAX_NUM_DIMS]; + intnat index[CAML_BA_MAX_NUM_DIMS]; int num_inds, i; intnat offset; intnat * sub_dims; @@ -895,9 +890,9 @@ CAMLprim value caml_ba_slice(value vb, value vind) /* Check number of indices < number of dimensions of array */ num_inds = Wosize_val(vind); if (num_inds >= b->num_dims) - invalid_argument("Bigarray.slice: too many indices"); + caml_invalid_argument("Bigarray.slice: too many indices"); /* Compute offset and check bounds */ - if ((b->flags & BIGARRAY_LAYOUT_MASK) == BIGARRAY_C_LAYOUT) { + if ((b->flags & CAML_BA_LAYOUT_MASK) == CAML_BA_C_LAYOUT) { /* We slice from the left */ for (i = 0; i < num_inds; i++) index[i] = Long_val(Field(vind, i)); for (/*nothing*/; i < b->num_dims; i++) index[i] = 0; @@ -913,11 +908,11 @@ CAMLprim value caml_ba_slice(value vb, value vind) } sub_data = (char *) b->data + - offset * caml_ba_element_size[b->flags & BIGARRAY_KIND_MASK]; + offset * caml_ba_element_size[b->flags & CAML_BA_KIND_MASK]; /* Allocate an OCaml bigarray to hold the result */ - res = alloc_bigarray(b->flags, b->num_dims - num_inds, sub_data, sub_dims); + res = caml_ba_alloc(b->flags, b->num_dims - num_inds, sub_data, sub_dims); /* Create or update proxy in case of managed bigarray */ - caml_ba_update_proxy(b, Bigarray_val(res)); + caml_ba_update_proxy(b, Caml_ba_array_val(res)); /* Return result */ CAMLreturn (res); @@ -930,7 +925,7 @@ CAMLprim value caml_ba_sub(value vb, value vofs, value vlen) { CAMLparam3 (vb, vofs, vlen); CAMLlocal1 (res); - #define b ((struct caml_bigarray *) Bigarray_val(vb)) + #define b ((struct caml_ba_array *) Caml_ba_array_val(vb)) intnat ofs = Long_val(vofs); intnat len = Long_val(vlen); int i, changed_dim; @@ -938,7 +933,7 @@ CAMLprim value caml_ba_sub(value vb, value vofs, value vlen) char * sub_data; /* Compute offset and check bounds */ - if ((b->flags & BIGARRAY_LAYOUT_MASK) == BIGARRAY_C_LAYOUT) { + if ((b->flags & CAML_BA_LAYOUT_MASK) == CAML_BA_C_LAYOUT) { /* We reduce the first dimension */ mul = 1; for (i = 1; i < b->num_dims; i++) mul *= b->dim[i]; @@ -951,16 +946,16 @@ CAMLprim value caml_ba_sub(value vb, value vofs, value vlen) ofs--; /* Fortran arrays start at 1 */ } if (ofs < 0 || len < 0 || ofs + len > b->dim[changed_dim]) - invalid_argument("Bigarray.sub: bad sub-array"); + caml_invalid_argument("Bigarray.sub: bad sub-array"); sub_data = (char *) b->data + - ofs * mul * caml_ba_element_size[b->flags & BIGARRAY_KIND_MASK]; + ofs * mul * caml_ba_element_size[b->flags & CAML_BA_KIND_MASK]; /* Allocate an OCaml bigarray to hold the result */ - res = alloc_bigarray(b->flags, b->num_dims, sub_data, b->dim); + res = caml_ba_alloc(b->flags, b->num_dims, sub_data, b->dim); /* Doctor the changed dimension */ - Bigarray_val(res)->dim[changed_dim] = len; + Caml_ba_array_val(res)->dim[changed_dim] = len; /* Create or update proxy in case of managed bigarray */ - caml_ba_update_proxy(b, Bigarray_val(res)); + caml_ba_update_proxy(b, Caml_ba_array_val(res)); /* Return result */ CAMLreturn (res); @@ -971,8 +966,8 @@ CAMLprim value caml_ba_sub(value vb, value vofs, value vlen) CAMLprim value caml_ba_blit(value vsrc, value vdst) { - struct caml_bigarray * src = Bigarray_val(vsrc); - struct caml_bigarray * dst = Bigarray_val(vdst); + struct caml_ba_array * src = Caml_ba_array_val(vsrc); + struct caml_ba_array * dst = Caml_ba_array_val(vdst); int i; intnat num_bytes; @@ -983,12 +978,12 @@ CAMLprim value caml_ba_blit(value vsrc, value vdst) /* Compute number of bytes in array data */ num_bytes = caml_ba_num_elts(src) - * caml_ba_element_size[src->flags & BIGARRAY_KIND_MASK]; + * caml_ba_element_size[src->flags & CAML_BA_KIND_MASK]; /* Do the copying */ memmove (dst->data, src->data, num_bytes); return Val_unit; blit_error: - invalid_argument("Bigarray.blit: dimension mismatch"); + caml_invalid_argument("Bigarray.blit: dimension mismatch"); return Val_unit; /* not reached */ } @@ -996,70 +991,70 @@ CAMLprim value caml_ba_blit(value vsrc, value vdst) CAMLprim value caml_ba_fill(value vb, value vinit) { - struct caml_bigarray * b = Bigarray_val(vb); + struct caml_ba_array * b = Caml_ba_array_val(vb); intnat num_elts = caml_ba_num_elts(b); - switch (b->flags & BIGARRAY_KIND_MASK) { + switch (b->flags & CAML_BA_KIND_MASK) { default: Assert(0); - case BIGARRAY_FLOAT32: { + case CAML_BA_FLOAT32: { float init = Double_val(vinit); float * p; for (p = b->data; num_elts > 0; p++, num_elts--) *p = init; break; } - case BIGARRAY_FLOAT64: { + case CAML_BA_FLOAT64: { double init = Double_val(vinit); double * p; for (p = b->data; num_elts > 0; p++, num_elts--) *p = init; break; } - case BIGARRAY_SINT8: - case BIGARRAY_UINT8: { + case CAML_BA_SINT8: + case CAML_BA_UINT8: { int init = Int_val(vinit); char * p; for (p = b->data; num_elts > 0; p++, num_elts--) *p = init; break; } - case BIGARRAY_SINT16: - case BIGARRAY_UINT16: { + case CAML_BA_SINT16: + case CAML_BA_UINT16: { int init = Int_val(vinit); int16 * p; for (p = b->data; num_elts > 0; p++, num_elts--) *p = init; break; } - case BIGARRAY_INT32: { + case CAML_BA_INT32: { int32 init = Int32_val(vinit); int32 * p; for (p = b->data; num_elts > 0; p++, num_elts--) *p = init; break; } - case BIGARRAY_INT64: { + case CAML_BA_INT64: { int64 init = Int64_val(vinit); int64 * p; for (p = b->data; num_elts > 0; p++, num_elts--) *p = init; break; } - case BIGARRAY_NATIVE_INT: { + case CAML_BA_NATIVE_INT: { intnat init = Nativeint_val(vinit); intnat * p; for (p = b->data; num_elts > 0; p++, num_elts--) *p = init; break; } - case BIGARRAY_CAML_INT: { + case CAML_BA_CAML_INT: { intnat init = Long_val(vinit); intnat * p; for (p = b->data; num_elts > 0; p++, num_elts--) *p = init; break; } - case BIGARRAY_COMPLEX32: { + case CAML_BA_COMPLEX32: { float init0 = Double_field(vinit, 0); float init1 = Double_field(vinit, 1); float * p; for (p = b->data; num_elts > 0; num_elts--) { *p++ = init0; *p++ = init1; } break; } - case BIGARRAY_COMPLEX64: { + case CAML_BA_COMPLEX64: { double init0 = Double_field(vinit, 0); double init1 = Double_field(vinit, 1); double * p; @@ -1077,39 +1072,39 @@ CAMLprim value caml_ba_reshape(value vb, value vdim) { CAMLparam2 (vb, vdim); CAMLlocal1 (res); - #define b ((struct caml_bigarray *) Bigarray_val(vb)) - intnat dim[MAX_NUM_DIMS]; +#define b ((struct caml_ba_array *) Caml_ba_array_val(vb)) + intnat dim[CAML_BA_MAX_NUM_DIMS]; mlsize_t num_dims; uintnat num_elts; int i; num_dims = Wosize_val(vdim); - if (num_dims < 1 || num_dims > MAX_NUM_DIMS) - invalid_argument("Bigarray.reshape: bad number of dimensions"); + if (num_dims < 1 || num_dims > CAML_BA_MAX_NUM_DIMS) + caml_invalid_argument("Bigarray.reshape: bad number of dimensions"); num_elts = 1; for (i = 0; i < num_dims; i++) { dim[i] = Long_val(Field(vdim, i)); if (dim[i] < 0) - invalid_argument("Bigarray.reshape: negative dimension"); + caml_invalid_argument("Bigarray.reshape: negative dimension"); num_elts *= dim[i]; } /* Check that sizes agree */ if (num_elts != caml_ba_num_elts(b)) - invalid_argument("Bigarray.reshape: size mismatch"); + caml_invalid_argument("Bigarray.reshape: size mismatch"); /* Create bigarray with same data and new dimensions */ - res = alloc_bigarray(b->flags, num_dims, b->data, dim); + res = caml_ba_alloc(b->flags, num_dims, b->data, dim); /* Create or update proxy in case of managed bigarray */ - caml_ba_update_proxy(b, Bigarray_val(res)); + caml_ba_update_proxy(b, Caml_ba_array_val(res)); /* Return result */ CAMLreturn (res); - #undef b +#undef b } /* Initialization */ CAMLprim value caml_ba_init(value unit) { - register_custom_operations(&caml_ba_ops); + caml_register_custom_operations(&caml_ba_ops); return Val_unit; } diff --git a/otherlibs/bigarray/mmap_win32.c b/otherlibs/bigarray/mmap_win32.c index 0ec740f651..ded2270ee6 100644 --- a/otherlibs/bigarray/mmap_win32.c +++ b/otherlibs/bigarray/mmap_win32.c @@ -49,7 +49,7 @@ CAMLprim value caml_ba_map_file(value vfd, value vkind, value vlayout, HANDLE fd, fmap; int flags, major_dim, mode, perm; intnat num_dims, i; - intnat dim[MAX_NUM_DIMS]; + intnat dim[CAML_BA_MAX_NUM_DIMS]; __int64 currpos, startpos, file_size, data_size; uintnat array_size, page, delta; char c; @@ -61,16 +61,16 @@ CAMLprim value caml_ba_map_file(value vfd, value vkind, value vlayout, flags = Int_val(vkind) | Int_val(vlayout); startpos = Int64_val(vstart); num_dims = Wosize_val(vdim); - major_dim = flags & BIGARRAY_FORTRAN_LAYOUT ? num_dims - 1 : 0; + major_dim = flags & CAML_BA_FORTRAN_LAYOUT ? num_dims - 1 : 0; /* Extract dimensions from OCaml array */ num_dims = Wosize_val(vdim); - if (num_dims < 1 || num_dims > MAX_NUM_DIMS) - invalid_argument("Bigarray.mmap: bad number of dimensions"); + if (num_dims < 1 || num_dims > CAML_BA_MAX_NUM_DIMS) + caml_invalid_argument("Bigarray.mmap: bad number of dimensions"); for (i = 0; i < num_dims; i++) { dim[i] = Long_val(Field(vdim, i)); if (dim[i] == -1 && i == major_dim) continue; - if (dim[i] < 0 || dim[i] > 0x7FFFFFFFL) - invalid_argument("Bigarray.create: negative dimension"); + if (dim[i] < 0) + caml_invalid_argument("Bigarray.create: negative dimension"); } /* Determine file size */ currpos = caml_ba_set_file_pointer(fd, 0, FILE_CURRENT); @@ -79,19 +79,19 @@ CAMLprim value caml_ba_map_file(value vfd, value vkind, value vlayout, if (file_size == -1) caml_ba_sys_error(); /* Determine array size in bytes (or size of array without the major dimension if that dimension wasn't specified) */ - array_size = bigarray_element_size[flags & BIGARRAY_KIND_MASK]; + array_size = caml_ba_element_size[flags & CAML_BA_KIND_MASK]; for (i = 0; i < num_dims; i++) if (dim[i] != -1) array_size *= dim[i]; /* Check if the first/last dimension is unknown */ if (dim[major_dim] == -1) { /* Determine first/last dimension from file size */ if (file_size < startpos) - failwith("Bigarray.mmap: file position exceeds file size"); + caml_failwith("Bigarray.mmap: file position exceeds file size"); data_size = file_size - startpos; dim[major_dim] = (uintnat) (data_size / array_size); array_size = dim[major_dim] * array_size; if (array_size != data_size) - failwith("Bigarray.mmap: file size doesn't match array dimensions"); + caml_failwith("Bigarray.mmap: file size doesn't match array dimensions"); } /* Restore original file position */ caml_ba_set_file_pointer(fd, currpos, FILE_BEGIN); @@ -118,7 +118,7 @@ CAMLprim value caml_ba_map_file(value vfd, value vkind, value vlayout, /* Close the file mapping */ CloseHandle(fmap); /* Build and return the OCaml bigarray */ - return alloc_bigarray(flags | BIGARRAY_MAPPED_FILE, num_dims, addr, dim); + return caml_ba_alloc(flags | CAML_BA_MAPPED_FILE, num_dims, addr, dim); } CAMLprim value caml_ba_map_file_bytecode(value * argv, int argn) @@ -151,5 +151,5 @@ static void caml_ba_sys_error(void) sizeof(buffer), NULL)) sprintf(buffer, "Unknown error %ld\n", errnum); - raise_sys_error(copy_string(buffer)); + caml_raise_sys_error(caml_copy_string(buffer)); } diff --git a/otherlibs/graph/Makefile b/otherlibs/graph/Makefile index 19c4612ed7..eb989795c3 100644 --- a/otherlibs/graph/Makefile +++ b/otherlibs/graph/Makefile @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile 12858 2012-08-10 14:45:51Z maranget $ # Makefile for the portable graphics library diff --git a/otherlibs/graph/color.c b/otherlibs/graph/color.c index bdd8b5e283..80d15a559a 100644 --- a/otherlibs/graph/color.c +++ b/otherlibs/graph/color.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: color.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "libgraph.h" #include <X11/Xatom.h> diff --git a/otherlibs/graph/draw.c b/otherlibs/graph/draw.c index 0419c62703..f46e5d20a9 100644 --- a/otherlibs/graph/draw.c +++ b/otherlibs/graph/draw.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: draw.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "libgraph.h" #include <alloc.h> diff --git a/otherlibs/graph/dump_img.c b/otherlibs/graph/dump_img.c index 66185d8750..9aa5b0fbdf 100644 --- a/otherlibs/graph/dump_img.c +++ b/otherlibs/graph/dump_img.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: dump_img.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "libgraph.h" #include "image.h" diff --git a/otherlibs/graph/events.c b/otherlibs/graph/events.c index 508931055c..36547d4f30 100644 --- a/otherlibs/graph/events.c +++ b/otherlibs/graph/events.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: events.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <signal.h> #include "libgraph.h" diff --git a/otherlibs/graph/fill.c b/otherlibs/graph/fill.c index bb1a60e78b..af7f7c8595 100644 --- a/otherlibs/graph/fill.c +++ b/otherlibs/graph/fill.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: fill.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "libgraph.h" #include <memory.h> diff --git a/otherlibs/graph/graphics.ml b/otherlibs/graph/graphics.ml index a9dd511401..f048d01579 100644 --- a/otherlibs/graph/graphics.ml +++ b/otherlibs/graph/graphics.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: graphics.ml 12858 2012-08-10 14:45:51Z maranget $ *) exception Graphic_failure of string diff --git a/otherlibs/graph/graphics.mli b/otherlibs/graph/graphics.mli index 10074cb7af..da7249ff09 100644 --- a/otherlibs/graph/graphics.mli +++ b/otherlibs/graph/graphics.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: graphics.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Machine-independent graphics primitives. *) diff --git a/otherlibs/graph/graphicsX11.mli b/otherlibs/graph/graphicsX11.mli index 0210d9676d..a00533d116 100644 --- a/otherlibs/graph/graphicsX11.mli +++ b/otherlibs/graph/graphicsX11.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: graphicsX11.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Additional graphics primitives for the X Windows system. *) diff --git a/otherlibs/graph/image.c b/otherlibs/graph/image.c index c610d96b6f..1b59df7c4b 100644 --- a/otherlibs/graph/image.c +++ b/otherlibs/graph/image.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: image.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "libgraph.h" #include "image.h" @@ -105,4 +105,4 @@ value caml_gr_draw_image(value im, value vx, value vy) return Val_unit; } -/* eof $Id$ */ +/* eof $Id: image.c 12858 2012-08-10 14:45:51Z maranget $ */ diff --git a/otherlibs/graph/image.h b/otherlibs/graph/image.h index 76d319e0ab..6791b4c221 100644 --- a/otherlibs/graph/image.h +++ b/otherlibs/graph/image.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: image.h 12858 2012-08-10 14:45:51Z maranget $ */ struct grimage { int width, height; /* Dimensions of the image */ diff --git a/otherlibs/graph/libgraph.h b/otherlibs/graph/libgraph.h index efcabf1631..05fc00ac06 100644 --- a/otherlibs/graph/libgraph.h +++ b/otherlibs/graph/libgraph.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: libgraph.h 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> #include <X11/Xlib.h> diff --git a/otherlibs/graph/make_img.c b/otherlibs/graph/make_img.c index 08628804f5..166991e0b7 100644 --- a/otherlibs/graph/make_img.c +++ b/otherlibs/graph/make_img.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: make_img.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "libgraph.h" #include "image.h" diff --git a/otherlibs/graph/open.c b/otherlibs/graph/open.c index 1f7da5ba4f..a1a54d1751 100644 --- a/otherlibs/graph/open.c +++ b/otherlibs/graph/open.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: open.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <string.h> #include <fcntl.h> diff --git a/otherlibs/graph/point_col.c b/otherlibs/graph/point_col.c index 2149aa8eb1..72e239af27 100644 --- a/otherlibs/graph/point_col.c +++ b/otherlibs/graph/point_col.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: point_col.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "libgraph.h" diff --git a/otherlibs/graph/sound.c b/otherlibs/graph/sound.c index cba7a909ba..4d68cc063c 100644 --- a/otherlibs/graph/sound.c +++ b/otherlibs/graph/sound.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: sound.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "libgraph.h" diff --git a/otherlibs/graph/text.c b/otherlibs/graph/text.c index 6743e8640f..10476ec372 100644 --- a/otherlibs/graph/text.c +++ b/otherlibs/graph/text.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: text.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "libgraph.h" #include <alloc.h> diff --git a/otherlibs/num/Makefile b/otherlibs/num/Makefile index 46148ee062..a437bad6cb 100644 --- a/otherlibs/num/Makefile +++ b/otherlibs/num/Makefile @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile 12858 2012-08-10 14:45:51Z maranget $ # Makefile for the "num" (exact rational arithmetic) library diff --git a/otherlibs/num/Makefile.nt b/otherlibs/num/Makefile.nt index 5c5f8de61e..cb092a8a8e 100644 --- a/otherlibs/num/Makefile.nt +++ b/otherlibs/num/Makefile.nt @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile.nt 12858 2012-08-10 14:45:51Z maranget $ # Makefile for the "num" (exact rational arithmetic) library diff --git a/otherlibs/num/arith_flags.ml b/otherlibs/num/arith_flags.ml index 048d4f8dba..2559d3d87c 100644 --- a/otherlibs/num/arith_flags.ml +++ b/otherlibs/num/arith_flags.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: arith_flags.ml 12858 2012-08-10 14:45:51Z maranget $ *) let error_when_null_denominator_flag = ref true;; diff --git a/otherlibs/num/arith_flags.mli b/otherlibs/num/arith_flags.mli index 6539424311..0e2a552592 100644 --- a/otherlibs/num/arith_flags.mli +++ b/otherlibs/num/arith_flags.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: arith_flags.mli 12858 2012-08-10 14:45:51Z maranget $ *) val error_when_null_denominator_flag : bool ref val normalize_ratio_flag : bool ref diff --git a/otherlibs/num/arith_status.ml b/otherlibs/num/arith_status.ml index 0f9deb363b..86be78c72b 100644 --- a/otherlibs/num/arith_status.ml +++ b/otherlibs/num/arith_status.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: arith_status.ml 12858 2012-08-10 14:45:51Z maranget $ *) open Arith_flags;; diff --git a/otherlibs/num/arith_status.mli b/otherlibs/num/arith_status.mli index 170e8cd4c2..60df8b11a2 100644 --- a/otherlibs/num/arith_status.mli +++ b/otherlibs/num/arith_status.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: arith_status.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Flags that control rational arithmetic. *) diff --git a/otherlibs/num/big_int.mli b/otherlibs/num/big_int.mli index 6fb0aead45..e0a2f74ee2 100644 --- a/otherlibs/num/big_int.mli +++ b/otherlibs/num/big_int.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: big_int.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Operations on arbitrary-precision integers. diff --git a/otherlibs/num/bng.c b/otherlibs/num/bng.c index 5bbedb0b46..bbdd9a0282 100644 --- a/otherlibs/num/bng.c +++ b/otherlibs/num/bng.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: bng.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "bng.h" #include "config.h" diff --git a/otherlibs/num/bng.h b/otherlibs/num/bng.h index 19f2e2b9cf..858bd12e9f 100644 --- a/otherlibs/num/bng.h +++ b/otherlibs/num/bng.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: bng.h 12858 2012-08-10 14:45:51Z maranget $ */ #include <string.h> #include "config.h" diff --git a/otherlibs/num/bng_amd64.c b/otherlibs/num/bng_amd64.c index ecf9f2535d..937a43a5e4 100644 --- a/otherlibs/num/bng_amd64.c +++ b/otherlibs/num/bng_amd64.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: bng_amd64.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Code specific to the AMD x86_64 architecture. */ diff --git a/otherlibs/num/bng_digit.c b/otherlibs/num/bng_digit.c index e429197c22..e10613128a 100644 --- a/otherlibs/num/bng_digit.c +++ b/otherlibs/num/bng_digit.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: bng_digit.c 12858 2012-08-10 14:45:51Z maranget $ */ /**** Generic operations on digits ****/ diff --git a/otherlibs/num/bng_ia32.c b/otherlibs/num/bng_ia32.c index b4981cd488..76b0a5f87a 100644 --- a/otherlibs/num/bng_ia32.c +++ b/otherlibs/num/bng_ia32.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: bng_ia32.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Code specific to the Intel IA32 (x86) architecture. */ diff --git a/otherlibs/num/bng_ppc.c b/otherlibs/num/bng_ppc.c index 6bbf108e9c..51eac19475 100644 --- a/otherlibs/num/bng_ppc.c +++ b/otherlibs/num/bng_ppc.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: bng_ppc.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Code specific to the PowerPC architecture. */ diff --git a/otherlibs/num/bng_sparc.c b/otherlibs/num/bng_sparc.c index 4e46a316ae..09ee0b4988 100644 --- a/otherlibs/num/bng_sparc.c +++ b/otherlibs/num/bng_sparc.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: bng_sparc.c 12858 2012-08-10 14:45:51Z maranget $ */ /* Code specific to the SPARC (V8 and above) architecture. */ diff --git a/otherlibs/num/int_misc.ml b/otherlibs/num/int_misc.ml index 99713b916e..280d3ee73a 100644 --- a/otherlibs/num/int_misc.ml +++ b/otherlibs/num/int_misc.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: int_misc.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Some extra operations on integers *) diff --git a/otherlibs/num/int_misc.mli b/otherlibs/num/int_misc.mli index 7f465c5ad7..128057fcdb 100644 --- a/otherlibs/num/int_misc.mli +++ b/otherlibs/num/int_misc.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: int_misc.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Some extra operations on integers *) diff --git a/otherlibs/num/nat.h b/otherlibs/num/nat.h index 62c7ac9885..6a1749ed8f 100644 --- a/otherlibs/num/nat.h +++ b/otherlibs/num/nat.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: nat.h 12858 2012-08-10 14:45:51Z maranget $ */ /* Nats are represented as unstructured blocks with tag Custom_tag. */ diff --git a/otherlibs/num/nat.mli b/otherlibs/num/nat.mli index fe3396ff4e..e602933e99 100644 --- a/otherlibs/num/nat.mli +++ b/otherlibs/num/nat.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: nat.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [Nat]: operations on natural numbers *) diff --git a/otherlibs/num/nat_stubs.c b/otherlibs/num/nat_stubs.c index f4b6c937aa..7c5a1ad183 100644 --- a/otherlibs/num/nat_stubs.c +++ b/otherlibs/num/nat_stubs.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: nat_stubs.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "alloc.h" #include "config.h" diff --git a/otherlibs/num/num.ml b/otherlibs/num/num.ml index 9e90a81ffa..05274c0279 100644 --- a/otherlibs/num/num.ml +++ b/otherlibs/num/num.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: num.ml 12858 2012-08-10 14:45:51Z maranget $ *) open Int_misc open Nat diff --git a/otherlibs/num/num.mli b/otherlibs/num/num.mli index 1773338470..56f9b09ecd 100644 --- a/otherlibs/num/num.mli +++ b/otherlibs/num/num.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: num.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Operation on arbitrary-precision numbers. diff --git a/otherlibs/num/ratio.mli b/otherlibs/num/ratio.mli index 408aea9b48..e3dba00e05 100644 --- a/otherlibs/num/ratio.mli +++ b/otherlibs/num/ratio.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: ratio.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Operation on rational numbers. diff --git a/otherlibs/systhreads/condition.ml b/otherlibs/systhreads/condition.ml index 6bdac6a369..c0864ad48f 100644 --- a/otherlibs/systhreads/condition.ml +++ b/otherlibs/systhreads/condition.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: condition.ml 12858 2012-08-10 14:45:51Z maranget $ *) type t external create: unit -> t = "caml_condition_new" diff --git a/otherlibs/systhreads/condition.mli b/otherlibs/systhreads/condition.mli index d13b30d866..f8e9215c19 100644 --- a/otherlibs/systhreads/condition.mli +++ b/otherlibs/systhreads/condition.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: condition.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Condition variables to synchronize between threads. diff --git a/otherlibs/systhreads/event.ml b/otherlibs/systhreads/event.ml index ff137e981d..a2add1d40f 100644 --- a/otherlibs/systhreads/event.ml +++ b/otherlibs/systhreads/event.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: event.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Events *) type 'a basic_event = diff --git a/otherlibs/systhreads/event.mli b/otherlibs/systhreads/event.mli index 11842e5ad0..ca74828d8e 100644 --- a/otherlibs/systhreads/event.mli +++ b/otherlibs/systhreads/event.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: event.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** First-class synchronous communication. diff --git a/otherlibs/systhreads/mutex.ml b/otherlibs/systhreads/mutex.ml index 5e9cc886c5..75d442a289 100644 --- a/otherlibs/systhreads/mutex.ml +++ b/otherlibs/systhreads/mutex.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: mutex.ml 12858 2012-08-10 14:45:51Z maranget $ *) type t external create: unit -> t = "caml_mutex_new" diff --git a/otherlibs/systhreads/mutex.mli b/otherlibs/systhreads/mutex.mli index 844d4e5d4c..ff20a93bd5 100644 --- a/otherlibs/systhreads/mutex.mli +++ b/otherlibs/systhreads/mutex.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: mutex.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Locks for mutual exclusion. diff --git a/otherlibs/systhreads/st_stubs.c b/otherlibs/systhreads/st_stubs.c index 9b2493a16e..a94c97fd9d 100644 --- a/otherlibs/systhreads/st_stubs.c +++ b/otherlibs/systhreads/st_stubs.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: st_stubs.c 12959 2012-09-27 13:12:51Z maranget $ */ #include "alloc.h" #include "backtrace.h" diff --git a/otherlibs/systhreads/thread.mli b/otherlibs/systhreads/thread.mli index 42d18e6355..6e47e1db71 100644 --- a/otherlibs/systhreads/thread.mli +++ b/otherlibs/systhreads/thread.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: thread.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Lightweight threads for Posix [1003.1c] and Win32. *) diff --git a/otherlibs/systhreads/threadUnix.ml b/otherlibs/systhreads/threadUnix.ml index d4b6fd59f5..53867eabef 100644 --- a/otherlibs/systhreads/threadUnix.ml +++ b/otherlibs/systhreads/threadUnix.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: threadUnix.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [ThreadUnix]: thread-compatible system calls *) diff --git a/otherlibs/systhreads/threadUnix.mli b/otherlibs/systhreads/threadUnix.mli index 9c7e76e56b..56478f9a38 100644 --- a/otherlibs/systhreads/threadUnix.mli +++ b/otherlibs/systhreads/threadUnix.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: threadUnix.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Thread-compatible system calls. diff --git a/otherlibs/threads/condition.ml b/otherlibs/threads/condition.ml index ee687a85b9..065a10e7f7 100644 --- a/otherlibs/threads/condition.ml +++ b/otherlibs/threads/condition.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: condition.ml 12858 2012-08-10 14:45:51Z maranget $ *) type t = { mutable waiting: Thread.t list } diff --git a/otherlibs/threads/condition.mli b/otherlibs/threads/condition.mli index d13b30d866..f8e9215c19 100644 --- a/otherlibs/threads/condition.mli +++ b/otherlibs/threads/condition.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: condition.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Condition variables to synchronize between threads. diff --git a/otherlibs/threads/event.ml b/otherlibs/threads/event.ml index ff137e981d..a2add1d40f 100644 --- a/otherlibs/threads/event.ml +++ b/otherlibs/threads/event.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: event.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Events *) type 'a basic_event = diff --git a/otherlibs/threads/event.mli b/otherlibs/threads/event.mli index eb37f01249..1153c2d694 100644 --- a/otherlibs/threads/event.mli +++ b/otherlibs/threads/event.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: event.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** First-class synchronous communication. diff --git a/otherlibs/threads/marshal.ml b/otherlibs/threads/marshal.ml index 6f2bcfed78..1c1a1a4db3 100644 --- a/otherlibs/threads/marshal.ml +++ b/otherlibs/threads/marshal.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: marshal.ml 12858 2012-08-10 14:45:51Z maranget $ *) type extern_flags = No_sharing diff --git a/otherlibs/threads/mutex.ml b/otherlibs/threads/mutex.ml index 12e3f534dd..a36e31eaf5 100644 --- a/otherlibs/threads/mutex.ml +++ b/otherlibs/threads/mutex.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: mutex.ml 12858 2012-08-10 14:45:51Z maranget $ *) type t = { mutable locked: bool; mutable waiting: Thread.t list } diff --git a/otherlibs/threads/mutex.mli b/otherlibs/threads/mutex.mli index 844d4e5d4c..ff20a93bd5 100644 --- a/otherlibs/threads/mutex.mli +++ b/otherlibs/threads/mutex.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: mutex.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Locks for mutual exclusion. diff --git a/otherlibs/threads/pervasives.ml b/otherlibs/threads/pervasives.ml index f83a1cf0dc..19893cb99a 100644 --- a/otherlibs/threads/pervasives.ml +++ b/otherlibs/threads/pervasives.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: pervasives.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Same as ../../stdlib/pervasives.ml, except that I/O functions have been redefined to not block the whole process, but only the calling diff --git a/otherlibs/threads/scheduler.c b/otherlibs/threads/scheduler.c index 3f51979032..5754ce5470 100644 --- a/otherlibs/threads/scheduler.c +++ b/otherlibs/threads/scheduler.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: scheduler.c 12858 2012-08-10 14:45:51Z maranget $ */ /* The thread scheduler */ diff --git a/otherlibs/threads/thread.mli b/otherlibs/threads/thread.mli index e97e55ab15..1d666ed684 100644 --- a/otherlibs/threads/thread.mli +++ b/otherlibs/threads/thread.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: thread.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Lightweight threads. *) diff --git a/otherlibs/threads/threadUnix.ml b/otherlibs/threads/threadUnix.ml index bd4181b996..b59bb10db8 100644 --- a/otherlibs/threads/threadUnix.ml +++ b/otherlibs/threads/threadUnix.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: threadUnix.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [ThreadUnix]: thread-compatible system calls *) diff --git a/otherlibs/threads/threadUnix.mli b/otherlibs/threads/threadUnix.mli index 22ed9330e8..b3de086efd 100644 --- a/otherlibs/threads/threadUnix.mli +++ b/otherlibs/threads/threadUnix.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: threadUnix.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Thread-compatible system calls. diff --git a/otherlibs/unix/Makefile b/otherlibs/unix/Makefile index e55f62d9d2..23163dba82 100644 --- a/otherlibs/unix/Makefile +++ b/otherlibs/unix/Makefile @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile 12858 2012-08-10 14:45:51Z maranget $ # Makefile for the Unix interface library diff --git a/otherlibs/unix/accept.c b/otherlibs/unix/accept.c index 7b2688f03e..e52971d202 100644 --- a/otherlibs/unix/accept.c +++ b/otherlibs/unix/accept.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: accept.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/access.c b/otherlibs/unix/access.c index 813c0634a6..611093f887 100644 --- a/otherlibs/unix/access.c +++ b/otherlibs/unix/access.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: access.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/alarm.c b/otherlibs/unix/alarm.c index 6275e25564..e9dc5fa391 100644 --- a/otherlibs/unix/alarm.c +++ b/otherlibs/unix/alarm.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: alarm.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/bind.c b/otherlibs/unix/bind.c index a6999a9f45..45850b11cf 100644 --- a/otherlibs/unix/bind.c +++ b/otherlibs/unix/bind.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: bind.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/chdir.c b/otherlibs/unix/chdir.c index 2788c5054c..2ff1236283 100644 --- a/otherlibs/unix/chdir.c +++ b/otherlibs/unix/chdir.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: chdir.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/chmod.c b/otherlibs/unix/chmod.c index f01d7e85b5..04aae3de8d 100644 --- a/otherlibs/unix/chmod.c +++ b/otherlibs/unix/chmod.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: chmod.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <sys/types.h> #include <sys/stat.h> diff --git a/otherlibs/unix/chown.c b/otherlibs/unix/chown.c index 72002e9364..e263ae3558 100644 --- a/otherlibs/unix/chown.c +++ b/otherlibs/unix/chown.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: chown.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/chroot.c b/otherlibs/unix/chroot.c index 879d0662f1..2b69d5b7ef 100644 --- a/otherlibs/unix/chroot.c +++ b/otherlibs/unix/chroot.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: chroot.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/close.c b/otherlibs/unix/close.c index 0aaf74bd92..5f8ce37cff 100644 --- a/otherlibs/unix/close.c +++ b/otherlibs/unix/close.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: close.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/closedir.c b/otherlibs/unix/closedir.c index a6440efa4b..3f555b8e32 100644 --- a/otherlibs/unix/closedir.c +++ b/otherlibs/unix/closedir.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: closedir.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/connect.c b/otherlibs/unix/connect.c index a17a89ffc9..5d1db7ff84 100644 --- a/otherlibs/unix/connect.c +++ b/otherlibs/unix/connect.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: connect.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/cst2constr.c b/otherlibs/unix/cst2constr.c index 8ce4d3f0d4..fa5be59380 100644 --- a/otherlibs/unix/cst2constr.c +++ b/otherlibs/unix/cst2constr.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: cst2constr.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <fail.h> diff --git a/otherlibs/unix/cst2constr.h b/otherlibs/unix/cst2constr.h index e1c61a0c5f..37d6912809 100644 --- a/otherlibs/unix/cst2constr.h +++ b/otherlibs/unix/cst2constr.h @@ -11,6 +11,6 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: cst2constr.h 12858 2012-08-10 14:45:51Z maranget $ */ 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 5c83b59e44..98a6dcfe26 100644 --- a/otherlibs/unix/cstringv.c +++ b/otherlibs/unix/cstringv.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: cstringv.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <memory.h> diff --git a/otherlibs/unix/dup.c b/otherlibs/unix/dup.c index f78d9369dc..36cc29b366 100644 --- a/otherlibs/unix/dup.c +++ b/otherlibs/unix/dup.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: dup.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/dup2.c b/otherlibs/unix/dup2.c index 412315891f..3ada124283 100644 --- a/otherlibs/unix/dup2.c +++ b/otherlibs/unix/dup2.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: dup2.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/envir.c b/otherlibs/unix/envir.c index 52e43ab7a1..cf04af0034 100644 --- a/otherlibs/unix/envir.c +++ b/otherlibs/unix/envir.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: envir.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/errmsg.c b/otherlibs/unix/errmsg.c index 6cf82d6330..63cf4bbcae 100644 --- a/otherlibs/unix/errmsg.c +++ b/otherlibs/unix/errmsg.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: errmsg.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <errno.h> #include <string.h> diff --git a/otherlibs/unix/execv.c b/otherlibs/unix/execv.c index 51eabc7127..b9129908a1 100644 --- a/otherlibs/unix/execv.c +++ b/otherlibs/unix/execv.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: execv.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <memory.h> diff --git a/otherlibs/unix/execve.c b/otherlibs/unix/execve.c index 00ab6af4cf..a9f51aa97a 100644 --- a/otherlibs/unix/execve.c +++ b/otherlibs/unix/execve.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: execve.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <memory.h> diff --git a/otherlibs/unix/execvp.c b/otherlibs/unix/execvp.c index db77d41345..718480198b 100644 --- a/otherlibs/unix/execvp.c +++ b/otherlibs/unix/execvp.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: execvp.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <memory.h> diff --git a/otherlibs/unix/exit.c b/otherlibs/unix/exit.c index 88fc012547..9f0ade49a6 100644 --- a/otherlibs/unix/exit.c +++ b/otherlibs/unix/exit.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: exit.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/fchmod.c b/otherlibs/unix/fchmod.c index b2d49dcd46..155ee7df26 100644 --- a/otherlibs/unix/fchmod.c +++ b/otherlibs/unix/fchmod.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: fchmod.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <sys/types.h> #include <sys/stat.h> diff --git a/otherlibs/unix/fchown.c b/otherlibs/unix/fchown.c index e2c934ae07..27764ab2cc 100644 --- a/otherlibs/unix/fchown.c +++ b/otherlibs/unix/fchown.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: fchown.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/fcntl.c b/otherlibs/unix/fcntl.c index 58f7df7569..f9ef4c2a30 100644 --- a/otherlibs/unix/fcntl.c +++ b/otherlibs/unix/fcntl.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: fcntl.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/fork.c b/otherlibs/unix/fork.c index 80b4435511..6018ba136f 100644 --- a/otherlibs/unix/fork.c +++ b/otherlibs/unix/fork.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: fork.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <debugger.h> diff --git a/otherlibs/unix/ftruncate.c b/otherlibs/unix/ftruncate.c index 5eaa166fb1..71252e220a 100644 --- a/otherlibs/unix/ftruncate.c +++ b/otherlibs/unix/ftruncate.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: ftruncate.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <sys/types.h> #include <fail.h> diff --git a/otherlibs/unix/getaddrinfo.c b/otherlibs/unix/getaddrinfo.c index 34cf8280c4..66f51a44c2 100644 --- a/otherlibs/unix/getaddrinfo.c +++ b/otherlibs/unix/getaddrinfo.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getaddrinfo.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <string.h> #include <mlvalues.h> diff --git a/otherlibs/unix/getcwd.c b/otherlibs/unix/getcwd.c index f3ff97114e..7f675f8297 100644 --- a/otherlibs/unix/getcwd.c +++ b/otherlibs/unix/getcwd.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getcwd.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/getegid.c b/otherlibs/unix/getegid.c index 9c6097ef58..eb5b7ffc8d 100644 --- a/otherlibs/unix/getegid.c +++ b/otherlibs/unix/getegid.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getegid.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/geteuid.c b/otherlibs/unix/geteuid.c index 55e0763808..7bbc76177e 100644 --- a/otherlibs/unix/geteuid.c +++ b/otherlibs/unix/geteuid.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: geteuid.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/getgid.c b/otherlibs/unix/getgid.c index a3039d56cd..e05ae4b4a8 100644 --- a/otherlibs/unix/getgid.c +++ b/otherlibs/unix/getgid.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getgid.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/getgr.c b/otherlibs/unix/getgr.c index 7b212bd279..4615316b18 100644 --- a/otherlibs/unix/getgr.c +++ b/otherlibs/unix/getgr.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getgr.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <fail.h> diff --git a/otherlibs/unix/getgroups.c b/otherlibs/unix/getgroups.c index 485fabc45d..71bacc9b8f 100644 --- a/otherlibs/unix/getgroups.c +++ b/otherlibs/unix/getgroups.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getgroups.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/gethost.c b/otherlibs/unix/gethost.c index b0b29d9e06..598747843c 100644 --- a/otherlibs/unix/gethost.c +++ b/otherlibs/unix/gethost.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: gethost.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <string.h> #include <mlvalues.h> diff --git a/otherlibs/unix/getlogin.c b/otherlibs/unix/getlogin.c index 60197a07bb..a9c55b3d91 100644 --- a/otherlibs/unix/getlogin.c +++ b/otherlibs/unix/getlogin.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getlogin.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/getnameinfo.c b/otherlibs/unix/getnameinfo.c index eea15c59cf..d258ac9b2f 100644 --- a/otherlibs/unix/getnameinfo.c +++ b/otherlibs/unix/getnameinfo.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getnameinfo.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <string.h> #include <mlvalues.h> diff --git a/otherlibs/unix/getpeername.c b/otherlibs/unix/getpeername.c index 3c4da55675..188a66b5a7 100644 --- a/otherlibs/unix/getpeername.c +++ b/otherlibs/unix/getpeername.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getpeername.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/getpid.c b/otherlibs/unix/getpid.c index 5cc4f3a68a..b6fcda5a16 100644 --- a/otherlibs/unix/getpid.c +++ b/otherlibs/unix/getpid.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getpid.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/getppid.c b/otherlibs/unix/getppid.c index 2d1cd39493..175559ca79 100644 --- a/otherlibs/unix/getppid.c +++ b/otherlibs/unix/getppid.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getppid.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/getpw.c b/otherlibs/unix/getpw.c index 4317dc202f..fb337cb8f3 100644 --- a/otherlibs/unix/getpw.c +++ b/otherlibs/unix/getpw.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getpw.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/getsockname.c b/otherlibs/unix/getsockname.c index 8ab6debb09..e99dc05dfa 100644 --- a/otherlibs/unix/getsockname.c +++ b/otherlibs/unix/getsockname.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getsockname.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/gettimeofday.c b/otherlibs/unix/gettimeofday.c index 3e203d54e0..85b8887cd8 100644 --- a/otherlibs/unix/gettimeofday.c +++ b/otherlibs/unix/gettimeofday.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: gettimeofday.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/getuid.c b/otherlibs/unix/getuid.c index db3fab130e..310766ea44 100644 --- a/otherlibs/unix/getuid.c +++ b/otherlibs/unix/getuid.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: getuid.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/gmtime.c b/otherlibs/unix/gmtime.c index b55d70f4d9..2ffe883b40 100644 --- a/otherlibs/unix/gmtime.c +++ b/otherlibs/unix/gmtime.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: gmtime.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/initgroups.c b/otherlibs/unix/initgroups.c index d5b3dc5680..45be59bd6d 100644 --- a/otherlibs/unix/initgroups.c +++ b/otherlibs/unix/initgroups.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: initgroups.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/isatty.c b/otherlibs/unix/isatty.c index c2bdaad1c1..f0da4b7697 100644 --- a/otherlibs/unix/isatty.c +++ b/otherlibs/unix/isatty.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: isatty.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/itimer.c b/otherlibs/unix/itimer.c index 7c32783a9b..09c7806630 100644 --- a/otherlibs/unix/itimer.c +++ b/otherlibs/unix/itimer.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: itimer.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/kill.c b/otherlibs/unix/kill.c index 715060ee78..9f13002783 100644 --- a/otherlibs/unix/kill.c +++ b/otherlibs/unix/kill.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: kill.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <fail.h> diff --git a/otherlibs/unix/link.c b/otherlibs/unix/link.c index e28f649ea0..a771f6a59d 100644 --- a/otherlibs/unix/link.c +++ b/otherlibs/unix/link.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: link.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/listen.c b/otherlibs/unix/listen.c index 503cf6a6ad..3cba7af19a 100644 --- a/otherlibs/unix/listen.c +++ b/otherlibs/unix/listen.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: listen.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/lockf.c b/otherlibs/unix/lockf.c index 70359cf76d..ef1ad43393 100644 --- a/otherlibs/unix/lockf.c +++ b/otherlibs/unix/lockf.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: lockf.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <errno.h> #include <fcntl.h> diff --git a/otherlibs/unix/lseek.c b/otherlibs/unix/lseek.c index 65d7d50e40..8712ed9af1 100644 --- a/otherlibs/unix/lseek.c +++ b/otherlibs/unix/lseek.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: lseek.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <errno.h> #include <sys/types.h> diff --git a/otherlibs/unix/mkdir.c b/otherlibs/unix/mkdir.c index fd935ae67a..199483de0d 100644 --- a/otherlibs/unix/mkdir.c +++ b/otherlibs/unix/mkdir.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: mkdir.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <sys/types.h> #include <sys/stat.h> diff --git a/otherlibs/unix/mkfifo.c b/otherlibs/unix/mkfifo.c index 30f247d90f..84c3317f9a 100644 --- a/otherlibs/unix/mkfifo.c +++ b/otherlibs/unix/mkfifo.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: mkfifo.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <sys/types.h> #include <sys/stat.h> diff --git a/otherlibs/unix/nice.c b/otherlibs/unix/nice.c index a0902f2309..7d333b65fa 100644 --- a/otherlibs/unix/nice.c +++ b/otherlibs/unix/nice.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: nice.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/open.c b/otherlibs/unix/open.c index 214a550d36..cee7f2168b 100644 --- a/otherlibs/unix/open.c +++ b/otherlibs/unix/open.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: open.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/opendir.c b/otherlibs/unix/opendir.c index bb4825812c..712d2a17ab 100644 --- a/otherlibs/unix/opendir.c +++ b/otherlibs/unix/opendir.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: opendir.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/pipe.c b/otherlibs/unix/pipe.c index 81baeaf4e1..5738dc90bb 100644 --- a/otherlibs/unix/pipe.c +++ b/otherlibs/unix/pipe.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: pipe.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/putenv.c b/otherlibs/unix/putenv.c index 1238ee2b69..fd140490a6 100644 --- a/otherlibs/unix/putenv.c +++ b/otherlibs/unix/putenv.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: putenv.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdlib.h> #include <string.h> diff --git a/otherlibs/unix/read.c b/otherlibs/unix/read.c index cd1eab8cf6..d17af15302 100644 --- a/otherlibs/unix/read.c +++ b/otherlibs/unix/read.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: read.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <string.h> #include <mlvalues.h> diff --git a/otherlibs/unix/readdir.c b/otherlibs/unix/readdir.c index 1d508ac6eb..786e69d6bb 100644 --- a/otherlibs/unix/readdir.c +++ b/otherlibs/unix/readdir.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: readdir.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <fail.h> diff --git a/otherlibs/unix/readlink.c b/otherlibs/unix/readlink.c index 29d28d3d4a..19a56d2a63 100644 --- a/otherlibs/unix/readlink.c +++ b/otherlibs/unix/readlink.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: readlink.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/rename.c b/otherlibs/unix/rename.c index d121037f27..1ee3f73acc 100644 --- a/otherlibs/unix/rename.c +++ b/otherlibs/unix/rename.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: rename.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> #include <mlvalues.h> diff --git a/otherlibs/unix/rewinddir.c b/otherlibs/unix/rewinddir.c index 7c7b4a3c89..c16d79e7db 100644 --- a/otherlibs/unix/rewinddir.c +++ b/otherlibs/unix/rewinddir.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: rewinddir.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/rmdir.c b/otherlibs/unix/rmdir.c index 887496712d..1789946c90 100644 --- a/otherlibs/unix/rmdir.c +++ b/otherlibs/unix/rmdir.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: rmdir.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/select.c b/otherlibs/unix/select.c index 0493839861..8fc77f9a14 100644 --- a/otherlibs/unix/select.c +++ b/otherlibs/unix/select.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: select.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/sendrecv.c b/otherlibs/unix/sendrecv.c index 1f884aa87d..a5f1d63dcc 100644 --- a/otherlibs/unix/sendrecv.c +++ b/otherlibs/unix/sendrecv.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: sendrecv.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <string.h> #include <mlvalues.h> diff --git a/otherlibs/unix/setgid.c b/otherlibs/unix/setgid.c index a1096f26ba..60cd393c66 100644 --- a/otherlibs/unix/setgid.c +++ b/otherlibs/unix/setgid.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: setgid.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/setgroups.c b/otherlibs/unix/setgroups.c index e681c97647..6c8b8c743e 100644 --- a/otherlibs/unix/setgroups.c +++ b/otherlibs/unix/setgroups.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: setgroups.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/setsid.c b/otherlibs/unix/setsid.c index 9cc89e642c..64388b93c2 100644 --- a/otherlibs/unix/setsid.c +++ b/otherlibs/unix/setsid.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: setsid.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/setuid.c b/otherlibs/unix/setuid.c index 4af0d781c9..84d9bcb2d7 100644 --- a/otherlibs/unix/setuid.c +++ b/otherlibs/unix/setuid.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: setuid.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/shutdown.c b/otherlibs/unix/shutdown.c index abd8c07344..b65274b817 100644 --- a/otherlibs/unix/shutdown.c +++ b/otherlibs/unix/shutdown.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: shutdown.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/signals.c b/otherlibs/unix/signals.c index fb3acf00bf..ee5853e60d 100644 --- a/otherlibs/unix/signals.c +++ b/otherlibs/unix/signals.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: signals.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <errno.h> #include <signal.h> diff --git a/otherlibs/unix/sleep.c b/otherlibs/unix/sleep.c index aca1003c5c..c4b6f7fd2c 100644 --- a/otherlibs/unix/sleep.c +++ b/otherlibs/unix/sleep.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: sleep.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <signals.h> diff --git a/otherlibs/unix/socket.c b/otherlibs/unix/socket.c index 7243b8f15b..1a91b83eb5 100644 --- a/otherlibs/unix/socket.c +++ b/otherlibs/unix/socket.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: socket.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/socketaddr.c b/otherlibs/unix/socketaddr.c index caf83b785e..b3ac26b642 100644 --- a/otherlibs/unix/socketaddr.c +++ b/otherlibs/unix/socketaddr.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: socketaddr.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <string.h> #include <mlvalues.h> diff --git a/otherlibs/unix/socketpair.c b/otherlibs/unix/socketpair.c index 8a52dbb81b..7179703b5d 100644 --- a/otherlibs/unix/socketpair.c +++ b/otherlibs/unix/socketpair.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: socketpair.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/sockopt.c b/otherlibs/unix/sockopt.c index 6b3bfa4a4b..1e3390710e 100644 --- a/otherlibs/unix/sockopt.c +++ b/otherlibs/unix/sockopt.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: sockopt.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <memory.h> diff --git a/otherlibs/unix/stat.c b/otherlibs/unix/stat.c index 17ae53c0b2..4d8136060d 100644 --- a/otherlibs/unix/stat.c +++ b/otherlibs/unix/stat.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: stat.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <errno.h> #include <mlvalues.h> diff --git a/otherlibs/unix/symlink.c b/otherlibs/unix/symlink.c index b66c76bda1..495930400d 100644 --- a/otherlibs/unix/symlink.c +++ b/otherlibs/unix/symlink.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: symlink.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/termios.c b/otherlibs/unix/termios.c index 99cca2b643..f9dccba292 100644 --- a/otherlibs/unix/termios.c +++ b/otherlibs/unix/termios.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: termios.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/time.c b/otherlibs/unix/time.c index 63eac84eb7..756b5ef7f3 100644 --- a/otherlibs/unix/time.c +++ b/otherlibs/unix/time.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: time.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <time.h> #include <mlvalues.h> diff --git a/otherlibs/unix/times.c b/otherlibs/unix/times.c index 94abde8a6d..87feb363c8 100644 --- a/otherlibs/unix/times.c +++ b/otherlibs/unix/times.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: times.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/truncate.c b/otherlibs/unix/truncate.c index dfc350a329..7db72b4347 100644 --- a/otherlibs/unix/truncate.c +++ b/otherlibs/unix/truncate.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: truncate.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <sys/types.h> #include <mlvalues.h> diff --git a/otherlibs/unix/umask.c b/otherlibs/unix/umask.c index cf5eaa7c08..1b71e8d8d4 100644 --- a/otherlibs/unix/umask.c +++ b/otherlibs/unix/umask.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: umask.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <sys/types.h> #include <sys/stat.h> diff --git a/otherlibs/unix/unix.ml b/otherlibs/unix/unix.ml index 0adc41e213..62e015efb6 100644 --- a/otherlibs/unix/unix.ml +++ b/otherlibs/unix/unix.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: unix.ml 12858 2012-08-10 14:45:51Z maranget $ *) type error = E2BIG diff --git a/otherlibs/unix/unix.mli b/otherlibs/unix/unix.mli index 0c2780999a..39c4d8e1ff 100644 --- a/otherlibs/unix/unix.mli +++ b/otherlibs/unix/unix.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: unix.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Interface to the Unix system *) diff --git a/otherlibs/unix/unixLabels.ml b/otherlibs/unix/unixLabels.ml index 424fcc6e62..294213ea3b 100644 --- a/otherlibs/unix/unixLabels.ml +++ b/otherlibs/unix/unixLabels.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: unixLabels.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [UnixLabels]: labelled Unix module *) diff --git a/otherlibs/unix/unixLabels.mli b/otherlibs/unix/unixLabels.mli index 98a58f1b90..9b7886e0f1 100644 --- a/otherlibs/unix/unixLabels.mli +++ b/otherlibs/unix/unixLabels.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: unixLabels.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Interface to the Unix system. To use as replacement to default {!Unix} module, diff --git a/otherlibs/unix/unixsupport.c b/otherlibs/unix/unixsupport.c index 4c91adb104..cdff1305bc 100644 --- a/otherlibs/unix/unixsupport.c +++ b/otherlibs/unix/unixsupport.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: unixsupport.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/unixsupport.h b/otherlibs/unix/unixsupport.h index c631ef1503..359bb13c7c 100644 --- a/otherlibs/unix/unixsupport.h +++ b/otherlibs/unix/unixsupport.h @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: unixsupport.h 12959 2012-09-27 13:12:51Z maranget $ */ #ifdef HAS_UNISTD #include <unistd.h> diff --git a/otherlibs/unix/unlink.c b/otherlibs/unix/unlink.c index 3fb5151be0..b605b3971e 100644 --- a/otherlibs/unix/unlink.c +++ b/otherlibs/unix/unlink.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: unlink.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include "unixsupport.h" diff --git a/otherlibs/unix/utimes.c b/otherlibs/unix/utimes.c index a6a2f5ebc5..31a0a9a79a 100644 --- a/otherlibs/unix/utimes.c +++ b/otherlibs/unix/utimes.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: utimes.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <fail.h> #include <mlvalues.h> diff --git a/otherlibs/unix/wait.c b/otherlibs/unix/wait.c index fc12e5ad5c..be6ce034dd 100644 --- a/otherlibs/unix/wait.c +++ b/otherlibs/unix/wait.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: wait.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <mlvalues.h> #include <alloc.h> diff --git a/otherlibs/unix/write.c b/otherlibs/unix/write.c index ca42d1e75b..70857cabcd 100644 --- a/otherlibs/unix/write.c +++ b/otherlibs/unix/write.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: write.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <errno.h> #include <string.h> diff --git a/parsing/asttypes.mli b/parsing/asttypes.mli index ecdfcc5fd4..96e8001507 100644 --- a/parsing/asttypes.mli +++ b/parsing/asttypes.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: asttypes.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Auxiliary a.s.t. types used by parsetree and typedtree. *) diff --git a/parsing/lexer.mli b/parsing/lexer.mli index d3dc035fe2..a903459311 100644 --- a/parsing/lexer.mli +++ b/parsing/lexer.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: lexer.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* The lexical analyzer *) diff --git a/parsing/location.mli b/parsing/location.mli index 23c5c979b3..2bf00f5e3a 100644 --- a/parsing/location.mli +++ b/parsing/location.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: location.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Source code locations (ranges of positions), used in parsetree. *) diff --git a/parsing/longident.ml b/parsing/longident.ml index 612f9df197..91e9ec2642 100644 --- a/parsing/longident.ml +++ b/parsing/longident.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: longident.ml 12858 2012-08-10 14:45:51Z maranget $ *) type t = Lident of string diff --git a/parsing/longident.mli b/parsing/longident.mli index a802049b96..a305fc2e22 100644 --- a/parsing/longident.mli +++ b/parsing/longident.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: longident.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Long identifiers, used in parsetree. *) diff --git a/parsing/parse.mli b/parsing/parse.mli index 85e08bc482..407ac732ba 100644 --- a/parsing/parse.mli +++ b/parsing/parse.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: parse.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Entry points in the parser *) diff --git a/parsing/parser.mly b/parsing/parser.mly index 2c7b80a8ee..2d78fa28c3 100644 --- a/parsing/parser.mly +++ b/parsing/parser.mly @@ -10,7 +10,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: parser.mly 12959 2012-09-27 13:12:51Z maranget $ */ /* The parser definition */ diff --git a/parsing/printast.ml b/parsing/printast.ml index 34b74c6096..05c7dfd203 100644 --- a/parsing/printast.ml +++ b/parsing/printast.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printast.ml 12959 2012-09-27 13:12:51Z maranget $ *) open Asttypes;; open Format;; diff --git a/parsing/printast.mli b/parsing/printast.mli index 096f461727..d2496a646d 100644 --- a/parsing/printast.mli +++ b/parsing/printast.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printast.mli 12858 2012-08-10 14:45:51Z maranget $ *) open Parsetree;; open Format;; diff --git a/parsing/syntaxerr.ml b/parsing/syntaxerr.ml index f18e3281d3..d30c1493ce 100644 --- a/parsing/syntaxerr.ml +++ b/parsing/syntaxerr.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: syntaxerr.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Auxiliary type for reporting syntax errors *) diff --git a/parsing/syntaxerr.mli b/parsing/syntaxerr.mli index c2f9eb07c5..035c20f10d 100644 --- a/parsing/syntaxerr.mli +++ b/parsing/syntaxerr.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: syntaxerr.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Auxiliary type for reporting syntax errors *) diff --git a/stdlib/Makefile b/stdlib/Makefile index 3b8e9fc1bb..23076a4657 100644 --- a/stdlib/Makefile +++ b/stdlib/Makefile @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile 12858 2012-08-10 14:45:51Z maranget $ include Makefile.shared diff --git a/stdlib/Makefile.nt b/stdlib/Makefile.nt index 579391a775..46f702ac5c 100644 --- a/stdlib/Makefile.nt +++ b/stdlib/Makefile.nt @@ -11,7 +11,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile.nt 12858 2012-08-10 14:45:51Z maranget $ include Makefile.shared diff --git a/stdlib/StdlibModules b/stdlib/StdlibModules index 926e2cb514..92104be237 100644 --- a/stdlib/StdlibModules +++ b/stdlib/StdlibModules @@ -13,7 +13,7 @@ # # ######################################################################### -# $Id$ +# $Id: StdlibModules 12858 2012-08-10 14:45:51Z maranget $ # This file lists all standard library modules. # It is used in particular to know what to expunge in toplevels. diff --git a/stdlib/arg.mli b/stdlib/arg.mli index d6e0210aa1..d1c9a01873 100644 --- a/stdlib/arg.mli +++ b/stdlib/arg.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: arg.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Parsing of command line arguments. diff --git a/stdlib/array.mli b/stdlib/array.mli index db1f469d0e..3fc8cfb3bd 100644 --- a/stdlib/array.mli +++ b/stdlib/array.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: array.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Array operations. *) diff --git a/stdlib/arrayLabels.ml b/stdlib/arrayLabels.ml index 652f4cac42..a6e6f5d3f3 100644 --- a/stdlib/arrayLabels.ml +++ b/stdlib/arrayLabels.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: arrayLabels.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [ArrayLabels]: labelled Array module *) diff --git a/stdlib/arrayLabels.mli b/stdlib/arrayLabels.mli index 308bfa4e1c..0beeb42e5f 100644 --- a/stdlib/arrayLabels.mli +++ b/stdlib/arrayLabels.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: arrayLabels.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Array operations. *) diff --git a/stdlib/buffer.ml b/stdlib/buffer.ml index 541717ade8..3c3b0d9bc6 100644 --- a/stdlib/buffer.ml +++ b/stdlib/buffer.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: buffer.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Extensible buffers *) diff --git a/stdlib/buffer.mli b/stdlib/buffer.mli index ce70c983e9..972da00e23 100644 --- a/stdlib/buffer.mli +++ b/stdlib/buffer.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: buffer.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Extensible string buffers. diff --git a/stdlib/callback.ml b/stdlib/callback.ml index 5dd7894846..be14a5c972 100644 --- a/stdlib/callback.ml +++ b/stdlib/callback.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: callback.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Registering OCaml values with the C runtime for later callbacks *) diff --git a/stdlib/callback.mli b/stdlib/callback.mli index c536bf8d53..9259de6b1f 100644 --- a/stdlib/callback.mli +++ b/stdlib/callback.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: callback.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Registering OCaml values with the C runtime. diff --git a/stdlib/camlinternalLazy.ml b/stdlib/camlinternalLazy.ml index 042a377c9d..e84aad0544 100644 --- a/stdlib/camlinternalLazy.ml +++ b/stdlib/camlinternalLazy.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: camlinternalLazy.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Internals of forcing lazy values. *) diff --git a/stdlib/camlinternalLazy.mli b/stdlib/camlinternalLazy.mli index eef1c9d6fd..3d1ee8a636 100644 --- a/stdlib/camlinternalLazy.mli +++ b/stdlib/camlinternalLazy.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: camlinternalLazy.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Run-time support for lazy values. All functions in this module are for system use only, not for the diff --git a/stdlib/camlinternalMod.ml b/stdlib/camlinternalMod.ml index 36d73bdcf2..19df59042d 100644 --- a/stdlib/camlinternalMod.ml +++ b/stdlib/camlinternalMod.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: camlinternalMod.ml 12858 2012-08-10 14:45:51Z maranget $ *) type shape = | Function diff --git a/stdlib/camlinternalMod.mli b/stdlib/camlinternalMod.mli index bc59f19564..12d488469f 100644 --- a/stdlib/camlinternalMod.mli +++ b/stdlib/camlinternalMod.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: camlinternalMod.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Run-time support for recursive modules. All functions in this module are for system use only, not for the diff --git a/stdlib/camlinternalOO.mli b/stdlib/camlinternalOO.mli index f02b020360..b8acf780f7 100644 --- a/stdlib/camlinternalOO.mli +++ b/stdlib/camlinternalOO.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: camlinternalOO.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Run-time support for objects and classes. All functions in this module are for system use only, not for the diff --git a/stdlib/char.ml b/stdlib/char.ml index 6dafbad2b3..e1c3b2c78b 100644 --- a/stdlib/char.ml +++ b/stdlib/char.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: char.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Character operations *) diff --git a/stdlib/char.mli b/stdlib/char.mli index 05a8156d3c..e3da42c810 100644 --- a/stdlib/char.mli +++ b/stdlib/char.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: char.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Character operations. *) diff --git a/stdlib/complex.ml b/stdlib/complex.ml index 3b0addcb78..348c6dacbd 100644 --- a/stdlib/complex.ml +++ b/stdlib/complex.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: complex.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Complex numbers *) diff --git a/stdlib/complex.mli b/stdlib/complex.mli index 1bfa8b7bc8..a5de68e92f 100644 --- a/stdlib/complex.mli +++ b/stdlib/complex.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: complex.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Complex numbers. diff --git a/stdlib/digest.ml b/stdlib/digest.ml index 38df61a038..690753bb98 100644 --- a/stdlib/digest.ml +++ b/stdlib/digest.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: digest.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Message digest (MD5) *) diff --git a/stdlib/digest.mli b/stdlib/digest.mli index efc0a4773c..73cb147652 100644 --- a/stdlib/digest.mli +++ b/stdlib/digest.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: digest.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** MD5 message digest. diff --git a/stdlib/filename.mli b/stdlib/filename.mli index 499e8bb291..e55469764c 100644 --- a/stdlib/filename.mli +++ b/stdlib/filename.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: filename.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Operations on file names. *) diff --git a/stdlib/gc.ml b/stdlib/gc.ml index 16a354a35f..b524e19fbe 100644 --- a/stdlib/gc.ml +++ b/stdlib/gc.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: gc.ml 12858 2012-08-10 14:45:51Z maranget $ *) type stat = { minor_words : float; diff --git a/stdlib/gc.mli b/stdlib/gc.mli index 45d882f25a..a836a5eb6a 100644 --- a/stdlib/gc.mli +++ b/stdlib/gc.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: gc.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Memory management control and statistics; finalised values. *) diff --git a/stdlib/genlex.ml b/stdlib/genlex.ml index 1c6276c9f9..e132c70b1a 100644 --- a/stdlib/genlex.ml +++ b/stdlib/genlex.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: genlex.ml 12858 2012-08-10 14:45:51Z maranget $ *) type token = Kwd of string diff --git a/stdlib/genlex.mli b/stdlib/genlex.mli index b1098f0977..24b009f104 100644 --- a/stdlib/genlex.mli +++ b/stdlib/genlex.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: genlex.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** A generic lexical analyzer. diff --git a/stdlib/hashtbl.ml b/stdlib/hashtbl.ml index 80a0399592..1d38d9eb7f 100644 --- a/stdlib/hashtbl.ml +++ b/stdlib/hashtbl.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: hashtbl.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Hash tables *) diff --git a/stdlib/hashtbl.mli b/stdlib/hashtbl.mli index 00d9efca37..a72387e718 100644 --- a/stdlib/hashtbl.mli +++ b/stdlib/hashtbl.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: hashtbl.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Hash tables and hash functions. diff --git a/stdlib/header.c b/stdlib/header.c index c82c7bc7f8..682dc8ec5e 100644 --- a/stdlib/header.c +++ b/stdlib/header.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: header.c 12858 2012-08-10 14:45:51Z maranget $ */ /* The launcher for bytecode executables (if #! is not working) */ diff --git a/stdlib/headernt.c b/stdlib/headernt.c index 9972d5d5c1..ee1b5da0b0 100644 --- a/stdlib/headernt.c +++ b/stdlib/headernt.c @@ -11,7 +11,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: headernt.c 12858 2012-08-10 14:45:51Z maranget $ */ #define STRICT #define WIN32_LEAN_AND_MEAN diff --git a/stdlib/int32.ml b/stdlib/int32.ml index 15237d7f48..6516c2e46b 100644 --- a/stdlib/int32.ml +++ b/stdlib/int32.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: int32.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [Int32]: 32-bit integers *) diff --git a/stdlib/int32.mli b/stdlib/int32.mli index 8bc7384ff2..fba8332acf 100644 --- a/stdlib/int32.mli +++ b/stdlib/int32.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: int32.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** 32-bit integers. diff --git a/stdlib/int64.ml b/stdlib/int64.ml index d8b1c3ca32..c121a90356 100644 --- a/stdlib/int64.ml +++ b/stdlib/int64.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: int64.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [Int64]: 64-bit integers *) diff --git a/stdlib/int64.mli b/stdlib/int64.mli index 1f28f5c49b..7b5c15ac28 100644 --- a/stdlib/int64.mli +++ b/stdlib/int64.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: int64.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** 64-bit integers. diff --git a/stdlib/lazy.ml b/stdlib/lazy.ml index 6a114245e7..8e4b35aaa6 100644 --- a/stdlib/lazy.ml +++ b/stdlib/lazy.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: lazy.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [Lazy]: deferred computations *) diff --git a/stdlib/lazy.mli b/stdlib/lazy.mli index 9d720d2bbc..dd65110e3a 100644 --- a/stdlib/lazy.mli +++ b/stdlib/lazy.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: lazy.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Deferred computations. *) diff --git a/stdlib/lexing.ml b/stdlib/lexing.ml index 4d03ec088a..055a1dccf2 100644 --- a/stdlib/lexing.ml +++ b/stdlib/lexing.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: lexing.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* The run-time library for lexers generated by camllex *) diff --git a/stdlib/lexing.mli b/stdlib/lexing.mli index a1a0690169..bfe41d6c6b 100644 --- a/stdlib/lexing.mli +++ b/stdlib/lexing.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: lexing.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** The run-time library for lexers generated by [ocamllex]. *) diff --git a/stdlib/list.ml b/stdlib/list.ml index aea05b4bf3..aae3344578 100644 --- a/stdlib/list.ml +++ b/stdlib/list.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: list.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* List operations *) diff --git a/stdlib/list.mli b/stdlib/list.mli index 855699d051..89cd997068 100644 --- a/stdlib/list.mli +++ b/stdlib/list.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: list.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** List operations. diff --git a/stdlib/listLabels.ml b/stdlib/listLabels.ml index 62b6e37687..9984fbf65a 100644 --- a/stdlib/listLabels.ml +++ b/stdlib/listLabels.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: listLabels.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [ListLabels]: labelled List module *) diff --git a/stdlib/listLabels.mli b/stdlib/listLabels.mli index b4b58045bf..3ccc555124 100644 --- a/stdlib/listLabels.mli +++ b/stdlib/listLabels.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: listLabels.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** List operations. diff --git a/stdlib/map.ml b/stdlib/map.ml index 78b76b0256..80690afc21 100644 --- a/stdlib/map.ml +++ b/stdlib/map.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: map.ml 12959 2012-09-27 13:12:51Z maranget $ *) module type OrderedType = sig diff --git a/stdlib/map.mli b/stdlib/map.mli index a6374dbdf6..60b1d29955 100644 --- a/stdlib/map.mli +++ b/stdlib/map.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: map.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Association tables over ordered types. diff --git a/stdlib/marshal.ml b/stdlib/marshal.ml index 638f05434a..ae8a3a43ba 100644 --- a/stdlib/marshal.ml +++ b/stdlib/marshal.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: marshal.ml 12858 2012-08-10 14:45:51Z maranget $ *) type extern_flags = No_sharing diff --git a/stdlib/marshal.mli b/stdlib/marshal.mli index 86e1ebd199..0f6de83134 100644 --- a/stdlib/marshal.mli +++ b/stdlib/marshal.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: marshal.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Marshaling of data structures. diff --git a/stdlib/moreLabels.ml b/stdlib/moreLabels.ml index 3fda7a5b32..dc9cb35abb 100644 --- a/stdlib/moreLabels.ml +++ b/stdlib/moreLabels.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: moreLabels.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [MoreLabels]: meta-module for compatibility labelled libraries *) diff --git a/stdlib/moreLabels.mli b/stdlib/moreLabels.mli index a004bdb5bf..c49fd74608 100644 --- a/stdlib/moreLabels.mli +++ b/stdlib/moreLabels.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: moreLabels.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Extra labeled libraries. diff --git a/stdlib/nativeint.ml b/stdlib/nativeint.ml index 4bba76d566..2c2a00d767 100644 --- a/stdlib/nativeint.ml +++ b/stdlib/nativeint.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: nativeint.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [Nativeint]: processor-native integers *) diff --git a/stdlib/nativeint.mli b/stdlib/nativeint.mli index 7de11ea00d..e056e96664 100644 --- a/stdlib/nativeint.mli +++ b/stdlib/nativeint.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: nativeint.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Processor-native integers. diff --git a/stdlib/obj.ml b/stdlib/obj.ml index 96de162f6c..1b0dd6360a 100644 --- a/stdlib/obj.ml +++ b/stdlib/obj.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: obj.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Operations on internal representations of values *) diff --git a/stdlib/obj.mli b/stdlib/obj.mli index 9b66723b2a..2d1953ee89 100644 --- a/stdlib/obj.mli +++ b/stdlib/obj.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: obj.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Operations on internal representations of values. diff --git a/stdlib/oo.ml b/stdlib/oo.ml index 40c8ae6e4a..bf8e6aaa54 100644 --- a/stdlib/oo.ml +++ b/stdlib/oo.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: oo.ml 12858 2012-08-10 14:45:51Z maranget $ *) let copy = CamlinternalOO.copy external id : < .. > -> int = "%field1" diff --git a/stdlib/oo.mli b/stdlib/oo.mli index 2a9eb23209..2ad9377682 100644 --- a/stdlib/oo.mli +++ b/stdlib/oo.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: oo.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Operations on objects *) diff --git a/stdlib/parsing.mli b/stdlib/parsing.mli index f488245992..303d5ec6ea 100644 --- a/stdlib/parsing.mli +++ b/stdlib/parsing.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: parsing.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** The run-time library for parsers generated by [ocamlyacc]. *) diff --git a/stdlib/pervasives.ml b/stdlib/pervasives.ml index 17a1a9c1a8..1ac632ce65 100644 --- a/stdlib/pervasives.ml +++ b/stdlib/pervasives.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: pervasives.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* type 'a option = None | Some of 'a *) diff --git a/stdlib/printexc.mli b/stdlib/printexc.mli index 93ee5d6d1a..6e73f08a67 100644 --- a/stdlib/printexc.mli +++ b/stdlib/printexc.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printexc.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Facilities for printing exceptions. *) diff --git a/stdlib/queue.ml b/stdlib/queue.ml index 388a46c539..1b79e318ae 100644 --- a/stdlib/queue.ml +++ b/stdlib/queue.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: queue.ml 12858 2012-08-10 14:45:51Z maranget $ *) exception Empty diff --git a/stdlib/queue.mli b/stdlib/queue.mli index 5dea9244bc..e8290145e0 100644 --- a/stdlib/queue.mli +++ b/stdlib/queue.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: queue.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** First-in first-out queues. diff --git a/stdlib/random.ml b/stdlib/random.ml index 800c629706..43028bf285 100644 --- a/stdlib/random.ml +++ b/stdlib/random.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: random.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Pseudo-random number generator This is a lagged-Fibonacci F(55, 24, +) with a modified addition diff --git a/stdlib/random.mli b/stdlib/random.mli index d8ea01e621..751175ebba 100644 --- a/stdlib/random.mli +++ b/stdlib/random.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: random.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Pseudo-random number generators (PRNG). *) diff --git a/stdlib/scanf.ml b/stdlib/scanf.ml index b619bf8f05..27d176fae8 100644 --- a/stdlib/scanf.ml +++ b/stdlib/scanf.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: scanf.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* The run-time library for scanners. *) diff --git a/stdlib/set.ml b/stdlib/set.ml index 661968be86..8f0caaf169 100644 --- a/stdlib/set.ml +++ b/stdlib/set.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: set.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Sets over ordered types *) diff --git a/stdlib/set.mli b/stdlib/set.mli index 0f1a3b7c96..ed72b36035 100644 --- a/stdlib/set.mli +++ b/stdlib/set.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: set.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Sets over ordered types. diff --git a/stdlib/sort.ml b/stdlib/sort.ml index 66546b12b1..7c4a54a7f2 100644 --- a/stdlib/sort.ml +++ b/stdlib/sort.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: sort.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Merging and sorting *) diff --git a/stdlib/sort.mli b/stdlib/sort.mli index 4f2a961aaa..48fcabb561 100644 --- a/stdlib/sort.mli +++ b/stdlib/sort.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: sort.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Sorting and merging lists. diff --git a/stdlib/stack.ml b/stdlib/stack.ml index 599b10c8bb..98cbc53d5b 100644 --- a/stdlib/stack.ml +++ b/stdlib/stack.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: stack.ml 12858 2012-08-10 14:45:51Z maranget $ *) type 'a t = { mutable c : 'a list } diff --git a/stdlib/stack.mli b/stdlib/stack.mli index 2d7a90066a..2085a2c927 100644 --- a/stdlib/stack.mli +++ b/stdlib/stack.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: stack.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Last-in first-out stacks. diff --git a/stdlib/stdLabels.ml b/stdlib/stdLabels.ml index 468dd5176e..fbee894cd2 100644 --- a/stdlib/stdLabels.ml +++ b/stdlib/stdLabels.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: stdLabels.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [StdLabels]: meta-module for labelled libraries *) diff --git a/stdlib/stdLabels.mli b/stdlib/stdLabels.mli index 1360081a22..dad6a29d73 100644 --- a/stdlib/stdLabels.mli +++ b/stdlib/stdLabels.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: stdLabels.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Standard labeled libraries. diff --git a/stdlib/std_exit.ml b/stdlib/std_exit.ml index c56153738f..f3e6f784ed 100644 --- a/stdlib/std_exit.ml +++ b/stdlib/std_exit.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: std_exit.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Ensure that [at_exit] functions are called at the end of every program *) diff --git a/stdlib/stdlib.mllib b/stdlib/stdlib.mllib index 91265e5da9..2e9fb8f6e4 100644 --- a/stdlib/stdlib.mllib +++ b/stdlib/stdlib.mllib @@ -1,7 +1,7 @@ # 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$ +# $Id: stdlib.mllib 9641 2010-03-09 15:46:32Z maranget $ Pervasives Array diff --git a/stdlib/stream.ml b/stdlib/stream.ml index 55bf31d6ce..e9c1211313 100644 --- a/stdlib/stream.ml +++ b/stdlib/stream.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: stream.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* 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 diff --git a/stdlib/stream.mli b/stdlib/stream.mli index 16e7117973..c92ffcb593 100644 --- a/stdlib/stream.mli +++ b/stdlib/stream.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: stream.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** Streams and parsers. *) diff --git a/stdlib/string.ml b/stdlib/string.ml index f3906f3533..b6628b200b 100644 --- a/stdlib/string.ml +++ b/stdlib/string.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: string.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* String operations *) diff --git a/stdlib/string.mli b/stdlib/string.mli index c248fab18a..04bcd3f5c8 100644 --- a/stdlib/string.mli +++ b/stdlib/string.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: string.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** String operations. diff --git a/stdlib/stringLabels.ml b/stdlib/stringLabels.ml index 2345d4992c..0b378424af 100644 --- a/stdlib/stringLabels.ml +++ b/stdlib/stringLabels.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: stringLabels.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [StringLabels]: labelled String module *) diff --git a/stdlib/stringLabels.mli b/stdlib/stringLabels.mli index 59b0eb7c28..551936ab8b 100644 --- a/stdlib/stringLabels.mli +++ b/stdlib/stringLabels.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: stringLabels.mli 12959 2012-09-27 13:12:51Z maranget $ *) (** String operations. *) diff --git a/stdlib/sys.mli b/stdlib/sys.mli index 6f3d579785..740f348002 100644 --- a/stdlib/sys.mli +++ b/stdlib/sys.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: sys.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** System interface. *) diff --git a/stdlib/sys.mlp b/stdlib/sys.mlp index c7271794d0..a9f7304dfe 100644 --- a/stdlib/sys.mlp +++ b/stdlib/sys.mlp @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: sys.mlp 12858 2012-08-10 14:45:51Z maranget $ *) (* WARNING: sys.ml is generated from sys.mlp. DO NOT EDIT sys.ml or your changes will be lost. diff --git a/stdlib/weak.mli b/stdlib/weak.mli index add9b0abb2..12c99b241a 100644 --- a/stdlib/weak.mli +++ b/stdlib/weak.mli @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: weak.mli 12858 2012-08-10 14:45:51Z maranget $ *) (** Arrays of weak pointers and hash tables of weak pointers. *) diff --git a/testsuite/Makefile b/testsuite/Makefile index 497d7403d0..81f09488a1 100644 --- a/testsuite/Makefile +++ b/testsuite/Makefile @@ -1,4 +1,4 @@ -# $Id$ +# $Id: Makefile 12858 2012-08-10 14:45:51Z maranget $ BASEDIR=${PWD} NO_PRINT=`($(MAKE) empty --no-print-directory > /dev/null 2>&1) && echo '--no-print-directory' || echo ''` diff --git a/testsuite/lib/testing.mli b/testsuite/lib/testing.mli index 18b2ea0376..2b584075ff 100644 --- a/testsuite/lib/testing.mli +++ b/testsuite/lib/testing.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: testing.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Testing auxilliaries. *) diff --git a/testsuite/makefiles/Makefile.common b/testsuite/makefiles/Makefile.common index 4cb3d8b1f7..4a832a16c5 100644 --- a/testsuite/makefiles/Makefile.common +++ b/testsuite/makefiles/Makefile.common @@ -1,9 +1,8 @@ -# $Id$ +# $Id: Makefile.common 12959 2012-09-27 13:12:51Z maranget $ TOPDIR=$(BASEDIR)/.. include $(TOPDIR)/config/Makefile - DIFF=diff -q BOOTDIR=$(TOPDIR)/boot OCAMLRUN=$(BOOTDIR)/ocamlrun$(EXE) diff --git a/testsuite/makefiles/Makefile.one b/testsuite/makefiles/Makefile.one index 5586824cd5..c905b77e9b 100644 --- a/testsuite/makefiles/Makefile.one +++ b/testsuite/makefiles/Makefile.one @@ -12,7 +12,7 @@ ML_FILES=$(ML_LEX_FILES) $(ML_YACC_FILES) O_FILES=$(C_FILES:=.o) ADD_CMO_FILES=$(ADD_MODULES:=.cmo) ADD_CMX_FILES=$(ADD_MODULES:=.cmx) - +ADD_COMPFLAGS+=-nojoin GENERATED_SOURCES=$(ML_LEX_FILES) $(ML_YACC_FILES) $(MLI_YACC_FILES) CUSTOM_FLAG=`if [ -z "$(C_FILES)" ]; then true; else echo '-custom'; fi` diff --git a/testsuite/makefiles/Makefile.several b/testsuite/makefiles/Makefile.several index 91181f0dff..f4a675f111 100644 --- a/testsuite/makefiles/Makefile.several +++ b/testsuite/makefiles/Makefile.several @@ -1,4 +1,4 @@ -# $Id$ +# $Id: Makefile.several 12959 2012-09-27 13:12:51Z maranget $ CC=$(NATIVECC) $(NATIVECCCOMPOPTS) FC=$(FORTAN_COMPILER) @@ -13,27 +13,28 @@ ADD_CFLAGS+=$(CUSTOM_FLAG) FORTRAN_LIB=`if [ -z "$(F_FILES)" ]; then true; else echo '$(FORTRAN_LIBRARY)'; fi` ADD_CFLAGS+=$(FORTRAN_LIB) ADD_OPTFLAGS+=$(FORTRAN_LIB) +ADD_COMPFLAGS+=-nojoin check: @if [ -n "$(FORTRAN_COMPILER)" -o -z "$(F_FILES)" ]; then $(MAKE) run-all; fi run-all: @for file in $(C_FILES); do \ - $(CC) -c -I$(PREFIX)/lib/ocaml/caml $$file.c; \ + $(CC) -c -I$(PREFIX)/lib/ocaml/jocaml $$file.c; \ done; @for file in $(F_FILES); do \ - $(FORTRAN_COMPILER) -c -I$(PREFIX)/lib/ocaml/caml $$file.f; \ + $(FORTRAN_COMPILER) -c -I$(PREFIX)/lib/ocaml/jocaml $$file.f; \ done; @for file in *.ml; do \ printf " ... testing '$$file':"; \ - $(MAKE) run-file DESC=ocamlc COMP='$(OCAMLC)' COMPFLAGS='$(ADD_COMPFLAGS) $(ADD_CFLAGS) $(O_FILES) -w a $(CMA_FILES) -I $(BASEDIR)/lib $(CMO_FILES)' FILE=$$file PROGRAM_ARGS=$(PROGRAM_ARGS) && \ + $(MAKE) run-file DESC=jocamlc COMP='$(OCAMLC)' COMPFLAGS='$(ADD_COMPFLAGS) $(ADD_CFLAGS) $(O_FILES) -w a $(CMA_FILES) -I $(BASEDIR)/lib $(CMO_FILES)' FILE=$$file PROGRAM_ARGS=$(PROGRAM_ARGS) && \ if [ -z "$(BYTECODE_ONLY)" ]; then \ - $(MAKE) run-file DESC=ocamlopt COMP=$(PREFIX)/bin/jocamlopt COMPFLAGS='$(ADD_COMPFLAGS) $(ADD_OPTFLAGS) $(O_FILES) -w a $(CMXA_FILES) -I $(BASEDIR)/lib $(CMX_FILES)' FILE=$$file PROGRAM_ARGS=$(PROGRAM_ARGS); \ + $(MAKE) run-file DESC=jocamlopt COMP=$(PREFIX)/bin/jocamlopt COMPFLAGS='$(ADD_COMPFLAGS) $(ADD_OPTFLAGS) $(O_FILES) -w a $(CMXA_FILES) -I $(BASEDIR)/lib $(CMX_FILES)' FILE=$$file PROGRAM_ARGS=$(PROGRAM_ARGS); \ fi && \ if [ ! -z $(UNSAFE) ]; then \ - $(MAKE) run-file DESC=ocamlc-unsafe COMP=$(PREFIX)/bin/jocamlc COMPFLAGS='-w a -unsafe -I $(BASEDIR)/lib $(CMO_FILES)' FILE=$$file && \ + $(MAKE) run-file DESC=jocamlc-unsafe COMP=$(PREFIX)/bin/jocamlc COMPFLAGS='-w a -unsafe -I $(BASEDIR)/lib $(CMO_FILES)' FILE=$$file && \ if [ -z "$(BYTECODE_ONLY)" ]; then \ - $(MAKE) run-file DESC=ocamlopt-unsafe COMP=$(PREFIX)/bin/jocamlopt COMPFLAGS='-w a -unsafe -I $(BASEDIR)/lib $(CMX_FILES)' FILE=$$file; \ + $(MAKE) run-file DESC=jocamlopt-unsafe COMP=$(PREFIX)/bin/jocamlopt COMPFLAGS='-w a -unsafe -I $(BASEDIR)/lib $(CMX_FILES)' FILE=$$file; \ fi; \ fi && \ echo " => passed"; \ diff --git a/testsuite/makefiles/Makefile.toplevel b/testsuite/makefiles/Makefile.toplevel index 532763f431..a5d0c03ee0 100644 --- a/testsuite/makefiles/Makefile.toplevel +++ b/testsuite/makefiles/Makefile.toplevel @@ -1,10 +1,10 @@ -# $Id$ +# $Id: Makefile.toplevel 12858 2012-08-10 14:45:51Z maranget $ default: @for file in *.ml; do \ - $(OCAML) < $$file 2>&1 | grep -v '^ OCaml version' > $$file.result; \ + $(OCAML) < $$file 2>&1 | grep -v '^ JoCaml version' > $$file.result; \ if [ -f $$file.principal.reference ]; then \ - $(OCAML) -principal < $$file 2>&1 | grep -v '^ OCaml version' > $$file.principal.result; \ + $(OCAML) -principal < $$file 2>&1 | grep -v '^ JoCaml version' > $$file.principal.result; \ fi; \ done @for file in *.reference; do \ diff --git a/testsuite/tests/asmcomp/Makefile b/testsuite/tests/asmcomp/Makefile index d3d81af33c..5add249549 100644 --- a/testsuite/tests/asmcomp/Makefile +++ b/testsuite/tests/asmcomp/Makefile @@ -50,7 +50,6 @@ OTHEROBJS=\ $(TOPDIR)/typing/typedtreeMap.cmo \ $(TOPDIR)/typing/cmt_format.cmo \ $(TOPDIR)/typing/stypes.cmo \ - $(TOPDIR)/typing/joinmatching.cmo \ $(TOPDIR)/typing/typejoin.cmo \ $(TOPDIR)/typing/typecore.cmo \ $(TOPDIR)/typing/typedecl.cmo \ @@ -60,6 +59,7 @@ OTHEROBJS=\ $(TOPDIR)/bytecomp/printlambda.cmo \ $(TOPDIR)/bytecomp/typeopt.cmo \ $(TOPDIR)/bytecomp/switch.cmo \ + $(TOPDIR)/bytecomp/joinmatching.cmo \ $(TOPDIR)/bytecomp/matching.cmo \ $(TOPDIR)/bytecomp/translobj.cmo \ $(TOPDIR)/bytecomp/transljoin.cmo \ diff --git a/testsuite/tests/asmcomp/alpha.S b/testsuite/tests/asmcomp/alpha.S index 10e3388637..b63b6c16b2 100644 --- a/testsuite/tests/asmcomp/alpha.S +++ b/testsuite/tests/asmcomp/alpha.S @@ -10,7 +10,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: alpha.S 12858 2012-08-10 14:45:51Z maranget $ */ .globl call_gen_code .ent call_gen_code diff --git a/testsuite/tests/asmcomp/amd64.S b/testsuite/tests/asmcomp/amd64.S index 26db8722a9..cc92ee06fa 100644 --- a/testsuite/tests/asmcomp/amd64.S +++ b/testsuite/tests/asmcomp/amd64.S @@ -10,7 +10,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: amd64.S 12858 2012-08-10 14:45:51Z maranget $ */ #ifdef SYS_macosx #define ALIGN 4 diff --git a/testsuite/tests/asmcomp/arith.cmm b/testsuite/tests/asmcomp/arith.cmm index a8bc613c77..66cf0c15d1 100644 --- a/testsuite/tests/asmcomp/arith.cmm +++ b/testsuite/tests/asmcomp/arith.cmm @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: arith.cmm 12858 2012-08-10 14:45:51Z maranget $ *) (* Regression test for arithmetic instructions *) diff --git a/testsuite/tests/asmcomp/arm.S b/testsuite/tests/asmcomp/arm.S index 0fd1a29fe6..c895882ca1 100644 --- a/testsuite/tests/asmcomp/arm.S +++ b/testsuite/tests/asmcomp/arm.S @@ -10,7 +10,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: arm.S 12858 2012-08-10 14:45:51Z maranget $ */ .text diff --git a/testsuite/tests/asmcomp/checkbound.cmm b/testsuite/tests/asmcomp/checkbound.cmm index c20740c113..154744ab3a 100644 --- a/testsuite/tests/asmcomp/checkbound.cmm +++ b/testsuite/tests/asmcomp/checkbound.cmm @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: checkbound.cmm 12858 2012-08-10 14:45:51Z maranget $ *) (function "checkbound2" (x: int y: int) (checkbound x y)) diff --git a/testsuite/tests/asmcomp/fib.cmm b/testsuite/tests/asmcomp/fib.cmm index d21260448b..1383af9a5d 100644 --- a/testsuite/tests/asmcomp/fib.cmm +++ b/testsuite/tests/asmcomp/fib.cmm @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: fib.cmm 12858 2012-08-10 14:45:51Z maranget $ *) (function "fib" (n: int) (if (< n 2) diff --git a/testsuite/tests/asmcomp/hppa.S b/testsuite/tests/asmcomp/hppa.S index 02f457dc75..67fdd09e46 100644 --- a/testsuite/tests/asmcomp/hppa.S +++ b/testsuite/tests/asmcomp/hppa.S @@ -10,7 +10,7 @@ ;* * ;********************************************************************* -; $Id$ +; $Id: hppa.S 12858 2012-08-10 14:45:51Z maranget $ ; Must be preprocessed by cpp #ifdef SYS_hpux diff --git a/testsuite/tests/asmcomp/i386.S b/testsuite/tests/asmcomp/i386.S index 94e44c773f..b93c415692 100644 --- a/testsuite/tests/asmcomp/i386.S +++ b/testsuite/tests/asmcomp/i386.S @@ -10,7 +10,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: i386.S 12959 2012-09-27 13:12:51Z maranget $ */ /* 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 75ae8ce737..e41c1ac2d3 100644 --- a/testsuite/tests/asmcomp/i386nt.asm +++ b/testsuite/tests/asmcomp/i386nt.asm @@ -10,7 +10,7 @@ ; ;********************************************************************* -; $Id$ +; $Id: i386nt.asm 12858 2012-08-10 14:45:51Z maranget $ .386 .MODEL FLAT diff --git a/testsuite/tests/asmcomp/ia64.S b/testsuite/tests/asmcomp/ia64.S index 028c622f9d..8f6cc1118e 100644 --- a/testsuite/tests/asmcomp/ia64.S +++ b/testsuite/tests/asmcomp/ia64.S @@ -10,7 +10,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: ia64.S 12858 2012-08-10 14:45:51Z maranget $ */ #define ST8OFF(a,b,d) st8 [a] = b, d #define LD8OFF(a,b,d) ld8 a = [b], d diff --git a/testsuite/tests/asmcomp/integr.cmm b/testsuite/tests/asmcomp/integr.cmm index 504bb0db5a..3a92c35924 100644 --- a/testsuite/tests/asmcomp/integr.cmm +++ b/testsuite/tests/asmcomp/integr.cmm @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: integr.cmm 12858 2012-08-10 14:45:51Z maranget $ *) (function "square" (x: float) ( *f x x)) diff --git a/testsuite/tests/asmcomp/lexcmm.mli b/testsuite/tests/asmcomp/lexcmm.mli index a4998ca127..285b7d3ce7 100644 --- a/testsuite/tests/asmcomp/lexcmm.mli +++ b/testsuite/tests/asmcomp/lexcmm.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: lexcmm.mli 12858 2012-08-10 14:45:51Z maranget $ *) val token: Lexing.lexbuf -> Parsecmm.token diff --git a/testsuite/tests/asmcomp/lexcmm.mll b/testsuite/tests/asmcomp/lexcmm.mll index eb2f2c8296..5a29bdaac5 100644 --- a/testsuite/tests/asmcomp/lexcmm.mll +++ b/testsuite/tests/asmcomp/lexcmm.mll @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: lexcmm.mll 12858 2012-08-10 14:45:51Z maranget $ *) { open Parsecmm diff --git a/testsuite/tests/asmcomp/m68k.S b/testsuite/tests/asmcomp/m68k.S index f15ddcbb40..c5b1087ed4 100644 --- a/testsuite/tests/asmcomp/m68k.S +++ b/testsuite/tests/asmcomp/m68k.S @@ -10,7 +10,7 @@ |* * |*********************************************************************** -| $Id$ +| $Id: m68k.S 12858 2012-08-10 14:45:51Z maranget $ | call_gen_code is used with the following types: | unit -> int diff --git a/testsuite/tests/asmcomp/main.c b/testsuite/tests/asmcomp/main.c index 33fd8a98a4..822ba41537 100644 --- a/testsuite/tests/asmcomp/main.c +++ b/testsuite/tests/asmcomp/main.c @@ -10,7 +10,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: main.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stddef.h> #include <stdio.h> diff --git a/testsuite/tests/asmcomp/main.ml b/testsuite/tests/asmcomp/main.ml index 0555daed8d..082333037f 100644 --- a/testsuite/tests/asmcomp/main.ml +++ b/testsuite/tests/asmcomp/main.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: main.ml 12858 2012-08-10 14:45:51Z maranget $ *) open Clflags diff --git a/testsuite/tests/asmcomp/mainarith.c b/testsuite/tests/asmcomp/mainarith.c index a71be4961c..a481d85447 100644 --- a/testsuite/tests/asmcomp/mainarith.c +++ b/testsuite/tests/asmcomp/mainarith.c @@ -10,7 +10,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: mainarith.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> #include <math.h> diff --git a/testsuite/tests/asmcomp/mips.s b/testsuite/tests/asmcomp/mips.s index ec6931bf71..c52c4cecad 100644 --- a/testsuite/tests/asmcomp/mips.s +++ b/testsuite/tests/asmcomp/mips.s @@ -10,7 +10,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: mips.s 12858 2012-08-10 14:45:51Z maranget $ */ .globl call_gen_code .ent call_gen_code diff --git a/testsuite/tests/asmcomp/parsecmmaux.ml b/testsuite/tests/asmcomp/parsecmmaux.ml index 5aa2ea05b5..73c9f64f0e 100644 --- a/testsuite/tests/asmcomp/parsecmmaux.ml +++ b/testsuite/tests/asmcomp/parsecmmaux.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: parsecmmaux.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Auxiliary functions for parsing *) diff --git a/testsuite/tests/asmcomp/parsecmmaux.mli b/testsuite/tests/asmcomp/parsecmmaux.mli index d488db1f5d..85c997674b 100644 --- a/testsuite/tests/asmcomp/parsecmmaux.mli +++ b/testsuite/tests/asmcomp/parsecmmaux.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: parsecmmaux.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Auxiliary functions for parsing *) diff --git a/testsuite/tests/asmcomp/power-aix.S b/testsuite/tests/asmcomp/power-aix.S index 0752100f59..f5dd423264 100644 --- a/testsuite/tests/asmcomp/power-aix.S +++ b/testsuite/tests/asmcomp/power-aix.S @@ -10,7 +10,7 @@ #* * #********************************************************************* -# $Id$ +# $Id: power-aix.S 12858 2012-08-10 14:45:51Z maranget $ .csect .text[PR] diff --git a/testsuite/tests/asmcomp/power-elf.S b/testsuite/tests/asmcomp/power-elf.S index 7fee4aa1bf..0bf67842a8 100644 --- a/testsuite/tests/asmcomp/power-elf.S +++ b/testsuite/tests/asmcomp/power-elf.S @@ -10,7 +10,7 @@ /* */ /*********************************************************************/ -/* $Id$ */ +/* $Id: power-elf.S 12858 2012-08-10 14:45:51Z maranget $ */ /* Save and restore all callee-save registers */ /* GPR 14 at sp+16 ... GPR 31 at sp+84 diff --git a/testsuite/tests/asmcomp/power-rhapsody.S b/testsuite/tests/asmcomp/power-rhapsody.S index 06788a8c47..9a1e3bfbea 100644 --- a/testsuite/tests/asmcomp/power-rhapsody.S +++ b/testsuite/tests/asmcomp/power-rhapsody.S @@ -10,7 +10,7 @@ /* */ /*********************************************************************/ -/* $Id$ */ +/* $Id: power-rhapsody.S 12858 2012-08-10 14:45:51Z maranget $ */ /* Save and restore all callee-save registers */ /* GPR 14 at sp+16 ... GPR 31 at sp+84 diff --git a/testsuite/tests/asmcomp/quicksort.cmm b/testsuite/tests/asmcomp/quicksort.cmm index 21b1add570..088371c1c2 100644 --- a/testsuite/tests/asmcomp/quicksort.cmm +++ b/testsuite/tests/asmcomp/quicksort.cmm @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: quicksort.cmm 12858 2012-08-10 14:45:51Z maranget $ *) (function "quicksort" (lo: int hi: int a: addr) (if (< lo hi) diff --git a/testsuite/tests/asmcomp/quicksort2.cmm b/testsuite/tests/asmcomp/quicksort2.cmm index 08988573af..ef86635393 100644 --- a/testsuite/tests/asmcomp/quicksort2.cmm +++ b/testsuite/tests/asmcomp/quicksort2.cmm @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: quicksort2.cmm 12858 2012-08-10 14:45:51Z maranget $ *) (function "cmp" (i: int j: int) (- i j)) diff --git a/testsuite/tests/asmcomp/soli.cmm b/testsuite/tests/asmcomp/soli.cmm index af4d39fc6a..1bab79c292 100644 --- a/testsuite/tests/asmcomp/soli.cmm +++ b/testsuite/tests/asmcomp/soli.cmm @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: soli.cmm 12858 2012-08-10 14:45:51Z maranget $ *) ("d1": int 0 int 1 "d2": int 1 int 0 diff --git a/testsuite/tests/asmcomp/sparc.S b/testsuite/tests/asmcomp/sparc.S index 362c6f1355..1711d37cb5 100644 --- a/testsuite/tests/asmcomp/sparc.S +++ b/testsuite/tests/asmcomp/sparc.S @@ -10,7 +10,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: sparc.S 12959 2012-09-27 13:12:51Z maranget $ */ #if defined(SYS_solaris) || defined(SYS_elf) #define Call_gen_code _call_gen_code diff --git a/testsuite/tests/asmcomp/tagged-fib.cmm b/testsuite/tests/asmcomp/tagged-fib.cmm index 5ee234d9ff..2da64d5226 100644 --- a/testsuite/tests/asmcomp/tagged-fib.cmm +++ b/testsuite/tests/asmcomp/tagged-fib.cmm @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: tagged-fib.cmm 12858 2012-08-10 14:45:51Z maranget $ *) (function "fib" (n: int) (if (< n 5) diff --git a/testsuite/tests/asmcomp/tagged-integr.cmm b/testsuite/tests/asmcomp/tagged-integr.cmm index 6f7562878e..2214ed41b4 100644 --- a/testsuite/tests/asmcomp/tagged-integr.cmm +++ b/testsuite/tests/asmcomp/tagged-integr.cmm @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: tagged-integr.cmm 12858 2012-08-10 14:45:51Z maranget $ *) ("res_square": skip 8) ("h": skip 8) diff --git a/testsuite/tests/asmcomp/tagged-quicksort.cmm b/testsuite/tests/asmcomp/tagged-quicksort.cmm index 73fca10171..c0080b8fc5 100644 --- a/testsuite/tests/asmcomp/tagged-quicksort.cmm +++ b/testsuite/tests/asmcomp/tagged-quicksort.cmm @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: tagged-quicksort.cmm 12858 2012-08-10 14:45:51Z maranget $ *) (function "quick" (lo: int hi: int a: addr) (if (< lo hi) diff --git a/testsuite/tests/asmcomp/tagged-tak.cmm b/testsuite/tests/asmcomp/tagged-tak.cmm index 2bda22385e..3588045277 100644 --- a/testsuite/tests/asmcomp/tagged-tak.cmm +++ b/testsuite/tests/asmcomp/tagged-tak.cmm @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: tagged-tak.cmm 12858 2012-08-10 14:45:51Z maranget $ *) (function "tak" (x:int y:int z:int) (if (> x y) diff --git a/testsuite/tests/asmcomp/tak.cmm b/testsuite/tests/asmcomp/tak.cmm index 26bbd96817..8cf5aedabf 100644 --- a/testsuite/tests/asmcomp/tak.cmm +++ b/testsuite/tests/asmcomp/tak.cmm @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: tak.cmm 12858 2012-08-10 14:45:51Z maranget $ *) (function "tak" (x:int y:int z:int) (if (> x y) diff --git a/testsuite/tests/basic-more/tformat.ml b/testsuite/tests/basic-more/tformat.ml index 77d30ac34d..c710384c8b 100644 --- a/testsuite/tests/basic-more/tformat.ml +++ b/testsuite/tests/basic-more/tformat.ml @@ -10,7 +10,7 @@ (* *) (*************************************************************************) -(* $Id$ +(* $Id: tformat.ml 12858 2012-08-10 14:45:51Z maranget $ A testbed file for the module Format. diff --git a/testsuite/tests/basic/maps.ml b/testsuite/tests/basic/maps.ml index ffbaa041cb..be0912fe35 100644 --- a/testsuite/tests/basic/maps.ml +++ b/testsuite/tests/basic/maps.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: maps.ml 12858 2012-08-10 14:45:51Z maranget $ *) module IntMap = Map.Make(struct type t = int let compare x y = x-y end) diff --git a/testsuite/tests/basic/sets.ml b/testsuite/tests/basic/sets.ml index f2fa158c38..c48d170ebd 100644 --- a/testsuite/tests/basic/sets.ml +++ b/testsuite/tests/basic/sets.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: sets.ml 12858 2012-08-10 14:45:51Z maranget $ *) module IntSet = Set.Make(struct type t = int let compare x y = x-y end) diff --git a/testsuite/tests/lib-dynlink-bytecode/Makefile b/testsuite/tests/lib-dynlink-bytecode/Makefile index 53e9f4692f..45deeaf6c4 100644 --- a/testsuite/tests/lib-dynlink-bytecode/Makefile +++ b/testsuite/tests/lib-dynlink-bytecode/Makefile @@ -14,7 +14,7 @@ compile: done @$(OCAMLC) -c main.ml @$(OCAMLC) -o main dynlink.cma registry.cmo main.cmo - @$(OCAMLC) -o static -linkall registry.cmo plug1.cma plug2.cma -use-runtime $(PREFIX)/bin/ocamlrun + @$(OCAMLC) -o static -linkall registry.cmo plug1.cma plug2.cma -use-runtime $(PREFIX)/bin/jocamlrun @$(OCAMLC) -o custom -custom -linkall registry.cmo plug2.cma plug1.cma -I . run: diff --git a/testsuite/tests/misc-kb/equations.ml b/testsuite/tests/misc-kb/equations.ml index 5617bc4f9d..55df22d1b0 100644 --- a/testsuite/tests/misc-kb/equations.ml +++ b/testsuite/tests/misc-kb/equations.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: equations.ml 12858 2012-08-10 14:45:51Z maranget $ *) (****************** Equation manipulations *************) diff --git a/testsuite/tests/misc-kb/equations.mli b/testsuite/tests/misc-kb/equations.mli index 0db190b858..dc5c755194 100644 --- a/testsuite/tests/misc-kb/equations.mli +++ b/testsuite/tests/misc-kb/equations.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: equations.mli 12858 2012-08-10 14:45:51Z maranget $ *) open Terms diff --git a/testsuite/tests/misc-kb/kb.ml b/testsuite/tests/misc-kb/kb.ml index ff357b3ff8..4eb458105f 100644 --- a/testsuite/tests/misc-kb/kb.ml +++ b/testsuite/tests/misc-kb/kb.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: kb.ml 12858 2012-08-10 14:45:51Z maranget $ *) open Terms open Equations diff --git a/testsuite/tests/misc-kb/kb.mli b/testsuite/tests/misc-kb/kb.mli index 27aa2e9862..75f2bd1762 100644 --- a/testsuite/tests/misc-kb/kb.mli +++ b/testsuite/tests/misc-kb/kb.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: kb.mli 12858 2012-08-10 14:45:51Z maranget $ *) open Terms open Equations diff --git a/testsuite/tests/misc-kb/kbmain.ml b/testsuite/tests/misc-kb/kbmain.ml index 580b715040..8ce78f6445 100644 --- a/testsuite/tests/misc-kb/kbmain.ml +++ b/testsuite/tests/misc-kb/kbmain.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: kbmain.ml 12858 2012-08-10 14:45:51Z maranget $ *) open Terms open Equations diff --git a/testsuite/tests/misc-kb/orderings.ml b/testsuite/tests/misc-kb/orderings.ml index c81746e309..bb5b8fade1 100644 --- a/testsuite/tests/misc-kb/orderings.ml +++ b/testsuite/tests/misc-kb/orderings.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: orderings.ml 12858 2012-08-10 14:45:51Z maranget $ *) (*********************** Recursive Path Ordering ****************************) diff --git a/testsuite/tests/misc-kb/orderings.mli b/testsuite/tests/misc-kb/orderings.mli index bb44f0832d..e68746e01f 100644 --- a/testsuite/tests/misc-kb/orderings.mli +++ b/testsuite/tests/misc-kb/orderings.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: orderings.mli 12858 2012-08-10 14:45:51Z maranget $ *) open Terms diff --git a/testsuite/tests/misc-kb/terms.ml b/testsuite/tests/misc-kb/terms.ml index 86604f9c5a..8da0791729 100644 --- a/testsuite/tests/misc-kb/terms.ml +++ b/testsuite/tests/misc-kb/terms.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: terms.ml 12858 2012-08-10 14:45:51Z maranget $ *) (****************** Term manipulations *****************) diff --git a/testsuite/tests/misc-kb/terms.mli b/testsuite/tests/misc-kb/terms.mli index 0f6be4c8e8..f05886ad76 100644 --- a/testsuite/tests/misc-kb/terms.mli +++ b/testsuite/tests/misc-kb/terms.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: terms.mli 12858 2012-08-10 14:45:51Z maranget $ *) type term = Var of int diff --git a/testsuite/tests/misc-unsafe/almabench.ml b/testsuite/tests/misc-unsafe/almabench.ml index 73293e9ad9..b5e40f72b4 100644 --- a/testsuite/tests/misc-unsafe/almabench.ml +++ b/testsuite/tests/misc-unsafe/almabench.ml @@ -235,7 +235,7 @@ let planetpv epoch np pv = let dae = ref ((am -. !ae +. de *. sin !ae) /. (1.0 -. de *. cos !ae)) in ae := !ae +. !dae; incr k; - while !k < 10 or abs_float !dae >= 1e-12 do + while !k < 10 || abs_float !dae >= 1e-12 do dae := (am -. !ae +. de *. sin !ae) /. (1.0 -. de *. cos !ae); ae := !ae +. !dae; incr k diff --git a/testsuite/tests/misc-unsafe/fft.ml b/testsuite/tests/misc-unsafe/fft.ml index f0a2ed3289..53f2da3993 100644 --- a/testsuite/tests/misc-unsafe/fft.ml +++ b/testsuite/tests/misc-unsafe/fft.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: fft.ml 12858 2012-08-10 14:45:51Z maranget $ *) let pi = 3.14159265358979323846 diff --git a/testsuite/tests/misc/bdd.ml b/testsuite/tests/misc/bdd.ml index b2a3d70599..89c1494726 100644 --- a/testsuite/tests/misc/bdd.ml +++ b/testsuite/tests/misc/bdd.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: bdd.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* 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 4f4e081300..c79ae85a1f 100644 --- a/testsuite/tests/misc/boyer.ml +++ b/testsuite/tests/misc/boyer.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: boyer.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Manipulations over terms *) diff --git a/testsuite/tests/misc/fib.ml b/testsuite/tests/misc/fib.ml index 4160004ea4..3bb3150fea 100644 --- a/testsuite/tests/misc/fib.ml +++ b/testsuite/tests/misc/fib.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: fib.ml 12858 2012-08-10 14:45:51Z maranget $ *) 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 872454401c..308139e85e 100644 --- a/testsuite/tests/misc/hamming.ml +++ b/testsuite/tests/misc/hamming.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: hamming.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* 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 b35360a882..6677c52566 100644 --- a/testsuite/tests/misc/nucleic.ml +++ b/testsuite/tests/misc/nucleic.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: nucleic.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Use floating-point arithmetic *) diff --git a/testsuite/tests/misc/sieve.ml b/testsuite/tests/misc/sieve.ml index 7f0295bb67..6517084572 100644 --- a/testsuite/tests/misc/sieve.ml +++ b/testsuite/tests/misc/sieve.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: sieve.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Eratosthene's sieve *) diff --git a/testsuite/tests/misc/sorts.ml b/testsuite/tests/misc/sorts.ml index 7ae00beff9..4da690db02 100644 --- a/testsuite/tests/misc/sorts.ml +++ b/testsuite/tests/misc/sorts.ml @@ -4476,4 +4476,4 @@ let main () = if not !Sys.interactive then Printexc.catch main ();; -(* $Id$ *) +(* $Id: sorts.ml 12845 2012-08-09 12:54:45Z maranget $ *) diff --git a/testsuite/tests/misc/takc.ml b/testsuite/tests/misc/takc.ml index 8f9400ebdf..8244ee9cf1 100644 --- a/testsuite/tests/misc/takc.ml +++ b/testsuite/tests/misc/takc.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: takc.ml 12858 2012-08-10 14:45:51Z maranget $ *) 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) diff --git a/testsuite/tests/misc/weaktest.ml b/testsuite/tests/misc/weaktest.ml index 92ab5576d3..e68d667d12 100644 --- a/testsuite/tests/misc/weaktest.ml +++ b/testsuite/tests/misc/weaktest.ml @@ -1,4 +1,4 @@ -(* $Id$ *) +(* $Id: weaktest.ml 12845 2012-08-09 12:54:45Z maranget $ *) let debug = false;; diff --git a/testsuite/tests/tool-lexyacc/gram_aux.ml b/testsuite/tests/tool-lexyacc/gram_aux.ml index c00fa9bfe1..575ee23382 100644 --- a/testsuite/tests/tool-lexyacc/gram_aux.ml +++ b/testsuite/tests/tool-lexyacc/gram_aux.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: gram_aux.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Auxiliaries for the parser. *) diff --git a/testsuite/tests/tool-lexyacc/input b/testsuite/tests/tool-lexyacc/input index b6fdfee8df..97ed37f1c9 100644 --- a/testsuite/tests/tool-lexyacc/input +++ b/testsuite/tests/tool-lexyacc/input @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: input 12858 2012-08-10 14:45:51Z maranget $ *) (* The lexical analyzer for lexer definitions. *) diff --git a/testsuite/tests/tool-lexyacc/main.ml b/testsuite/tests/tool-lexyacc/main.ml index a9337d4b9b..dfce4e166b 100644 --- a/testsuite/tests/tool-lexyacc/main.ml +++ b/testsuite/tests/tool-lexyacc/main.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: main.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* The lexer generator. Command-line parsing. *) diff --git a/testsuite/tests/tool-lexyacc/scanner.mll b/testsuite/tests/tool-lexyacc/scanner.mll index f791feaf24..5932ccc6e7 100644 --- a/testsuite/tests/tool-lexyacc/scanner.mll +++ b/testsuite/tests/tool-lexyacc/scanner.mll @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: scanner.mll 12858 2012-08-10 14:45:51Z maranget $ *) (* The lexical analyzer for lexer definitions. *) diff --git a/testsuite/tests/tool-lexyacc/syntax.ml b/testsuite/tests/tool-lexyacc/syntax.ml index e2ff025eee..f315a77a46 100644 --- a/testsuite/tests/tool-lexyacc/syntax.ml +++ b/testsuite/tests/tool-lexyacc/syntax.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: syntax.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* The shallow abstract syntax *) diff --git a/testsuite/tests/tool-ocaml/lib.ml b/testsuite/tests/tool-ocaml/lib.ml index 557fc04ad2..e0c3017356 100644 --- a/testsuite/tests/tool-ocaml/lib.ml +++ b/testsuite/tests/tool-ocaml/lib.ml @@ -1,4 +1,4 @@ -(* file $Id$ *) +(* file $Id: lib.ml 12845 2012-08-09 12:54:45Z maranget $ *) external raise : exn -> 'a = "%raise" @@ -43,4 +43,4 @@ external weak_get: 'a weak_t -> int -> 'a option = "caml_weak_get";; let x = 42;; -(* eof $Id$ *) +(* eof $Id: lib.ml 12845 2012-08-09 12:54:45Z maranget $ *) diff --git a/testsuite/tests/tool-ocaml/t301-object.ml b/testsuite/tests/tool-ocaml/t301-object.ml index 5b053c0064..81964dae60 100644 --- a/testsuite/tests/tool-ocaml/t301-object.ml +++ b/testsuite/tests/tool-ocaml/t301-object.ml @@ -7,7 +7,7 @@ ocamlc -nostdlib -I ../../stdlib \ t301-object.ml -o t301-object.byte ***) -(* $Id$ *) +(* $Id: t301-object.ml 12845 2012-08-09 12:54:45Z maranget $ *) class c = object (self) @@ -26,4 +26,4 @@ let (x,y,z) = f () in if y <> 2 then raise Not_found; if z <> 4 then raise Not_found;; -(**** eof $Id$ *) +(**** eof $Id: t301-object.ml 12845 2012-08-09 12:54:45Z maranget $ *) diff --git a/tools/Makefile b/tools/Makefile index da87fa99e5..852f2f4682 100644 --- a/tools/Makefile +++ b/tools/Makefile @@ -10,7 +10,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile 12858 2012-08-10 14:45:51Z maranget $ include Makefile.shared diff --git a/tools/Makefile.nt b/tools/Makefile.nt index dd35b726c4..a85d912f65 100644 --- a/tools/Makefile.nt +++ b/tools/Makefile.nt @@ -10,7 +10,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile.nt 12858 2012-08-10 14:45:51Z maranget $ include Makefile.shared diff --git a/tools/addlabels.ml b/tools/addlabels.ml index 91ce7930d8..83271eab53 100644 --- a/tools/addlabels.ml +++ b/tools/addlabels.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: addlabels.ml 12959 2012-09-27 13:12:51Z maranget $ *) open StdLabels open Asttypes diff --git a/tools/checkstack.c b/tools/checkstack.c index 9289c678ca..bcfbc0c503 100644 --- a/tools/checkstack.c +++ b/tools/checkstack.c @@ -10,7 +10,7 @@ /* */ /***********************************************************************/ -/* $Id$ */ +/* $Id: checkstack.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <stdio.h> #include <stdlib.h> diff --git a/tools/cvt_emit.mll b/tools/cvt_emit.mll index eabd1baf1a..996f9e9e5b 100644 --- a/tools/cvt_emit.mll +++ b/tools/cvt_emit.mll @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: cvt_emit.mll 12858 2012-08-10 14:45:51Z maranget $ *) { let first_item = ref false diff --git a/tools/dumpobj.ml b/tools/dumpobj.ml index 5a40cfc395..5c7f1f5e6d 100644 --- a/tools/dumpobj.ml +++ b/tools/dumpobj.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: dumpobj.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Disassembler for executable and .cmo object files *) diff --git a/tools/lexer299.mll b/tools/lexer299.mll index 38241af0a5..7cbf719d13 100644 --- a/tools/lexer299.mll +++ b/tools/lexer299.mll @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: lexer299.mll 12858 2012-08-10 14:45:51Z maranget $ *) (* The lexer definition *) diff --git a/tools/lexer301.mll b/tools/lexer301.mll index 4548de57e9..513e8ec7a7 100644 --- a/tools/lexer301.mll +++ b/tools/lexer301.mll @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: lexer301.mll 12858 2012-08-10 14:45:51Z maranget $ *) (* The lexer definition *) diff --git a/tools/objinfo.ml b/tools/objinfo.ml index 1e0a38e108..0b8c85d86f 100644 --- a/tools/objinfo.ml +++ b/tools/objinfo.ml @@ -13,7 +13,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: objinfo.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Dump info on .cmi, .cmo, .cmx, .cma, .cmxa, .cmxs files and on bytecode executables. *) diff --git a/tools/ocaml299to3.ml b/tools/ocaml299to3.ml index fb66c7616c..192790f184 100644 --- a/tools/ocaml299to3.ml +++ b/tools/ocaml299to3.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: ocaml299to3.ml 12858 2012-08-10 14:45:51Z maranget $ *) open Lexer299 diff --git a/tools/ocamlmktop.ml b/tools/ocamlmktop.ml index be1eddd739..261536115a 100644 --- a/tools/ocamlmktop.ml +++ b/tools/ocamlmktop.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: ocamlmktop.ml 12959 2012-09-27 13:12:51Z maranget $ *) let _ = let args = Ccomp.quote_files (List.tl (Array.to_list Sys.argv)) in diff --git a/tools/ocamlprof.ml b/tools/ocamlprof.ml index df2b569cb3..0895ec2713 100644 --- a/tools/ocamlprof.ml +++ b/tools/ocamlprof.ml @@ -11,7 +11,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: ocamlprof.ml 12959 2012-09-27 13:12:51Z maranget $ *) open Printf diff --git a/tools/primreq.ml b/tools/primreq.ml index c1764f5df6..fe0e1d4af2 100644 --- a/tools/primreq.ml +++ b/tools/primreq.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: primreq.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* 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 06c9761094..706006413b 100644 --- a/tools/profiling.ml +++ b/tools/profiling.ml @@ -12,7 +12,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: profiling.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Run-time library for profiled programs *) diff --git a/tools/profiling.mli b/tools/profiling.mli index 61be2be760..0a6d6f5683 100644 --- a/tools/profiling.mli +++ b/tools/profiling.mli @@ -12,7 +12,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: profiling.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Run-time library for profiled programs *) diff --git a/tools/scrapelabels.ml b/tools/scrapelabels.ml index 3d8ab032c7..22eb2ac59a 100644 --- a/tools/scrapelabels.ml +++ b/tools/scrapelabels.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: scrapelabels.ml 12858 2012-08-10 14:45:51Z maranget $ *) open StdLabels open Lexer301 diff --git a/toplevel/genprintval.ml b/toplevel/genprintval.ml index a8eed6b006..32791aad07 100644 --- a/toplevel/genprintval.ml +++ b/toplevel/genprintval.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: genprintval.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* To print values *) diff --git a/toplevel/genprintval.mli b/toplevel/genprintval.mli index a98ef3d1c0..f482d8e65d 100644 --- a/toplevel/genprintval.mli +++ b/toplevel/genprintval.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: genprintval.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Printing of values *) diff --git a/toplevel/opttopdirs.mli b/toplevel/opttopdirs.mli index 9a8573e57d..0d01cccd03 100644 --- a/toplevel/opttopdirs.mli +++ b/toplevel/opttopdirs.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: opttopdirs.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* The toplevel directives. *) diff --git a/toplevel/opttoploop.ml b/toplevel/opttoploop.ml index 8d83908d00..ad97c090f3 100644 --- a/toplevel/opttoploop.ml +++ b/toplevel/opttoploop.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: opttoploop.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* The interactive toplevel loop *) diff --git a/toplevel/opttoploop.mli b/toplevel/opttoploop.mli index cdd32de121..acb767ad82 100644 --- a/toplevel/opttoploop.mli +++ b/toplevel/opttoploop.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: opttoploop.mli 12858 2012-08-10 14:45:51Z maranget $ *) open Format diff --git a/toplevel/opttopmain.ml b/toplevel/opttopmain.ml index ac32a5c108..b1e0ce9dfc 100644 --- a/toplevel/opttopmain.ml +++ b/toplevel/opttopmain.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: opttopmain.ml 12858 2012-08-10 14:45:51Z maranget $ *) open Clflags diff --git a/toplevel/opttopmain.mli b/toplevel/opttopmain.mli index 61747d892f..db2a7da687 100644 --- a/toplevel/opttopmain.mli +++ b/toplevel/opttopmain.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: opttopmain.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Start the [ocaml] toplevel loop *) diff --git a/toplevel/opttopstart.ml b/toplevel/opttopstart.ml index db279940ec..f8de89b6f7 100644 --- a/toplevel/opttopstart.ml +++ b/toplevel/opttopstart.ml @@ -10,6 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: opttopstart.ml 12858 2012-08-10 14:45:51Z maranget $ *) let _ = Opttopmain.main() diff --git a/toplevel/topdirs.mli b/toplevel/topdirs.mli index 266efccfef..95b209b825 100644 --- a/toplevel/topdirs.mli +++ b/toplevel/topdirs.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: topdirs.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* The toplevel directives. *) diff --git a/toplevel/toploop.mli b/toplevel/toploop.mli index e9afb5a0df..eb9f7385ed 100644 --- a/toplevel/toploop.mli +++ b/toplevel/toploop.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: toploop.mli 12858 2012-08-10 14:45:51Z maranget $ *) open Format diff --git a/toplevel/topmain.mli b/toplevel/topmain.mli index 61747d892f..0feb4add8d 100644 --- a/toplevel/topmain.mli +++ b/toplevel/topmain.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: topmain.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Start the [ocaml] toplevel loop *) diff --git a/toplevel/topstart.ml b/toplevel/topstart.ml index 823b4c813a..973dbf6848 100644 --- a/toplevel/topstart.ml +++ b/toplevel/topstart.ml @@ -10,6 +10,6 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: topstart.ml 12858 2012-08-10 14:45:51Z maranget $ *) let _ = Topmain.main() diff --git a/toplevel/trace.ml b/toplevel/trace.ml index 104f39fe4b..eef9f0ebbe 100644 --- a/toplevel/trace.ml +++ b/toplevel/trace.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: trace.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* The "trace" facility *) diff --git a/typing/annot.mli b/typing/annot.mli index 934438194e..f783c43415 100644 --- a/typing/annot.mli +++ b/typing/annot.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: annot.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Data types for annotations (Stypes.ml) *) diff --git a/typing/btype.ml b/typing/btype.ml index 0e864e00d5..6cebb7ee28 100644 --- a/typing/btype.ml +++ b/typing/btype.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: btype.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Basic operations on core types *) diff --git a/typing/btype.mli b/typing/btype.mli index ddb34a8fb7..a432315c28 100644 --- a/typing/btype.mli +++ b/typing/btype.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: btype.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Basic operations on core types *) diff --git a/typing/ctype.mli b/typing/ctype.mli index 790cd5367e..72d3ef3efa 100644 --- a/typing/ctype.mli +++ b/typing/ctype.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: ctype.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Operations on core types *) diff --git a/typing/datarepr.mli b/typing/datarepr.mli index 527fecb573..5e6e122efd 100644 --- a/typing/datarepr.mli +++ b/typing/datarepr.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: datarepr.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Compute constructor and label descriptions from type declarations, determining their representation. *) diff --git a/typing/ident.ml b/typing/ident.ml index 32d0c49660..e8a8afc669 100644 --- a/typing/ident.ml +++ b/typing/ident.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: ident.ml 12858 2012-08-10 14:45:51Z maranget $ *) open Format diff --git a/typing/ident.mli b/typing/ident.mli index 715c70a0d8..82f077a1ab 100644 --- a/typing/ident.mli +++ b/typing/ident.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: ident.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Identifiers (unique names) *) diff --git a/typing/includeclass.ml b/typing/includeclass.ml index 8dc35115ea..09a598f453 100644 --- a/typing/includeclass.ml +++ b/typing/includeclass.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: includeclass.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Inclusion checks for the class language *) diff --git a/typing/includeclass.mli b/typing/includeclass.mli index 27784e9600..384bd79bad 100644 --- a/typing/includeclass.mli +++ b/typing/includeclass.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: includeclass.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Inclusion checks for the class language *) diff --git a/typing/includecore.mli b/typing/includecore.mli index 8ddfcb1631..79e58118f5 100644 --- a/typing/includecore.mli +++ b/typing/includecore.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: includecore.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Inclusion checks for the core language *) diff --git a/typing/includemod.ml b/typing/includemod.ml index 367938a920..e2e14fc9eb 100644 --- a/typing/includemod.ml +++ b/typing/includemod.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: includemod.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Inclusion checks for the module language *) diff --git a/typing/includemod.mli b/typing/includemod.mli index c060a580a8..7acdfb1410 100644 --- a/typing/includemod.mli +++ b/typing/includemod.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: includemod.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Inclusion checks for the module language *) diff --git a/typing/mtype.ml b/typing/mtype.ml index cda8186db5..620e76b8cd 100644 --- a/typing/mtype.ml +++ b/typing/mtype.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: mtype.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Operations on module types *) diff --git a/typing/mtype.mli b/typing/mtype.mli index a24756dc08..3115e29da5 100644 --- a/typing/mtype.mli +++ b/typing/mtype.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: mtype.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Operations on module types *) diff --git a/typing/oprint.mli b/typing/oprint.mli index 5724355b85..cd6365923e 100644 --- a/typing/oprint.mli +++ b/typing/oprint.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: oprint.mli 12858 2012-08-10 14:45:51Z maranget $ *) open Format open Outcometree diff --git a/typing/outcometree.mli b/typing/outcometree.mli index 0d336f59b0..b0fa897343 100644 --- a/typing/outcometree.mli +++ b/typing/outcometree.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: outcometree.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Module [Outcometree]: results displayed by the toplevel *) diff --git a/typing/parmatch.mli b/typing/parmatch.mli index cd5ca99688..445461368a 100644 --- a/typing/parmatch.mli +++ b/typing/parmatch.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: parmatch.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Detection of partial matches and unused match cases. *) open Asttypes diff --git a/typing/path.ml b/typing/path.ml index 7dc821a1e3..95e28b40f7 100644 --- a/typing/path.ml +++ b/typing/path.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: path.ml 12858 2012-08-10 14:45:51Z maranget $ *) type t = Pident of Ident.t diff --git a/typing/path.mli b/typing/path.mli index 6e0df26d46..8178012260 100644 --- a/typing/path.mli +++ b/typing/path.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: path.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Access paths *) diff --git a/typing/predef.ml b/typing/predef.ml index 2f06520b7a..74e8a6cbeb 100644 --- a/typing/predef.ml +++ b/typing/predef.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: predef.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Predefined type constructors (with special typing rules in typecore) *) diff --git a/typing/predef.mli b/typing/predef.mli index cedcf88915..7e4c53396d 100644 --- a/typing/predef.mli +++ b/typing/predef.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: predef.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Predefined type constructors (with special typing rules in typecore) *) diff --git a/typing/primitive.ml b/typing/primitive.ml index a5c3765967..e0b622607b 100644 --- a/typing/primitive.ml +++ b/typing/primitive.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: primitive.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Description of primitive functions *) diff --git a/typing/primitive.mli b/typing/primitive.mli index 0b48079a82..b47dd75233 100644 --- a/typing/primitive.mli +++ b/typing/primitive.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: primitive.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Description of primitive functions *) diff --git a/typing/printtyp.ml b/typing/printtyp.ml index 6e7184e892..a30e70a912 100644 --- a/typing/printtyp.ml +++ b/typing/printtyp.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printtyp.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Printing functions *) diff --git a/typing/printtyp.mli b/typing/printtyp.mli index b546670303..7194a98f56 100644 --- a/typing/printtyp.mli +++ b/typing/printtyp.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: printtyp.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Printing functions *) diff --git a/typing/stypes.ml b/typing/stypes.ml index 158062f21e..b7c138f26d 100644 --- a/typing/stypes.ml +++ b/typing/stypes.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: stypes.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Recording and dumping (partial) type information *) diff --git a/typing/stypes.mli b/typing/stypes.mli index c51c45e252..890cf27691 100644 --- a/typing/stypes.mli +++ b/typing/stypes.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: stypes.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Recording and dumping (partial) type information *) diff --git a/typing/subst.mli b/typing/subst.mli index b5e2008293..03d8273b94 100644 --- a/typing/subst.mli +++ b/typing/subst.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: subst.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Substitutions *) diff --git a/typing/typeclass.mli b/typing/typeclass.mli index 3329a8206f..2077ff373d 100644 --- a/typing/typeclass.mli +++ b/typing/typeclass.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: typeclass.mli 12959 2012-09-27 13:12:51Z maranget $ *) open Asttypes open Types diff --git a/typing/typecore.mli b/typing/typecore.mli index bc22d4c1be..50525a3543 100644 --- a/typing/typecore.mli +++ b/typing/typecore.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: typecore.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Type inference for the core language *) diff --git a/typing/typedecl.mli b/typing/typedecl.mli index 16cf7b9043..630e89b633 100644 --- a/typing/typedecl.mli +++ b/typing/typedecl.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: typedecl.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Typing of type definitions and primitive definitions *) diff --git a/typing/typedtree.mli b/typing/typedtree.mli index 7c9225b652..677924099e 100644 --- a/typing/typedtree.mli +++ b/typing/typedtree.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: typedtree.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Abstract syntax tree after typing *) diff --git a/typing/typemod.ml b/typing/typemod.ml index 669bd0f34b..4ad53a9a1a 100644 --- a/typing/typemod.ml +++ b/typing/typemod.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: typemod.ml 12959 2012-09-27 13:12:51Z maranget $ *) open Misc open Longident diff --git a/typing/typemod.mli b/typing/typemod.mli index c339825d99..4d24400706 100644 --- a/typing/typemod.mli +++ b/typing/typemod.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: typemod.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Type-checking of the module language *) diff --git a/typing/types.mli b/typing/types.mli index 4441c91ebf..66e982f83c 100644 --- a/typing/types.mli +++ b/typing/types.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: types.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Representation of types and declarations *) diff --git a/typing/typetexp.mli b/typing/typetexp.mli index 0b6d09d30f..bca8d5a916 100644 --- a/typing/typetexp.mli +++ b/typing/typetexp.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: typetexp.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* Typechecking of type expressions for the core language *) diff --git a/utils/ccomp.mli b/utils/ccomp.mli index 687c701fa7..66739d2bf9 100644 --- a/utils/ccomp.mli +++ b/utils/ccomp.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: ccomp.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Compiling C files and building C libraries *) diff --git a/utils/config.mlbuild b/utils/config.mlbuild index 06fc7da2b5..2ef41e9716 100644 --- a/utils/config.mlbuild +++ b/utils/config.mlbuild @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: config.mlbuild 12959 2012-09-27 13:12:51Z maranget $ *) (***********************************************************************) (** **) diff --git a/utils/config.mli b/utils/config.mli index 47cc3cd56b..f8bfec96db 100644 --- a/utils/config.mli +++ b/utils/config.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: config.mli 12959 2012-09-27 13:12:51Z maranget $ *) (* System configuration *) diff --git a/utils/config.mlp b/utils/config.mlp index 1120cd7052..d9ef859cf1 100644 --- a/utils/config.mlp +++ b/utils/config.mlp @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: config.mlp 12959 2012-09-27 13:12:51Z maranget $ *) (***********************************************************************) (** **) diff --git a/utils/consistbl.mli b/utils/consistbl.mli index a877733b5e..a731567126 100644 --- a/utils/consistbl.mli +++ b/utils/consistbl.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: consistbl.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* Consistency tables: for checking consistency of module CRCs *) diff --git a/utils/misc.ml b/utils/misc.ml index ae3228f233..02faa7ac91 100644 --- a/utils/misc.ml +++ b/utils/misc.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: misc.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* Errors *) diff --git a/utils/tbl.ml b/utils/tbl.ml index 63c133a205..80f2ce782a 100644 --- a/utils/tbl.ml +++ b/utils/tbl.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: tbl.ml 12858 2012-08-10 14:45:51Z maranget $ *) type ('a, 'b) t = Empty diff --git a/utils/tbl.mli b/utils/tbl.mli index 626fd4c132..68948eeb9d 100644 --- a/utils/tbl.mli +++ b/utils/tbl.mli @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: tbl.mli 12858 2012-08-10 14:45:51Z maranget $ *) (* 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 4619ac61c6..d0c086587a 100644 --- a/utils/terminfo.ml +++ b/utils/terminfo.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: terminfo.ml 12858 2012-08-10 14:45:51Z maranget $ *) (* Basic interface to the terminfo database *) diff --git a/utils/warnings.ml b/utils/warnings.ml index 02621ea67f..c94af46487 100644 --- a/utils/warnings.ml +++ b/utils/warnings.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id$ *) +(* $Id: warnings.ml 12959 2012-09-27 13:12:51Z maranget $ *) (* When you change this, you need to update the documentation: - man/ocamlc.m in ocaml diff --git a/yacc/Makefile b/yacc/Makefile index fb560cfd32..185304227d 100644 --- a/yacc/Makefile +++ b/yacc/Makefile @@ -10,7 +10,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile 12858 2012-08-10 14:45:51Z maranget $ # Makefile for the parser generator. diff --git a/yacc/Makefile.nt b/yacc/Makefile.nt index 14a69f02d7..2088074ddd 100644 --- a/yacc/Makefile.nt +++ b/yacc/Makefile.nt @@ -10,7 +10,7 @@ # # ######################################################################### -# $Id$ +# $Id: Makefile.nt 12858 2012-08-10 14:45:51Z maranget $ # Makefile for the parser generator. diff --git a/yacc/closure.c b/yacc/closure.c index b3f4659d01..fd05931376 100644 --- a/yacc/closure.c +++ b/yacc/closure.c @@ -12,7 +12,7 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ +/* $Id: closure.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "defs.h" diff --git a/yacc/defs.h b/yacc/defs.h index 75c8ef101d..c675757688 100644 --- a/yacc/defs.h +++ b/yacc/defs.h @@ -12,7 +12,7 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ +/* $Id: defs.h 12858 2012-08-10 14:45:51Z maranget $ */ #include <assert.h> #include <ctype.h> diff --git a/yacc/error.c b/yacc/error.c index f0b92d2d6d..67ee855a18 100644 --- a/yacc/error.c +++ b/yacc/error.c @@ -12,7 +12,7 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ +/* $Id: error.c 12858 2012-08-10 14:45:51Z maranget $ */ /* routines for printing error messages */ diff --git a/yacc/lalr.c b/yacc/lalr.c index d595e76d71..25b4bc5cd0 100644 --- a/yacc/lalr.c +++ b/yacc/lalr.c @@ -12,7 +12,7 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ +/* $Id: lalr.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "defs.h" diff --git a/yacc/main.c b/yacc/main.c index 8616b9b3da..baa95a7254 100644 --- a/yacc/main.c +++ b/yacc/main.c @@ -12,7 +12,7 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ +/* $Id: main.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <signal.h> #include <string.h> diff --git a/yacc/mkpar.c b/yacc/mkpar.c index 0e20724bf0..7a4a72131d 100644 --- a/yacc/mkpar.c +++ b/yacc/mkpar.c @@ -12,7 +12,7 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ +/* $Id: mkpar.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "defs.h" diff --git a/yacc/output.c b/yacc/output.c index 9723d3fa67..cde31c6d54 100644 --- a/yacc/output.c +++ b/yacc/output.c @@ -12,7 +12,7 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ +/* $Id: output.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "defs.h" diff --git a/yacc/reader.c b/yacc/reader.c index 1c36843d44..b550c085a5 100644 --- a/yacc/reader.c +++ b/yacc/reader.c @@ -12,7 +12,7 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ +/* $Id: reader.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <string.h> #include "defs.h" diff --git a/yacc/skeleton.c b/yacc/skeleton.c index 8048999d7d..3477487299 100644 --- a/yacc/skeleton.c +++ b/yacc/skeleton.c @@ -12,7 +12,7 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ +/* $Id: skeleton.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "defs.h" diff --git a/yacc/symtab.c b/yacc/symtab.c index f30e4a90d4..04b518c130 100644 --- a/yacc/symtab.c +++ b/yacc/symtab.c @@ -12,7 +12,7 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ +/* $Id: symtab.c 12858 2012-08-10 14:45:51Z maranget $ */ #include <string.h> #include "defs.h" diff --git a/yacc/verbose.c b/yacc/verbose.c index 799c4969aa..c6624413e6 100644 --- a/yacc/verbose.c +++ b/yacc/verbose.c @@ -12,7 +12,7 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ +/* $Id: verbose.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "defs.h" diff --git a/yacc/warshall.c b/yacc/warshall.c index c9ec782beb..7ad7fc4510 100644 --- a/yacc/warshall.c +++ b/yacc/warshall.c @@ -12,7 +12,7 @@ /* Based on public-domain code from Berkeley Yacc */ -/* $Id$ */ +/* $Id: warshall.c 12858 2012-08-10 14:45:51Z maranget $ */ #include "defs.h" |