From 3b507dd1aa286684543a35cc7da763feebf9aa8d Mon Sep 17 00:00:00 2001 From: Damien Doligez Date: Wed, 27 Jul 2011 14:17:02 +0000 Subject: [PATCH] renaming of Objective Caml to OCaml and cleanup of copyright headers git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@11156 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02 --- Changes | 2 +- Makefile | 2 +- Makefile.nt | 2 +- _tags | 12 + asmcomp/alpha/arch.ml | 2 +- asmcomp/alpha/emit.mlp | 2 +- asmcomp/alpha/proc.ml | 2 +- asmcomp/alpha/reload.ml | 2 +- asmcomp/alpha/scheduling.ml | 2 +- asmcomp/alpha/selection.ml | 2 +- asmcomp/amd64/arch.ml | 2 +- asmcomp/amd64/emit.mlp | 2 +- asmcomp/amd64/emit_nt.mlp | 2 +- asmcomp/amd64/proc.ml | 2 +- asmcomp/amd64/proc_nt.ml | 2 +- asmcomp/amd64/reload.ml | 2 +- asmcomp/amd64/scheduling.ml | 2 +- asmcomp/amd64/selection.ml | 2 +- asmcomp/arm/arch.ml | 2 +- asmcomp/arm/emit.mlp | 2 +- asmcomp/arm/proc.ml | 2 +- asmcomp/arm/reload.ml | 2 +- asmcomp/arm/scheduling.ml | 2 +- asmcomp/arm/selection.ml | 2 +- asmcomp/asmgen.ml | 2 +- asmcomp/asmgen.mli | 2 +- asmcomp/asmlibrarian.ml | 2 +- asmcomp/asmlibrarian.mli | 2 +- asmcomp/asmlink.ml | 2 +- asmcomp/asmlink.mli | 2 +- asmcomp/asmpackager.ml | 2 +- asmcomp/asmpackager.mli | 2 +- asmcomp/clambda.ml | 2 +- asmcomp/clambda.mli | 2 +- asmcomp/closure.ml | 2 +- asmcomp/closure.mli | 2 +- asmcomp/cmm.ml | 2 +- asmcomp/cmm.mli | 2 +- asmcomp/cmmgen.ml | 2 +- asmcomp/cmmgen.mli | 2 +- asmcomp/cmx_format.mli | 2 +- asmcomp/codegen.ml | 2 +- asmcomp/codegen.mli | 2 +- asmcomp/coloring.ml | 2 +- asmcomp/coloring.mli | 2 +- asmcomp/comballoc.ml | 2 +- asmcomp/comballoc.mli | 2 +- asmcomp/compilenv.ml | 2 +- asmcomp/compilenv.mli | 2 +- asmcomp/debuginfo.ml | 2 +- asmcomp/debuginfo.mli | 2 +- asmcomp/emit.mli | 2 +- asmcomp/emitaux.ml | 2 +- asmcomp/emitaux.mli | 2 +- asmcomp/hppa/arch.ml | 2 +- asmcomp/hppa/emit.mlp | 2 +- asmcomp/hppa/proc.ml | 2 +- asmcomp/hppa/reload.ml | 2 +- asmcomp/hppa/scheduling.ml | 2 +- asmcomp/hppa/selection.ml | 2 +- asmcomp/i386/arch.ml | 2 +- asmcomp/i386/emit.mlp | 2 +- asmcomp/i386/emit_nt.mlp | 2 +- asmcomp/i386/proc.ml | 2 +- asmcomp/i386/proc_nt.ml | 2 +- asmcomp/i386/reload.ml | 2 +- asmcomp/i386/scheduling.ml | 2 +- asmcomp/i386/selection.ml | 2 +- asmcomp/ia64/arch.ml | 2 +- asmcomp/ia64/emit.mlp | 2 +- asmcomp/ia64/proc.ml | 2 +- asmcomp/ia64/reload.ml | 2 +- asmcomp/ia64/scheduling.ml | 2 +- asmcomp/ia64/selection.ml | 2 +- asmcomp/interf.ml | 2 +- asmcomp/interf.mli | 2 +- asmcomp/linearize.ml | 2 +- asmcomp/linearize.mli | 2 +- asmcomp/liveness.ml | 2 +- asmcomp/liveness.mli | 2 +- asmcomp/mach.ml | 2 +- asmcomp/mach.mli | 2 +- asmcomp/mips/arch.ml | 2 +- asmcomp/mips/emit.mlp | 2 +- asmcomp/mips/proc.ml | 2 +- asmcomp/mips/reload.ml | 2 +- asmcomp/mips/scheduling.ml | 2 +- asmcomp/mips/selection.ml | 2 +- asmcomp/power/arch.ml | 2 +- asmcomp/power/emit.mlp | 2 +- asmcomp/power/proc.ml | 2 +- asmcomp/power/reload.ml | 2 +- asmcomp/power/scheduling.ml | 2 +- asmcomp/power/selection.ml | 2 +- asmcomp/printcmm.ml | 2 +- asmcomp/printcmm.mli | 2 +- asmcomp/printlinear.ml | 2 +- asmcomp/printlinear.mli | 2 +- asmcomp/printmach.ml | 2 +- asmcomp/printmach.mli | 2 +- asmcomp/proc.mli | 2 +- asmcomp/reg.ml | 2 +- asmcomp/reg.mli | 2 +- asmcomp/reload.mli | 2 +- asmcomp/reloadgen.ml | 2 +- asmcomp/reloadgen.mli | 2 +- asmcomp/schedgen.ml | 2 +- asmcomp/schedgen.mli | 2 +- asmcomp/scheduling.mli | 2 +- asmcomp/selectgen.ml | 2 +- asmcomp/selectgen.mli | 2 +- asmcomp/selection.mli | 2 +- asmcomp/sparc/arch.ml | 2 +- asmcomp/sparc/emit.mlp | 2 +- asmcomp/sparc/proc.ml | 2 +- asmcomp/sparc/reload.ml | 2 +- asmcomp/sparc/scheduling.ml | 2 +- asmcomp/sparc/selection.ml | 2 +- asmcomp/spill.ml | 2 +- asmcomp/spill.mli | 2 +- asmcomp/split.ml | 2 +- asmcomp/split.mli | 2 +- asmrun/Makefile | 2 +- asmrun/Makefile.nt | 2 +- asmrun/alpha.S | 2 +- asmrun/amd64.S | 2 +- asmrun/amd64nt.asm | 24 +- asmrun/arm.S | 2 +- asmrun/backtrace.c | 2 +- asmrun/fail.c | 2 +- asmrun/hppa.S | 24 +- asmrun/i386.S | 2 +- asmrun/i386nt.asm | 24 +- asmrun/ia64.S | 5 +- asmrun/m68k.S | 2 +- asmrun/mips.s | 2 +- asmrun/natdynlink.c | 13 + asmrun/power-aix.S | 24 +- asmrun/power-elf.S | 24 +- asmrun/power-rhapsody.S | 24 +- asmrun/roots.c | 2 +- asmrun/signals_asm.c | 2 +- asmrun/signals_osdep.h | 2 +- asmrun/sparc.S | 2 +- asmrun/stack.h | 2 +- asmrun/startup.c | 2 +- boot/ocamlc | Bin 1110561 -> 1110753 bytes boot/ocamldep | Bin 311117 -> 311117 bytes boot/ocamllex | Bin 171200 -> 171200 bytes build/boot-c-parts.sh | 13 + build/boot.sh | 13 + build/buildbot | 12 + build/camlp4-bootstrap.sh | 12 + build/camlp4-byte-only.sh | 2 +- build/camlp4-mkCamlp4Ast.sh | 13 + build/camlp4-native-only.sh | 2 +- build/camlp4-targets.sh | 13 + build/distclean.sh | 2 +- build/fastworld.sh | 2 +- build/install.sh | 2 +- build/mixed-boot.sh | 2 +- build/mkconfig.sh | 12 + build/mkmyocamlbuild_config.sh | 2 +- build/mkruntimedef.sh | 13 + build/myocamlbuild.sh | 2 +- build/ocamlbuild-byte-only.sh | 2 +- build/ocamlbuild-native-only.sh | 2 +- build/ocamlbuildlib-native-only.sh | 2 +- build/otherlibs-targets.sh | 2 +- build/partial-install.sh | 2 +- build/targets.sh | 2 +- build/tolower.sed | 12 + build/world.all.sh | 13 + build/world.byte.sh | 13 + build/world.native.sh | 13 + build/world.sh | 2 +- bytecomp/bytegen.ml | 2 +- bytecomp/bytegen.mli | 2 +- bytecomp/bytelibrarian.ml | 2 +- bytecomp/bytelibrarian.mli | 2 +- bytecomp/bytelink.ml | 2 +- bytecomp/bytelink.mli | 2 +- bytecomp/bytepackager.ml | 2 +- bytecomp/bytepackager.mli | 2 +- bytecomp/bytesections.ml | 2 +- bytecomp/bytesections.mli | 2 +- bytecomp/cmo_format.mli | 2 +- bytecomp/dll.ml | 2 +- bytecomp/dll.mli | 2 +- bytecomp/emitcode.ml | 2 +- bytecomp/emitcode.mli | 2 +- bytecomp/instruct.ml | 2 +- bytecomp/instruct.mli | 2 +- bytecomp/lambda.ml | 2 +- bytecomp/lambda.mli | 2 +- bytecomp/matching.ml | 2 +- bytecomp/matching.mli | 2 +- bytecomp/meta.ml | 2 +- bytecomp/meta.mli | 2 +- bytecomp/printinstr.ml | 2 +- bytecomp/printinstr.mli | 2 +- bytecomp/printlambda.ml | 2 +- bytecomp/printlambda.mli | 2 +- bytecomp/runtimedef.mli | 2 +- bytecomp/simplif.ml | 2 +- bytecomp/simplif.mli | 2 +- bytecomp/switch.ml | 2 +- bytecomp/switch.mli | 2 +- bytecomp/symtable.ml | 2 +- bytecomp/symtable.mli | 2 +- bytecomp/translclass.ml | 2 +- bytecomp/translclass.mli | 2 +- bytecomp/translcore.ml | 2 +- bytecomp/translcore.mli | 2 +- bytecomp/translmod.ml | 2 +- bytecomp/translmod.mli | 2 +- bytecomp/translobj.ml | 2 +- bytecomp/translobj.mli | 2 +- bytecomp/typeopt.ml | 2 +- bytecomp/typeopt.mli | 2 +- byterun/Makefile | 2 +- byterun/Makefile.common | 2 +- byterun/Makefile.nt | 2 +- byterun/alloc.c | 2 +- byterun/alloc.h | 2 +- byterun/array.c | 2 +- byterun/backtrace.c | 2 +- byterun/backtrace.h | 2 +- byterun/callback.c | 2 +- byterun/callback.h | 2 +- byterun/compact.c | 2 +- byterun/compact.h | 2 +- byterun/compare.c | 2 +- byterun/compare.h | 2 +- byterun/compatibility.h | 2 +- byterun/config.h | 2 +- byterun/custom.c | 2 +- byterun/custom.h | 2 +- byterun/debugger.c | 2 +- byterun/debugger.h | 2 +- byterun/dynlink.c | 2 +- byterun/dynlink.h | 2 +- byterun/exec.h | 2 +- byterun/extern.c | 2 +- byterun/fail.c | 2 +- byterun/fail.h | 2 +- byterun/finalise.c | 2 +- byterun/finalise.h | 2 +- byterun/fix_code.c | 2 +- byterun/fix_code.h | 2 +- byterun/floats.c | 2 +- byterun/freelist.c | 2 +- byterun/freelist.h | 2 +- byterun/gc.h | 2 +- byterun/gc_ctrl.c | 2 +- byterun/gc_ctrl.h | 2 +- byterun/globroots.c | 2 +- byterun/globroots.h | 2 +- byterun/hash.c | 2 +- byterun/hash.h | 2 +- byterun/instrtrace.c | 2 +- byterun/instrtrace.h | 2 +- byterun/instruct.h | 2 +- byterun/int64_emul.h | 2 +- byterun/int64_format.h | 2 +- byterun/int64_native.h | 2 +- byterun/intern.c | 2 +- byterun/interp.c | 2 +- byterun/interp.h | 2 +- byterun/intext.h | 2 +- byterun/ints.c | 2 +- byterun/io.c | 2 +- byterun/io.h | 2 +- byterun/lexing.c | 2 +- byterun/main.c | 2 +- byterun/major_gc.c | 2 +- byterun/major_gc.h | 2 +- byterun/md5.c | 2 +- byterun/md5.h | 2 +- byterun/memory.c | 2 +- byterun/memory.h | 2 +- byterun/meta.c | 2 +- byterun/minor_gc.c | 2 +- byterun/minor_gc.h | 2 +- byterun/misc.c | 2 +- byterun/misc.h | 2 +- byterun/mlvalues.h | 2 +- byterun/obj.c | 2 +- byterun/osdeps.h | 2 +- byterun/parsing.c | 2 +- byterun/prims.h | 2 +- byterun/printexc.c | 2 +- byterun/printexc.h | 2 +- byterun/reverse.h | 2 +- byterun/roots.c | 2 +- byterun/roots.h | 2 +- byterun/signals.c | 2 +- byterun/signals.h | 2 +- byterun/signals_byt.c | 2 +- byterun/signals_machdep.h | 2 +- byterun/stacks.c | 2 +- byterun/stacks.h | 2 +- byterun/startup.c | 6 +- byterun/startup.h | 2 +- byterun/str.c | 2 +- byterun/sys.c | 2 +- byterun/sys.h | 2 +- byterun/terminfo.c | 2 +- byterun/ui.h | 2 +- byterun/unix.c | 2 +- byterun/weak.c | 2 +- byterun/weak.h | 2 +- byterun/win32.c | 2 +- camlp4/Camlp4/Camlp4Ast.partial.ml | 14 + camlp4/Camlp4/Debug.ml | 6 +- camlp4/Camlp4/Debug.mli | 6 +- camlp4/Camlp4/ErrorHandler.ml | 6 +- camlp4/Camlp4/ErrorHandler.mli | 6 +- camlp4/Camlp4/OCamlInitSyntax.ml | 6 +- camlp4/Camlp4/Options.ml | 6 +- camlp4/Camlp4/Options.mli | 6 +- camlp4/Camlp4/PreCast.ml | 6 +- camlp4/Camlp4/PreCast.mli | 6 +- camlp4/Camlp4/Printers/DumpCamlp4Ast.ml | 6 +- camlp4/Camlp4/Printers/DumpCamlp4Ast.mli | 6 +- camlp4/Camlp4/Printers/DumpOCamlAst.ml | 6 +- camlp4/Camlp4/Printers/DumpOCamlAst.mli | 6 +- camlp4/Camlp4/Printers/Null.ml | 6 +- camlp4/Camlp4/Printers/Null.mli | 6 +- camlp4/Camlp4/Printers/OCaml.ml | 6 +- camlp4/Camlp4/Printers/OCaml.mli | 6 +- camlp4/Camlp4/Printers/OCamlr.ml | 6 +- camlp4/Camlp4/Printers/OCamlr.mli | 6 +- camlp4/Camlp4/Register.ml | 6 +- camlp4/Camlp4/Register.mli | 6 +- camlp4/Camlp4/Sig.ml | 8 +- camlp4/Camlp4/Struct/AstFilters.ml | 6 +- camlp4/Camlp4/Struct/Camlp4Ast.mlast | 6 +- camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml | 6 +- camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.mli | 6 +- camlp4/Camlp4/Struct/CleanAst.ml | 6 +- camlp4/Camlp4/Struct/CommentFilter.ml | 6 +- camlp4/Camlp4/Struct/CommentFilter.mli | 6 +- camlp4/Camlp4/Struct/DynAst.ml | 6 +- camlp4/Camlp4/Struct/DynLoader.ml | 6 +- camlp4/Camlp4/Struct/DynLoader.mli | 6 +- camlp4/Camlp4/Struct/EmptyError.ml | 8 +- camlp4/Camlp4/Struct/EmptyError.mli | 8 +- camlp4/Camlp4/Struct/EmptyPrinter.ml | 6 +- camlp4/Camlp4/Struct/EmptyPrinter.mli | 6 +- camlp4/Camlp4/Struct/FreeVars.ml | 6 +- camlp4/Camlp4/Struct/FreeVars.mli | 6 +- camlp4/Camlp4/Struct/Grammar/Delete.ml | 6 +- camlp4/Camlp4/Struct/Grammar/Dynamic.ml | 6 +- camlp4/Camlp4/Struct/Grammar/Entry.ml | 6 +- camlp4/Camlp4/Struct/Grammar/Failed.ml | 6 +- camlp4/Camlp4/Struct/Grammar/Find.ml | 6 +- camlp4/Camlp4/Struct/Grammar/Fold.ml | 6 +- camlp4/Camlp4/Struct/Grammar/Fold.mli | 6 +- camlp4/Camlp4/Struct/Grammar/Insert.ml | 6 +- camlp4/Camlp4/Struct/Grammar/Parser.ml | 6 +- camlp4/Camlp4/Struct/Grammar/Parser.mli | 6 +- camlp4/Camlp4/Struct/Grammar/Print.ml | 6 +- camlp4/Camlp4/Struct/Grammar/Print.mli | 6 +- camlp4/Camlp4/Struct/Grammar/Search.ml | 6 +- camlp4/Camlp4/Struct/Grammar/Static.ml | 6 +- camlp4/Camlp4/Struct/Grammar/Structure.ml | 6 +- camlp4/Camlp4/Struct/Grammar/Tools.ml | 6 +- camlp4/Camlp4/Struct/Lexer.mll | 6 +- camlp4/Camlp4/Struct/Loc.ml | 6 +- camlp4/Camlp4/Struct/Loc.mli | 6 +- camlp4/Camlp4/Struct/Quotation.ml | 6 +- camlp4/Camlp4/Struct/Token.ml | 6 +- camlp4/Camlp4/Struct/Token.mli | 6 +- camlp4/Camlp4Bin.ml | 6 +- camlp4/Camlp4Filters/Camlp4AstLifter.ml | 6 +- camlp4/Camlp4Filters/Camlp4ExceptionTracer.ml | 6 +- camlp4/Camlp4Filters/Camlp4FoldGenerator.ml | 8 +- .../Camlp4Filters/Camlp4LocationStripper.ml | 6 +- camlp4/Camlp4Filters/Camlp4MapGenerator.ml | 14 + camlp4/Camlp4Filters/Camlp4MetaGenerator.ml | 14 + camlp4/Camlp4Filters/Camlp4Profiler.ml | 6 +- camlp4/Camlp4Filters/Camlp4TrashRemover.ml | 6 +- camlp4/Camlp4Parsers/Camlp4AstLoader.ml | 6 +- camlp4/Camlp4Parsers/Camlp4DebugParser.ml | 6 +- camlp4/Camlp4Parsers/Camlp4GrammarParser.ml | 6 +- .../Camlp4Parsers/Camlp4ListComprehension.ml | 6 +- camlp4/Camlp4Parsers/Camlp4MacroParser.ml | 6 +- .../Camlp4OCamlOriginalQuotationExpander.ml | 6 +- camlp4/Camlp4Parsers/Camlp4OCamlParser.ml | 6 +- .../Camlp4Parsers/Camlp4OCamlParserParser.ml | 6 +- .../Camlp4OCamlReloadedParser.ml | 6 +- .../Camlp4Parsers/Camlp4OCamlRevisedParser.ml | 6 +- .../Camlp4OCamlRevisedParserParser.ml | 6 +- .../Camlp4OCamlRevisedQuotationExpander.ml | 6 +- camlp4/Camlp4Parsers/Camlp4QuotationCommon.ml | 6 +- .../Camlp4Parsers/Camlp4QuotationExpander.ml | 6 +- camlp4/Camlp4Printers/Camlp4AstDumper.ml | 6 +- camlp4/Camlp4Printers/Camlp4AutoPrinter.ml | 6 +- camlp4/Camlp4Printers/Camlp4NullDumper.ml | 6 +- camlp4/Camlp4Printers/Camlp4OCamlAstDumper.ml | 6 +- camlp4/Camlp4Printers/Camlp4OCamlPrinter.ml | 6 +- .../Camlp4OCamlRevisedPrinter.ml | 6 +- camlp4/Camlp4Top/Rprint.ml | 6 +- camlp4/Camlp4Top/Top.ml | 6 +- camlp4/Camlp4_config.ml | 6 +- camlp4/Camlp4_config.mli | 6 +- camlp4/boot/Camlp4.ml | 56 +- camlp4/boot/Camlp4.ml4 | 14 + camlp4/boot/Camlp4Ast.ml | 21 +- camlp4/boot/camlp4boot.ml | 73 +- camlp4/boot/camlp4boot.ml4 | 14 + camlp4/camlp4prof.ml | 14 + camlp4/camlp4prof.mli | 14 + camlp4/examples/_tags | 13 + camlp4/examples/apply_operator.ml | 14 + camlp4/examples/apply_operator_test.ml | 14 + camlp4/examples/arith.ml | 14 + camlp4/examples/debug_extension.ml | 14 + camlp4/examples/ex_str.ml | 14 + camlp4/examples/ex_str_test.ml | 14 + camlp4/examples/expression_closure.ml | 14 + camlp4/examples/expression_closure_filter.ml | 14 + camlp4/examples/expression_closure_test.ml | 14 + camlp4/examples/fancy_lambda_quot.ml | 14 + camlp4/examples/fancy_lambda_quot_test.ml | 14 + camlp4/examples/free_vars_test.ml | 14 + camlp4/examples/gen_match_case.ml | 14 + camlp4/examples/gen_type_N.ml | 14 + camlp4/examples/gettext_test.ml | 14 + camlp4/examples/global_handler.ml | 14 + camlp4/examples/global_handler_test.ml | 14 + camlp4/examples/lambda_parser.ml | 14 + camlp4/examples/lambda_quot.ml | 14 + camlp4/examples/lambda_quot_expr.ml | 14 + camlp4/examples/lambda_quot_patt.ml | 14 + camlp4/examples/lambda_test.ml | 14 + camlp4/examples/macros.ml | 14 + camlp4/examples/parse_files.ml | 14 + camlp4/examples/syb_fold.ml | 14 + camlp4/examples/syb_map.ml | 14 + camlp4/examples/test_macros.ml | 14 + camlp4/examples/test_type_quotation.ml | 14 + camlp4/examples/type_quotation.ml | 14 + camlp4/man/Makefile | 13 +- camlp4/man/camlp4.1.tpl | 15 + camlp4/mkcamlp4.ml | 6 +- camlp4/unmaintained/Makefile | 5 +- camlp4/unmaintained/extfold/README | 4 +- camlp4/unmaintained/format/Makefile | 5 +- camlp4/unmaintained/format/README | 4 +- camlp4/unmaintained/lefteval/Makefile | 5 +- camlp4/unmaintained/lefteval/README | 4 +- camlp4/unmaintained/ocamllex/Makefile | 5 +- camlp4/unmaintained/ocamllex/README | 4 +- camlp4/unmaintained/olabl/Makefile | 5 +- camlp4/unmaintained/olabl/README | 4 +- camlp4/unmaintained/scheme/Makefile | 7 +- camlp4/unmaintained/scheme/README | 4 +- camlp4/unmaintained/sml/Makefile | 5 +- camlp4/unmaintained/sml/README | 4 +- config/Makefile-templ | 2 +- config/Makefile.mingw | 2 +- config/Makefile.msvc | 2 +- config/Makefile.msvc64 | 2 +- config/auto-aux/align.c | 2 +- config/auto-aux/ansi.c | 2 +- config/auto-aux/async_io.c | 2 +- config/auto-aux/bytecopy.c | 2 +- config/auto-aux/dblalign.c | 2 +- config/auto-aux/divmod.c | 2 +- config/auto-aux/elf.c | 2 +- config/auto-aux/endian.c | 2 +- config/auto-aux/expm1.c | 2 +- config/auto-aux/getgroups.c | 2 +- config/auto-aux/gethostbyaddr.c | 2 +- config/auto-aux/gethostbyname.c | 2 +- config/auto-aux/hasgot | 13 + config/auto-aux/hasgot2 | 13 + config/auto-aux/ia32sse2.c | 2 +- config/auto-aux/initgroups.c | 6 +- config/auto-aux/int64align.c | 2 +- config/auto-aux/longlong.c | 2 +- config/auto-aux/runtest | 14 + config/auto-aux/schar.c | 2 +- config/auto-aux/schar2.c | 2 +- config/auto-aux/searchpath | 14 + config/auto-aux/setgroups.c | 6 +- config/auto-aux/sighandler.c | 2 +- config/auto-aux/signals.c | 2 +- config/auto-aux/sizes.c | 2 +- config/auto-aux/solaris-ld | 14 + config/auto-aux/stackov.c | 2 +- config/auto-aux/tclversion.c | 18 + config/auto-aux/trycompile | 14 + config/m-nt.h | 2 +- config/m-templ.h | 2 +- config/s-nt.h | 2 +- config/s-templ.h | 2 +- configure | 2 +- debugger/Makefile | 2 +- debugger/Makefile.nt | 2 +- debugger/Makefile.shared | 2 +- debugger/breakpoints.ml | 4 +- debugger/breakpoints.mli | 4 +- debugger/checkpoints.ml | 4 +- debugger/checkpoints.mli | 4 +- debugger/command_line.ml | 4 +- debugger/command_line.mli | 4 +- debugger/debugcom.ml | 4 +- debugger/debugcom.mli | 4 +- debugger/debugger_config.ml | 6 +- debugger/debugger_config.mli | 4 +- debugger/envaux.ml | 4 +- debugger/envaux.mli | 4 +- debugger/eval.ml | 4 +- debugger/eval.mli | 4 +- debugger/events.ml | 4 +- debugger/events.mli | 4 +- debugger/exec.ml | 4 +- debugger/exec.mli | 4 +- debugger/frames.ml | 4 +- debugger/frames.mli | 4 +- debugger/history.ml | 4 +- debugger/history.mli | 4 +- debugger/input_handling.ml | 4 +- debugger/input_handling.mli | 4 +- debugger/int64ops.ml | 2 +- debugger/int64ops.mli | 2 +- debugger/lexer.mli | 4 +- debugger/lexer.mll | 4 +- debugger/loadprinter.ml | 2 +- debugger/loadprinter.mli | 2 +- debugger/main.ml | 4 +- debugger/parameters.ml | 4 +- debugger/parameters.mli | 4 +- debugger/parser.mly | 4 +- debugger/parser_aux.mli | 4 +- debugger/pattern_matching.ml | 4 +- debugger/pattern_matching.mli | 4 +- debugger/pos.ml | 2 +- debugger/pos.mli | 2 +- debugger/primitives.ml | 4 +- debugger/primitives.mli | 4 +- debugger/printval.ml | 4 +- debugger/printval.mli | 4 +- debugger/program_loading.ml | 4 +- debugger/program_loading.mli | 4 +- debugger/program_management.ml | 4 +- debugger/program_management.mli | 4 +- debugger/question.ml | 12 + debugger/question.mli | 12 + debugger/show_information.ml | 4 +- debugger/show_information.mli | 4 +- debugger/show_source.ml | 4 +- debugger/show_source.mli | 4 +- debugger/source.ml | 4 +- debugger/source.mli | 4 +- debugger/symbols.ml | 4 +- debugger/symbols.mli | 4 +- debugger/time_travel.ml | 4 +- debugger/time_travel.mli | 4 +- debugger/trap_barrier.ml | 4 +- debugger/trap_barrier.mli | 4 +- debugger/unix_tools.ml | 4 +- debugger/unix_tools.mli | 4 +- driver/compile.ml | 2 +- driver/compile.mli | 2 +- driver/errors.ml | 2 +- driver/errors.mli | 2 +- driver/main.ml | 2 +- driver/main.mli | 2 +- driver/main_args.ml | 2 +- driver/main_args.mli | 2 +- driver/ocamlcomp.sh.in | 12 + driver/optcompile.ml | 2 +- driver/optcompile.mli | 2 +- driver/opterrors.ml | 2 +- driver/opterrors.mli | 2 +- driver/optmain.ml | 2 +- driver/optmain.mli | 2 +- driver/pparse.ml | 2 +- driver/pparse.mli | 2 +- emacs/Makefile | 2 +- emacs/README | 4 +- emacs/caml-compat.el | 2 +- emacs/caml-emacs.el | 2 +- emacs/caml-font-old.el | 4 +- emacs/caml-font.el | 12 + emacs/caml-help.el | 2 +- emacs/caml-hilit.el | 4 +- emacs/caml-types.el | 2 +- emacs/caml-xemacs.el | 2 +- emacs/caml.el | 6 +- emacs/camldebug.el | 2 +- emacs/inf-caml.el | 2 +- emacs/ocamltags.in | 2 +- experimental/doligez/checkheaders | 157 ++ lex/Makefile | 2 +- lex/Makefile.nt | 2 +- lex/common.ml | 2 +- lex/common.mli | 2 +- lex/compact.ml | 2 +- lex/compact.mli | 2 +- lex/cset.ml | 2 +- lex/cset.mli | 2 +- lex/lexer.mli | 2 +- lex/lexer.mll | 2 +- lex/lexgen.ml | 2 +- lex/lexgen.mli | 2 +- lex/main.ml | 2 +- lex/output.ml | 2 +- lex/output.mli | 2 +- lex/outputbis.ml | 2 +- lex/outputbis.mli | 2 +- lex/parser.mly | 2 +- lex/syntax.ml | 2 +- lex/syntax.mli | 2 +- lex/table.ml | 2 +- lex/table.mli | 2 +- man/Makefile | 2 +- man/ocaml.m | 16 +- man/ocamlc.m | 16 +- man/ocamlcp.m | 16 +- man/ocamldebug.m | 16 +- man/ocamldep.m | 16 +- man/ocamldoc.m | 16 +- man/ocamllex.m | 15 +- man/ocamlmktop.m | 15 +- man/ocamlopt.m | 16 +- man/ocamlprof.m | 15 +- man/ocamlrun.m | 17 +- man/ocamlyacc.m | 15 +- myocamlbuild.ml | 2 +- myocamlbuild_config.mli | 12 + ocamlbuild/Makefile | 2 +- ocamlbuild/_tags | 12 + ocamlbuild/exit_codes.ml | 11 + ocamlbuild/exit_codes.mli | 11 + ocamlbuild/man/ocamlbuild.1 | 15 +- ocamlbuild/manual/Makefile | 11 + ocamlbuild/manual/manual.tex | 11 + ocamlbuild/ocamlbuild-presentation.rslide | 12 + ocamlbuild/ocamlbuild_plugin.mli | 11 + ocamlbuild/ocamlbuild_where.ml | 11 + ocamlbuild/start.sh | 2 +- ocamldoc/Makefile | 3 +- ocamldoc/Makefile.nt | 2 +- ocamldoc/odoc_dep.ml | 2 +- ocamldoc/odoc_dot.ml | 2 +- ocamldoc/odoc_gen.ml | 13 +- ocamldoc/odoc_gen.mli | 13 +- ocamldoc/odoc_global.ml | 2 +- ocamldoc/odoc_global.mli | 2 +- ocamldoc/odoc_texi.ml | 3 +- ocamldoc/remove_DEBUG | 2 +- ocamldoc/runocamldoc | 13 + otherlibs/Makefile | 2 +- otherlibs/Makefile.nt | 2 +- otherlibs/Makefile.shared | 2 +- otherlibs/bigarray/Makefile | 2 +- otherlibs/bigarray/Makefile.nt | 2 +- otherlibs/bigarray/bigarray.h | 2 +- otherlibs/bigarray/bigarray.ml | 2 +- otherlibs/bigarray/bigarray.mli | 2 +- otherlibs/bigarray/bigarray_stubs.c | 2 +- otherlibs/bigarray/mmap_unix.c | 2 +- otherlibs/bigarray/mmap_win32.c | 2 +- otherlibs/dbm/Makefile | 2 +- otherlibs/dbm/cldbm.c | 2 +- otherlibs/dbm/dbm.ml | 2 +- otherlibs/dbm/dbm.mli | 2 +- otherlibs/dynlink/Makefile | 2 +- otherlibs/dynlink/Makefile.nt | 2 +- otherlibs/dynlink/dynlink.ml | 2 +- otherlibs/dynlink/dynlink.mli | 4 +- otherlibs/dynlink/extract_crc.ml | 2 +- otherlibs/dynlink/natdynlink.ml | 2 +- otherlibs/graph/Makefile | 2 +- otherlibs/graph/color.c | 2 +- otherlibs/graph/draw.c | 2 +- otherlibs/graph/dump_img.c | 2 +- otherlibs/graph/events.c | 2 +- otherlibs/graph/fill.c | 2 +- otherlibs/graph/graphics.ml | 2 +- otherlibs/graph/graphics.mli | 2 +- otherlibs/graph/graphicsX11.ml | 2 +- otherlibs/graph/graphicsX11.mli | 2 +- otherlibs/graph/image.c | 2 +- otherlibs/graph/image.h | 2 +- otherlibs/graph/libgraph.h | 2 +- otherlibs/graph/make_img.c | 2 +- otherlibs/graph/open.c | 2 +- otherlibs/graph/point_col.c | 2 +- otherlibs/graph/sound.c | 2 +- otherlibs/graph/subwindow.c | 2 +- otherlibs/graph/text.c | 2 +- otherlibs/labltk/Makefile | 16 + otherlibs/labltk/Makefile.nt | 16 + otherlibs/labltk/README | 4 +- otherlibs/labltk/Widgets.src | 16 + otherlibs/labltk/browser/Makefile | 14 + otherlibs/labltk/browser/Makefile.nt | 14 + otherlibs/labltk/browser/Makefile.shared | 16 +- otherlibs/labltk/browser/dummyUnix.mli | 2 +- otherlibs/labltk/browser/dummyWin.mli | 2 +- otherlibs/labltk/browser/editor.ml | 2 +- otherlibs/labltk/browser/editor.mli | 2 +- otherlibs/labltk/browser/fileselect.ml | 2 +- otherlibs/labltk/browser/fileselect.mli | 2 +- otherlibs/labltk/browser/jg_bind.ml | 2 +- otherlibs/labltk/browser/jg_bind.mli | 2 +- otherlibs/labltk/browser/jg_box.ml | 2 +- otherlibs/labltk/browser/jg_button.ml | 2 +- otherlibs/labltk/browser/jg_completion.ml | 2 +- otherlibs/labltk/browser/jg_completion.mli | 2 +- otherlibs/labltk/browser/jg_config.ml | 2 +- otherlibs/labltk/browser/jg_config.mli | 2 +- otherlibs/labltk/browser/jg_entry.ml | 2 +- otherlibs/labltk/browser/jg_memo.ml | 2 +- otherlibs/labltk/browser/jg_memo.mli | 2 +- otherlibs/labltk/browser/jg_menu.ml | 2 +- otherlibs/labltk/browser/jg_message.ml | 2 +- otherlibs/labltk/browser/jg_message.mli | 2 +- otherlibs/labltk/browser/jg_multibox.ml | 2 +- otherlibs/labltk/browser/jg_multibox.mli | 2 +- otherlibs/labltk/browser/jg_text.ml | 2 +- otherlibs/labltk/browser/jg_text.mli | 2 +- otherlibs/labltk/browser/jg_tk.ml | 2 +- otherlibs/labltk/browser/jg_toplevel.ml | 2 +- otherlibs/labltk/browser/lexical.ml | 2 +- otherlibs/labltk/browser/lexical.mli | 2 +- otherlibs/labltk/browser/list2.ml | 2 +- otherlibs/labltk/browser/main.ml | 6 +- otherlibs/labltk/browser/mytypes.mli | 2 +- otherlibs/labltk/browser/searchid.ml | 2 +- otherlibs/labltk/browser/searchid.mli | 2 +- otherlibs/labltk/browser/searchpos.ml | 2 +- otherlibs/labltk/browser/searchpos.mli | 2 +- otherlibs/labltk/browser/setpath.ml | 2 +- otherlibs/labltk/browser/setpath.mli | 2 +- otherlibs/labltk/browser/shell.ml | 2 +- otherlibs/labltk/browser/shell.mli | 2 +- otherlibs/labltk/browser/typecheck.ml | 2 +- otherlibs/labltk/browser/typecheck.mli | 2 +- otherlibs/labltk/browser/useunix.ml | 2 +- otherlibs/labltk/browser/useunix.mli | 2 +- otherlibs/labltk/browser/viewer.ml | 2 +- otherlibs/labltk/browser/viewer.mli | 2 +- otherlibs/labltk/browser/winmain.c | 14 + otherlibs/labltk/builtin/LICENSE | 4 +- otherlibs/labltk/camltk/Makefile | 16 + otherlibs/labltk/camltk/Makefile.gen | 16 + otherlibs/labltk/compiler/Makefile | 16 + otherlibs/labltk/compiler/code.mli | 4 +- otherlibs/labltk/compiler/compile.ml | 4 +- otherlibs/labltk/compiler/copyright | 4 +- otherlibs/labltk/compiler/flags.ml | 4 +- otherlibs/labltk/compiler/intf.ml | 4 +- otherlibs/labltk/compiler/lexer.mll | 2 +- otherlibs/labltk/compiler/maincompile.ml | 4 +- otherlibs/labltk/compiler/parser.mly | 4 +- otherlibs/labltk/compiler/pp.ml | 4 +- otherlibs/labltk/compiler/ppexec.ml | 4 +- otherlibs/labltk/compiler/pplex.mli | 4 +- otherlibs/labltk/compiler/pplex.mll | 4 +- otherlibs/labltk/compiler/ppparse.ml | 4 +- otherlibs/labltk/compiler/ppyac.mly | 4 +- otherlibs/labltk/compiler/printer.ml | 4 +- otherlibs/labltk/compiler/tables.ml | 4 +- otherlibs/labltk/compiler/tsort.ml | 4 +- otherlibs/labltk/examples_camltk/addition.ml | 4 +- otherlibs/labltk/examples_camltk/eyes.ml | 4 +- otherlibs/labltk/examples_camltk/fileinput.ml | 4 +- otherlibs/labltk/examples_camltk/fileopen.ml | 4 +- .../labltk/examples_camltk/helloworld.ml | 4 +- otherlibs/labltk/examples_camltk/jptest.ml | 4 +- otherlibs/labltk/examples_camltk/mytext.ml | 4 +- .../labltk/examples_camltk/socketinput.ml | 4 +- otherlibs/labltk/examples_camltk/taddition.ml | 4 +- otherlibs/labltk/examples_camltk/tetris.ml | 4 +- otherlibs/labltk/examples_camltk/text.ml | 4 +- otherlibs/labltk/examples_camltk/winskel.ml | 4 +- otherlibs/labltk/examples_labltk/calc.ml | 4 +- otherlibs/labltk/examples_labltk/clock.ml | 4 +- otherlibs/labltk/examples_labltk/demo.ml | 4 +- otherlibs/labltk/examples_labltk/eyes.ml | 4 +- otherlibs/labltk/examples_labltk/hello.ml | 4 +- otherlibs/labltk/examples_labltk/lang.ml | 4 +- otherlibs/labltk/examples_labltk/taquin.ml | 4 +- otherlibs/labltk/examples_labltk/tetris.ml | 4 +- otherlibs/labltk/frx/Makefile | 16 + otherlibs/labltk/frx/frx_after.ml | 4 +- otherlibs/labltk/frx/frx_after.mli | 4 +- otherlibs/labltk/frx/frx_color.ml | 4 +- otherlibs/labltk/frx/frx_color.mli | 4 +- otherlibs/labltk/frx/frx_ctext.ml | 4 +- otherlibs/labltk/frx/frx_ctext.mli | 4 +- otherlibs/labltk/frx/frx_dialog.ml | 4 +- otherlibs/labltk/frx/frx_dialog.mli | 4 +- otherlibs/labltk/frx/frx_entry.ml | 4 +- otherlibs/labltk/frx/frx_entry.mli | 4 +- otherlibs/labltk/frx/frx_fileinput.ml | 4 +- otherlibs/labltk/frx/frx_fillbox.ml | 4 +- otherlibs/labltk/frx/frx_fillbox.mli | 4 +- otherlibs/labltk/frx/frx_fit.ml | 4 +- otherlibs/labltk/frx/frx_fit.mli | 4 +- otherlibs/labltk/frx/frx_focus.ml | 4 +- otherlibs/labltk/frx/frx_focus.mli | 4 +- otherlibs/labltk/frx/frx_font.ml | 4 +- otherlibs/labltk/frx/frx_font.mli | 4 +- otherlibs/labltk/frx/frx_group.ml | 4 +- otherlibs/labltk/frx/frx_lbutton.ml | 4 +- otherlibs/labltk/frx/frx_lbutton.mli | 4 +- otherlibs/labltk/frx/frx_listbox.ml | 4 +- otherlibs/labltk/frx/frx_listbox.mli | 4 +- otherlibs/labltk/frx/frx_mem.ml | 4 +- otherlibs/labltk/frx/frx_mem.mli | 4 +- otherlibs/labltk/frx/frx_misc.ml | 4 +- otherlibs/labltk/frx/frx_misc.mli | 4 +- otherlibs/labltk/frx/frx_req.ml | 4 +- otherlibs/labltk/frx/frx_req.mli | 4 +- otherlibs/labltk/frx/frx_rpc.ml | 4 +- otherlibs/labltk/frx/frx_rpc.mli | 4 +- otherlibs/labltk/frx/frx_selection.ml | 4 +- otherlibs/labltk/frx/frx_selection.mli | 4 +- otherlibs/labltk/frx/frx_synth.ml | 4 +- otherlibs/labltk/frx/frx_synth.mli | 4 +- otherlibs/labltk/frx/frx_text.ml | 4 +- otherlibs/labltk/frx/frx_text.mli | 4 +- otherlibs/labltk/frx/frx_toplevel.mli | 4 +- otherlibs/labltk/frx/frx_widget.ml | 4 +- otherlibs/labltk/frx/frx_widget.mli | 4 +- otherlibs/labltk/jpf/Makefile | 16 + otherlibs/labltk/jpf/balloon.ml | 4 +- otherlibs/labltk/jpf/balloon.mli | 4 +- otherlibs/labltk/jpf/balloontest.ml | 4 +- otherlibs/labltk/jpf/fileselect.ml | 4 +- otherlibs/labltk/jpf/fileselect.mli | 4 +- otherlibs/labltk/jpf/jpf_font.ml | 4 +- otherlibs/labltk/jpf/jpf_font.mli | 4 +- otherlibs/labltk/jpf/shell.ml | 4 +- otherlibs/labltk/jpf/shell.mli | 4 +- otherlibs/labltk/labltk/Makefile | 16 + otherlibs/labltk/labltk/Makefile.gen | 16 + otherlibs/labltk/lib/Makefile | 16 + otherlibs/labltk/support/Makefile | 16 + otherlibs/labltk/support/Makefile.common | 20 +- otherlibs/labltk/support/camltk.h | 2 +- otherlibs/labltk/support/camltkwrap.ml | 4 +- otherlibs/labltk/support/camltkwrap.mli | 4 +- otherlibs/labltk/support/cltkCaml.c | 4 +- otherlibs/labltk/support/cltkDMain.c | 2 +- otherlibs/labltk/support/cltkEval.c | 4 +- otherlibs/labltk/support/cltkEvent.c | 4 +- otherlibs/labltk/support/cltkFile.c | 4 +- otherlibs/labltk/support/cltkImg.c | 4 +- otherlibs/labltk/support/cltkMain.c | 4 +- otherlibs/labltk/support/cltkMisc.c | 4 +- otherlibs/labltk/support/cltkTimer.c | 4 +- otherlibs/labltk/support/cltkUtf.c | 4 +- otherlibs/labltk/support/cltkVar.c | 4 +- otherlibs/labltk/support/cltkWait.c | 4 +- otherlibs/labltk/support/fileevent.ml | 4 +- otherlibs/labltk/support/fileevent.mli | 4 +- otherlibs/labltk/support/protocol.ml | 4 +- otherlibs/labltk/support/protocol.mli | 4 +- otherlibs/labltk/support/rawwidget.ml | 4 +- otherlibs/labltk/support/rawwidget.mli | 4 +- otherlibs/labltk/support/slave.ml | 4 +- otherlibs/labltk/support/support.ml | 4 +- otherlibs/labltk/support/support.mli | 4 +- otherlibs/labltk/support/textvariable.ml | 4 +- otherlibs/labltk/support/textvariable.mli | 4 +- otherlibs/labltk/support/timer.ml | 4 +- otherlibs/labltk/support/timer.mli | 4 +- otherlibs/labltk/support/tkthread.ml | 4 +- otherlibs/labltk/support/tkthread.mli | 4 +- otherlibs/labltk/support/tkwait.ml | 4 +- otherlibs/labltk/support/widget.ml | 4 +- otherlibs/labltk/support/widget.mli | 4 +- otherlibs/num/Makefile | 2 +- otherlibs/num/Makefile.nt | 2 +- otherlibs/num/arith_flags.ml | 2 +- otherlibs/num/arith_flags.mli | 2 +- otherlibs/num/arith_status.ml | 2 +- otherlibs/num/arith_status.mli | 2 +- otherlibs/num/big_int.ml | 2 +- otherlibs/num/big_int.mli | 2 +- otherlibs/num/bng.c | 2 +- otherlibs/num/bng.h | 2 +- otherlibs/num/bng_alpha.c | 2 +- otherlibs/num/bng_amd64.c | 2 +- otherlibs/num/bng_digit.c | 2 +- otherlibs/num/bng_ia32.c | 2 +- otherlibs/num/bng_mips.c | 2 +- otherlibs/num/bng_ppc.c | 4 +- otherlibs/num/bng_sparc.c | 2 +- otherlibs/num/int_misc.ml | 2 +- otherlibs/num/int_misc.mli | 2 +- otherlibs/num/nat.h | 2 +- otherlibs/num/nat.ml | 2 +- otherlibs/num/nat.mli | 2 +- otherlibs/num/nat_stubs.c | 2 +- otherlibs/num/num.ml | 2 +- otherlibs/num/num.mli | 2 +- otherlibs/num/ratio.ml | 2 +- otherlibs/num/ratio.mli | 2 +- otherlibs/str/Makefile | 2 +- otherlibs/str/Makefile.nt | 2 +- otherlibs/str/str.ml | 2 +- otherlibs/str/str.mli | 2 +- otherlibs/str/strstubs.c | 2 +- otherlibs/systhreads/Makefile | 2 +- otherlibs/systhreads/Makefile.nt | 2 +- otherlibs/systhreads/condition.ml | 2 +- otherlibs/systhreads/condition.mli | 2 +- otherlibs/systhreads/event.ml | 2 +- otherlibs/systhreads/event.mli | 2 +- otherlibs/systhreads/mutex.ml | 2 +- otherlibs/systhreads/mutex.mli | 2 +- otherlibs/systhreads/st_posix.h | 2 +- otherlibs/systhreads/st_stubs.c | 2 +- otherlibs/systhreads/st_win32.h | 2 +- otherlibs/systhreads/thread.ml | 2 +- otherlibs/systhreads/thread.mli | 2 +- otherlibs/systhreads/threadUnix.ml | 2 +- otherlibs/systhreads/threadUnix.mli | 2 +- otherlibs/systhreads/threads.h | 2 +- otherlibs/threads/Makefile | 2 +- otherlibs/threads/condition.ml | 2 +- otherlibs/threads/condition.mli | 2 +- otherlibs/threads/event.ml | 2 +- otherlibs/threads/event.mli | 2 +- otherlibs/threads/marshal.ml | 2 +- otherlibs/threads/mutex.ml | 2 +- otherlibs/threads/mutex.mli | 2 +- otherlibs/threads/pervasives.ml | 2 +- otherlibs/threads/scheduler.c | 2 +- otherlibs/threads/thread.ml | 2 +- otherlibs/threads/thread.mli | 2 +- otherlibs/threads/threadUnix.ml | 2 +- otherlibs/threads/threadUnix.mli | 2 +- otherlibs/threads/unix.ml | 2 +- otherlibs/unix/Makefile | 2 +- otherlibs/unix/accept.c | 2 +- otherlibs/unix/access.c | 2 +- otherlibs/unix/addrofstr.c | 2 +- otherlibs/unix/alarm.c | 2 +- otherlibs/unix/bind.c | 2 +- otherlibs/unix/chdir.c | 2 +- otherlibs/unix/chmod.c | 2 +- otherlibs/unix/chown.c | 2 +- otherlibs/unix/chroot.c | 2 +- otherlibs/unix/close.c | 2 +- otherlibs/unix/closedir.c | 2 +- otherlibs/unix/connect.c | 2 +- otherlibs/unix/cst2constr.c | 2 +- otherlibs/unix/cst2constr.h | 2 +- otherlibs/unix/cstringv.c | 2 +- otherlibs/unix/dup.c | 2 +- otherlibs/unix/dup2.c | 2 +- otherlibs/unix/envir.c | 2 +- otherlibs/unix/errmsg.c | 2 +- otherlibs/unix/execv.c | 2 +- otherlibs/unix/execve.c | 2 +- otherlibs/unix/execvp.c | 2 +- otherlibs/unix/exit.c | 2 +- otherlibs/unix/fchmod.c | 2 +- otherlibs/unix/fchown.c | 2 +- otherlibs/unix/fcntl.c | 2 +- otherlibs/unix/fork.c | 2 +- otherlibs/unix/ftruncate.c | 2 +- otherlibs/unix/getaddrinfo.c | 2 +- otherlibs/unix/getcwd.c | 2 +- otherlibs/unix/getegid.c | 2 +- otherlibs/unix/geteuid.c | 2 +- otherlibs/unix/getgid.c | 2 +- otherlibs/unix/getgr.c | 2 +- otherlibs/unix/getgroups.c | 2 +- otherlibs/unix/gethost.c | 2 +- otherlibs/unix/gethostname.c | 2 +- otherlibs/unix/getlogin.c | 2 +- otherlibs/unix/getnameinfo.c | 2 +- otherlibs/unix/getpeername.c | 2 +- otherlibs/unix/getpid.c | 2 +- otherlibs/unix/getppid.c | 2 +- otherlibs/unix/getproto.c | 2 +- otherlibs/unix/getpw.c | 2 +- otherlibs/unix/getserv.c | 2 +- otherlibs/unix/getsockname.c | 2 +- otherlibs/unix/gettimeofday.c | 2 +- otherlibs/unix/getuid.c | 2 +- otherlibs/unix/gmtime.c | 2 +- otherlibs/unix/initgroups.c | 6 +- otherlibs/unix/isatty.c | 2 +- otherlibs/unix/itimer.c | 2 +- otherlibs/unix/kill.c | 2 +- otherlibs/unix/link.c | 2 +- otherlibs/unix/listen.c | 2 +- otherlibs/unix/lockf.c | 2 +- otherlibs/unix/lseek.c | 2 +- otherlibs/unix/mkdir.c | 2 +- otherlibs/unix/mkfifo.c | 2 +- otherlibs/unix/nice.c | 2 +- otherlibs/unix/open.c | 2 +- otherlibs/unix/opendir.c | 2 +- otherlibs/unix/pipe.c | 2 +- otherlibs/unix/putenv.c | 2 +- otherlibs/unix/read.c | 2 +- otherlibs/unix/readdir.c | 2 +- otherlibs/unix/readlink.c | 2 +- otherlibs/unix/rename.c | 2 +- otherlibs/unix/rewinddir.c | 2 +- otherlibs/unix/rmdir.c | 2 +- otherlibs/unix/select.c | 2 +- otherlibs/unix/sendrecv.c | 2 +- otherlibs/unix/setgid.c | 2 +- otherlibs/unix/setgroups.c | 6 +- otherlibs/unix/setsid.c | 2 +- otherlibs/unix/setuid.c | 2 +- otherlibs/unix/shutdown.c | 2 +- otherlibs/unix/signals.c | 2 +- otherlibs/unix/sleep.c | 2 +- otherlibs/unix/socket.c | 2 +- otherlibs/unix/socketaddr.c | 2 +- otherlibs/unix/socketaddr.h | 2 +- otherlibs/unix/socketpair.c | 2 +- otherlibs/unix/sockopt.c | 2 +- otherlibs/unix/stat.c | 2 +- otherlibs/unix/strofaddr.c | 2 +- otherlibs/unix/symlink.c | 2 +- otherlibs/unix/termios.c | 2 +- otherlibs/unix/time.c | 2 +- otherlibs/unix/times.c | 2 +- otherlibs/unix/truncate.c | 2 +- otherlibs/unix/umask.c | 2 +- otherlibs/unix/unix.ml | 2 +- otherlibs/unix/unix.mli | 2 +- otherlibs/unix/unixLabels.ml | 2 +- otherlibs/unix/unixLabels.mli | 2 +- otherlibs/unix/unixsupport.c | 2 +- otherlibs/unix/unixsupport.h | 2 +- otherlibs/unix/unlink.c | 2 +- otherlibs/unix/utimes.c | 2 +- otherlibs/unix/wait.c | 2 +- otherlibs/unix/write.c | 2 +- otherlibs/win32graph/Makefile.nt | 2 +- otherlibs/win32graph/dib.c | 3 +- otherlibs/win32graph/draw.c | 3 +- otherlibs/win32graph/events.c | 2 +- otherlibs/win32graph/libgraph.h | 2 +- otherlibs/win32graph/open.c | 3 +- otherlibs/win32unix/Makefile.nt | 2 +- otherlibs/win32unix/accept.c | 2 +- otherlibs/win32unix/bind.c | 2 +- otherlibs/win32unix/channels.c | 2 +- otherlibs/win32unix/close.c | 2 +- otherlibs/win32unix/close_on.c | 2 +- otherlibs/win32unix/connect.c | 2 +- otherlibs/win32unix/createprocess.c | 2 +- otherlibs/win32unix/dup.c | 2 +- otherlibs/win32unix/dup2.c | 2 +- otherlibs/win32unix/errmsg.c | 2 +- otherlibs/win32unix/getpeername.c | 2 +- otherlibs/win32unix/getpid.c | 2 +- otherlibs/win32unix/getsockname.c | 2 +- otherlibs/win32unix/gettimeofday.c | 2 +- otherlibs/win32unix/link.c | 2 +- otherlibs/win32unix/listen.c | 2 +- otherlibs/win32unix/lockf.c | 2 +- otherlibs/win32unix/lseek.c | 2 +- otherlibs/win32unix/mkdir.c | 2 +- otherlibs/win32unix/nonblock.c | 2 +- otherlibs/win32unix/open.c | 2 +- otherlibs/win32unix/pipe.c | 2 +- otherlibs/win32unix/read.c | 2 +- otherlibs/win32unix/rename.c | 2 +- otherlibs/win32unix/select.c | 2 +- otherlibs/win32unix/sendrecv.c | 2 +- otherlibs/win32unix/shutdown.c | 2 +- otherlibs/win32unix/sleep.c | 2 +- otherlibs/win32unix/socket.c | 2 +- otherlibs/win32unix/socketaddr.h | 2 +- otherlibs/win32unix/sockopt.c | 2 +- otherlibs/win32unix/startup.c | 2 +- otherlibs/win32unix/stat.c | 2 +- otherlibs/win32unix/system.c | 2 +- otherlibs/win32unix/unix.ml | 2 +- otherlibs/win32unix/unixsupport.c | 2 +- otherlibs/win32unix/unixsupport.h | 2 +- otherlibs/win32unix/windbug.c | 2 +- otherlibs/win32unix/windbug.h | 2 +- otherlibs/win32unix/windir.c | 2 +- otherlibs/win32unix/winlist.c | 2 +- otherlibs/win32unix/winlist.h | 2 +- otherlibs/win32unix/winwait.c | 2 +- otherlibs/win32unix/winworker.c | 2 +- otherlibs/win32unix/winworker.h | 2 +- otherlibs/win32unix/write.c | 2 +- parsing/asttypes.mli | 2 +- parsing/lexer.mli | 2 +- parsing/lexer.mll | 2 +- parsing/linenum.mli | 2 +- parsing/linenum.mll | 2 +- parsing/location.ml | 2 +- parsing/location.mli | 2 +- parsing/longident.ml | 2 +- parsing/longident.mli | 2 +- parsing/parse.ml | 2 +- parsing/parse.mli | 2 +- parsing/parser.mly | 2 +- parsing/parsetree.mli | 2 +- parsing/printast.ml | 2 +- parsing/printast.mli | 2 +- parsing/syntaxerr.ml | 2 +- parsing/syntaxerr.mli | 2 +- stdlib/Compflags | 2 +- stdlib/Makefile | 2 +- stdlib/Makefile.nt | 2 +- stdlib/Makefile.shared | 2 +- stdlib/StdlibModules | 20 +- stdlib/arg.ml | 2 +- stdlib/arg.mli | 2 +- stdlib/array.ml | 2 +- stdlib/array.mli | 2 +- stdlib/arrayLabels.ml | 2 +- stdlib/arrayLabels.mli | 2 +- stdlib/buffer.ml | 2 +- stdlib/buffer.mli | 2 +- stdlib/callback.ml | 2 +- stdlib/callback.mli | 2 +- stdlib/camlinternalLazy.ml | 2 +- stdlib/camlinternalLazy.mli | 2 +- stdlib/camlinternalMod.ml | 2 +- stdlib/camlinternalMod.mli | 2 +- stdlib/camlinternalOO.ml | 2 +- stdlib/camlinternalOO.mli | 2 +- stdlib/char.ml | 2 +- stdlib/char.mli | 4 +- stdlib/complex.ml | 2 +- stdlib/complex.mli | 2 +- stdlib/digest.ml | 2 +- stdlib/digest.mli | 2 +- stdlib/filename.ml | 2 +- stdlib/filename.mli | 2 +- stdlib/format.ml | 2 +- stdlib/format.mli | 2 +- stdlib/gc.ml | 2 +- stdlib/gc.mli | 2 +- stdlib/genlex.ml | 2 +- stdlib/genlex.mli | 2 +- stdlib/hashtbl.ml | 2 +- stdlib/hashtbl.mli | 2 +- stdlib/header.c | 2 +- stdlib/headernt.c | 2 +- stdlib/int32.ml | 2 +- stdlib/int32.mli | 2 +- stdlib/int64.ml | 2 +- stdlib/int64.mli | 2 +- stdlib/lazy.ml | 4 +- stdlib/lazy.mli | 2 +- stdlib/lexing.ml | 2 +- stdlib/lexing.mli | 2 +- stdlib/list.ml | 2 +- stdlib/list.mli | 2 +- stdlib/listLabels.ml | 2 +- stdlib/listLabels.mli | 2 +- stdlib/map.ml | 2 +- stdlib/map.mli | 2 +- stdlib/marshal.ml | 2 +- stdlib/marshal.mli | 4 +- stdlib/moreLabels.ml | 2 +- stdlib/moreLabels.mli | 4 +- stdlib/nativeint.ml | 2 +- stdlib/nativeint.mli | 2 +- stdlib/obj.ml | 2 +- stdlib/obj.mli | 2 +- stdlib/oo.ml | 2 +- stdlib/oo.mli | 2 +- stdlib/parsing.ml | 2 +- stdlib/parsing.mli | 2 +- stdlib/pervasives.ml | 2 +- stdlib/pervasives.mli | 7 +- stdlib/printexc.ml | 2 +- stdlib/printexc.mli | 2 +- stdlib/printf.ml | 2 +- stdlib/printf.mli | 2 +- stdlib/queue.ml | 2 +- stdlib/queue.mli | 2 +- stdlib/random.ml | 2 +- stdlib/random.mli | 2 +- stdlib/scanf.ml | 2 +- stdlib/scanf.mli | 2 +- stdlib/set.ml | 2 +- stdlib/set.mli | 2 +- stdlib/sort.ml | 2 +- stdlib/sort.mli | 2 +- stdlib/stack.ml | 2 +- stdlib/stack.mli | 2 +- stdlib/stdLabels.ml | 2 +- stdlib/stdLabels.mli | 2 +- stdlib/std_exit.ml | 2 +- stdlib/stream.ml | 2 +- stdlib/stream.mli | 2 +- stdlib/string.ml | 2 +- stdlib/string.mli | 4 +- stdlib/stringLabels.ml | 2 +- stdlib/stringLabels.mli | 4 +- stdlib/sys.mli | 4 +- stdlib/sys.mlp | 2 +- stdlib/weak.ml | 2 +- stdlib/weak.mli | 2 +- testsuite/interactive/lib-gc/alloc.ml | 2 +- .../interactive/lib-graph-2/graph_test.ml | 5 +- testsuite/lib/testing.ml | 2 +- testsuite/lib/testing.mli | 2 +- testsuite/tests/asmcomp/alpha.S | 2 +- testsuite/tests/asmcomp/amd64.S | 2 +- testsuite/tests/asmcomp/arith.cmm | 2 +- testsuite/tests/asmcomp/arm.S | 2 +- testsuite/tests/asmcomp/checkbound.cmm | 2 +- testsuite/tests/asmcomp/fib.cmm | 2 +- testsuite/tests/asmcomp/hppa.S | 2 +- testsuite/tests/asmcomp/i386.S | 2 +- testsuite/tests/asmcomp/i386nt.asm | 2 +- testsuite/tests/asmcomp/ia64.S | 2 +- testsuite/tests/asmcomp/integr.cmm | 2 +- testsuite/tests/asmcomp/lexcmm.mli | 2 +- testsuite/tests/asmcomp/lexcmm.mll | 2 +- testsuite/tests/asmcomp/m68k.S | 2 +- testsuite/tests/asmcomp/main.c | 2 +- testsuite/tests/asmcomp/main.ml | 2 +- testsuite/tests/asmcomp/mainarith.c | 2 +- testsuite/tests/asmcomp/mips.s | 2 +- testsuite/tests/asmcomp/parsecmm.mly | 2 +- testsuite/tests/asmcomp/parsecmmaux.ml | 2 +- testsuite/tests/asmcomp/parsecmmaux.mli | 2 +- testsuite/tests/asmcomp/power-aix.S | 2 +- testsuite/tests/asmcomp/power-elf.S | 2 +- testsuite/tests/asmcomp/power-rhapsody.S | 2 +- testsuite/tests/asmcomp/quicksort.cmm | 2 +- testsuite/tests/asmcomp/quicksort2.cmm | 2 +- testsuite/tests/asmcomp/soli.cmm | 2 +- testsuite/tests/asmcomp/sparc.S | 2 +- testsuite/tests/asmcomp/tagged-fib.cmm | 2 +- testsuite/tests/asmcomp/tagged-integr.cmm | 2 +- testsuite/tests/asmcomp/tagged-quicksort.cmm | 2 +- testsuite/tests/asmcomp/tagged-tak.cmm | 2 +- testsuite/tests/asmcomp/tak.cmm | 2 +- testsuite/tests/basic-more/tformat.ml | 2 +- testsuite/tests/basic/maps.ml | 2 +- testsuite/tests/basic/sets.ml | 2 +- testsuite/tests/lib-bigarray/fftba.ml | 2 +- testsuite/tests/lib-scanf/tscanf.ml | 2 +- testsuite/tests/misc-kb/equations.ml | 2 +- testsuite/tests/misc-kb/equations.mli | 2 +- testsuite/tests/misc-kb/kb.ml | 2 +- testsuite/tests/misc-kb/kb.mli | 2 +- testsuite/tests/misc-kb/kbmain.ml | 2 +- testsuite/tests/misc-kb/orderings.ml | 2 +- testsuite/tests/misc-kb/orderings.mli | 2 +- testsuite/tests/misc-kb/terms.ml | 2 +- testsuite/tests/misc-kb/terms.mli | 2 +- testsuite/tests/misc-unsafe/almabench.ml | 2 +- testsuite/tests/misc-unsafe/fft.ml | 2 +- testsuite/tests/misc-unsafe/quicksort.ml | 2 +- testsuite/tests/misc-unsafe/soli.ml | 2 +- testsuite/tests/misc/bdd.ml | 2 +- testsuite/tests/misc/boyer.ml | 2 +- testsuite/tests/misc/fib.ml | 2 +- testsuite/tests/misc/hamming.ml | 2 +- testsuite/tests/misc/nucleic.ml | 2 +- testsuite/tests/misc/sieve.ml | 2 +- testsuite/tests/misc/takc.ml | 2 +- testsuite/tests/misc/taku.ml | 2 +- testsuite/tests/tool-lexyacc/gram_aux.ml | 2 +- testsuite/tests/tool-lexyacc/grammar.mly | 2 +- testsuite/tests/tool-lexyacc/input | 2 +- testsuite/tests/tool-lexyacc/lexgen.ml | 2 +- testsuite/tests/tool-lexyacc/main.ml | 2 +- testsuite/tests/tool-lexyacc/output.ml | 2 +- testsuite/tests/tool-lexyacc/scan_aux.ml | 2 +- testsuite/tests/tool-lexyacc/scanner.mll | 2 +- testsuite/tests/tool-lexyacc/syntax.ml | 2 +- tools/Makefile | 2 +- tools/Makefile.nt | 2 +- tools/Makefile.shared | 2 +- tools/addlabels.ml | 13 + tools/checkstack.c | 5 +- tools/cleanup-header | 13 + tools/cvt_emit.mll | 2 +- tools/depend.ml | 2 +- tools/depend.mli | 2 +- tools/dumpobj.ml | 2 +- tools/lexer299.mll | 2 +- tools/lexer301.mll | 2 +- tools/magic | 2 +- tools/make-package-macosx | 14 +- tools/objinfo.ml | 4 +- tools/objinfo_helper.c | 4 +- tools/ocaml-objcopy-macosx | 2 +- tools/ocaml299to3.ml | 2 +- tools/ocamlcp.ml | 2 +- tools/ocamldep.ml | 2 +- tools/ocamlmklib.mlp | 2 +- tools/ocamlmktop.ml | 2 +- tools/ocamlmktop.tpl | 2 +- tools/ocamlprof.ml | 2 +- tools/ocamlsize | 12 + tools/primreq.ml | 2 +- tools/profiling.ml | 2 +- tools/profiling.mli | 4 +- tools/scrapelabels.ml | 2 +- tools/setignore | 12 + toplevel/expunge.ml | 2 +- toplevel/genprintval.ml | 2 +- toplevel/genprintval.mli | 2 +- toplevel/opttopdirs.ml | 2 +- toplevel/opttopdirs.mli | 2 +- toplevel/opttoploop.ml | 2 +- toplevel/opttoploop.mli | 2 +- toplevel/opttopmain.ml | 2 +- toplevel/opttopmain.mli | 2 +- toplevel/opttopstart.ml | 2 +- toplevel/topdirs.ml | 2 +- toplevel/topdirs.mli | 2 +- toplevel/toploop.ml | 2 +- toplevel/toploop.mli | 2 +- toplevel/topmain.ml | 2 +- toplevel/topmain.mli | 2 +- toplevel/topstart.ml | 2 +- toplevel/trace.ml | 2 +- toplevel/trace.mli | 2 +- typing/annot.mli | 2 +- typing/btype.ml | 2 +- typing/btype.mli | 2 +- typing/ctype.ml | 2 +- typing/ctype.mli | 2 +- typing/datarepr.ml | 2 +- typing/datarepr.mli | 2 +- typing/env.ml | 2 +- typing/env.mli | 2 +- typing/ident.ml | 2 +- typing/ident.mli | 2 +- typing/includeclass.ml | 2 +- typing/includeclass.mli | 2 +- typing/includecore.ml | 2 +- typing/includecore.mli | 2 +- typing/includemod.ml | 2 +- typing/includemod.mli | 2 +- typing/mtype.ml | 2 +- typing/mtype.mli | 2 +- typing/oprint.ml | 2 +- typing/oprint.mli | 2 +- typing/outcometree.mli | 2 +- typing/parmatch.ml | 2 +- typing/parmatch.mli | 2 +- typing/path.ml | 2 +- typing/path.mli | 2 +- typing/predef.ml | 2 +- typing/predef.mli | 2 +- typing/primitive.ml | 2 +- typing/primitive.mli | 2 +- typing/printtyp.ml | 2 +- typing/printtyp.mli | 2 +- typing/stypes.ml | 2 +- typing/stypes.mli | 2 +- typing/subst.ml | 2 +- typing/subst.mli | 2 +- typing/typeclass.ml | 2 +- typing/typeclass.mli | 2 +- typing/typecore.ml | 2 +- typing/typecore.mli | 2 +- typing/typedecl.ml | 2 +- typing/typedecl.mli | 2 +- typing/typedtree.ml | 2 +- typing/typedtree.mli | 2 +- typing/typemod.ml | 2 +- typing/typemod.mli | 2 +- typing/types.ml | 2 +- typing/types.mli | 2 +- typing/typetexp.ml | 2 +- typing/typetexp.mli | 2 +- typing/unused_var.ml | 2 +- typing/unused_var.mli | 2 +- utils/ccomp.ml | 2 +- utils/ccomp.mli | 2 +- utils/clflags.ml | 2 +- utils/clflags.mli | 2 +- utils/config.mlbuild | 2 +- utils/config.mli | 2 +- utils/config.mlp | 2 +- utils/consistbl.ml | 2 +- utils/consistbl.mli | 2 +- utils/misc.ml | 2 +- utils/misc.mli | 2 +- utils/tbl.ml | 2 +- utils/tbl.mli | 2 +- utils/terminfo.ml | 2 +- utils/terminfo.mli | 2 +- utils/warnings.ml | 2 +- utils/warnings.mli | 2 +- win32caml/Makefile | 2 +- win32caml/editbuffer.c | 653 +++--- win32caml/editbuffer.h | 34 +- win32caml/history.c | 98 +- win32caml/history.h | 12 +- win32caml/inria.h | 15 +- win32caml/libgraph.h | 2 +- win32caml/menu.c | 151 +- win32caml/ocaml.c | 2056 +++++++++-------- win32caml/ocaml.rc | 2 +- win32caml/startocaml.c | 303 +-- yacc/Makefile | 2 +- yacc/Makefile.nt | 2 +- yacc/closure.c | 2 +- yacc/defs.h | 2 +- yacc/error.c | 2 +- yacc/lalr.c | 2 +- yacc/lr0.c | 2 +- yacc/main.c | 4 +- yacc/mkpar.c | 2 +- yacc/output.c | 2 +- yacc/reader.c | 2 +- yacc/skeleton.c | 2 +- yacc/symtab.c | 2 +- yacc/verbose.c | 2 +- yacc/warshall.c | 2 +- 1429 files changed, 5248 insertions(+), 3528 deletions(-) create mode 100755 experimental/doligez/checkheaders diff --git a/Changes b/Changes index dec58f4ad..c6eee36af 100644 --- a/Changes +++ b/Changes @@ -23,7 +23,7 @@ Bug Fixes: - type abbreviations expanding to a universal type variable were not working correctly during unification -Objective Caml 3.12.1: +OCaml 3.12.1: ---------------------- Bug fixes: diff --git a/Makefile b/Makefile index e83e881fc..246f786aa 100644 --- a/Makefile +++ b/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/Makefile.nt b/Makefile.nt index a7e34f599..8d04735a6 100644 --- a/Makefile.nt +++ b/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/_tags b/_tags index 052d8aee1..82c7c649e 100644 --- a/_tags +++ b/_tags @@ -1,3 +1,15 @@ +######################################################################### +# # +# OCaml # +# # +# Nicolas Pouillard, projet Gallium, INRIA Rocquencourt # +# # +# Copyright 2007 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the Q Public License version 1.0. # +# # +######################################################################### + # Ocamlbuild tags file true: -traverse diff --git a/asmcomp/alpha/arch.ml b/asmcomp/alpha/arch.ml index 52d1f11b1..76574d66f 100644 --- a/asmcomp/alpha/arch.ml +++ b/asmcomp/alpha/arch.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/alpha/emit.mlp b/asmcomp/alpha/emit.mlp index 6857da04e..c596e989b 100644 --- a/asmcomp/alpha/emit.mlp +++ b/asmcomp/alpha/emit.mlp @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/alpha/proc.ml b/asmcomp/alpha/proc.ml index 93c2422f6..7c126ca15 100644 --- a/asmcomp/alpha/proc.ml +++ b/asmcomp/alpha/proc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/alpha/reload.ml b/asmcomp/alpha/reload.ml index 53f7b183c..095767ebb 100644 --- a/asmcomp/alpha/reload.ml +++ b/asmcomp/alpha/reload.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/alpha/scheduling.ml b/asmcomp/alpha/scheduling.ml index f59c26ed5..e1fd603db 100644 --- a/asmcomp/alpha/scheduling.ml +++ b/asmcomp/alpha/scheduling.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/alpha/selection.ml b/asmcomp/alpha/selection.ml index d91ec5bdf..c86e931be 100644 --- a/asmcomp/alpha/selection.ml +++ b/asmcomp/alpha/selection.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/amd64/arch.ml b/asmcomp/amd64/arch.ml index 3e8f4b111..dfacdad9e 100644 --- a/asmcomp/amd64/arch.ml +++ b/asmcomp/amd64/arch.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/amd64/emit.mlp b/asmcomp/amd64/emit.mlp index a33a0fa9c..473c63432 100644 --- a/asmcomp/amd64/emit.mlp +++ b/asmcomp/amd64/emit.mlp @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/amd64/emit_nt.mlp b/asmcomp/amd64/emit_nt.mlp index 724d6ee01..38ac00f90 100644 --- a/asmcomp/amd64/emit_nt.mlp +++ b/asmcomp/amd64/emit_nt.mlp @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/amd64/proc.ml b/asmcomp/amd64/proc.ml index 4ba0d5c3e..864c22e18 100644 --- a/asmcomp/amd64/proc.ml +++ b/asmcomp/amd64/proc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/amd64/proc_nt.ml b/asmcomp/amd64/proc_nt.ml index 5c90e4f52..b41717394 100644 --- a/asmcomp/amd64/proc_nt.ml +++ b/asmcomp/amd64/proc_nt.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/amd64/reload.ml b/asmcomp/amd64/reload.ml index 66772de97..e7d5e23b0 100644 --- a/asmcomp/amd64/reload.ml +++ b/asmcomp/amd64/reload.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/amd64/scheduling.ml b/asmcomp/amd64/scheduling.ml index faf0353ed..8ba88f4a7 100644 --- a/asmcomp/amd64/scheduling.ml +++ b/asmcomp/amd64/scheduling.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/amd64/selection.ml b/asmcomp/amd64/selection.ml index 4921e5110..86c4a9b58 100644 --- a/asmcomp/amd64/selection.ml +++ b/asmcomp/amd64/selection.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/arm/arch.ml b/asmcomp/arm/arch.ml index aafb094b7..845ea9733 100644 --- a/asmcomp/arm/arch.ml +++ b/asmcomp/arm/arch.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/arm/emit.mlp b/asmcomp/arm/emit.mlp index cfcb0c94f..9da7beab8 100644 --- a/asmcomp/arm/emit.mlp +++ b/asmcomp/arm/emit.mlp @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/arm/proc.ml b/asmcomp/arm/proc.ml index 06b085b4d..705f8c6fe 100644 --- a/asmcomp/arm/proc.ml +++ b/asmcomp/arm/proc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/arm/reload.ml b/asmcomp/arm/reload.ml index 65d811817..c5b137abc 100644 --- a/asmcomp/arm/reload.ml +++ b/asmcomp/arm/reload.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/arm/scheduling.ml b/asmcomp/arm/scheduling.ml index 8f49ad1ee..4b037289b 100644 --- a/asmcomp/arm/scheduling.ml +++ b/asmcomp/arm/scheduling.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/arm/selection.ml b/asmcomp/arm/selection.ml index 1574bf01e..bd165898c 100644 --- a/asmcomp/arm/selection.ml +++ b/asmcomp/arm/selection.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/asmgen.ml b/asmcomp/asmgen.ml index 9cdf61f40..c14c0006d 100644 --- a/asmcomp/asmgen.ml +++ b/asmcomp/asmgen.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/asmgen.mli b/asmcomp/asmgen.mli index fe578bd4f..f71cba8f7 100644 --- a/asmcomp/asmgen.mli +++ b/asmcomp/asmgen.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/asmlibrarian.ml b/asmcomp/asmlibrarian.ml index 1fddb8127..e0d2170b5 100644 --- a/asmcomp/asmlibrarian.ml +++ b/asmcomp/asmlibrarian.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/asmlibrarian.mli b/asmcomp/asmlibrarian.mli index 66f6a127f..20a0380c9 100644 --- a/asmcomp/asmlibrarian.mli +++ b/asmcomp/asmlibrarian.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/asmlink.ml b/asmcomp/asmlink.ml index dcec75ccb..8a1109fd6 100644 --- a/asmcomp/asmlink.ml +++ b/asmcomp/asmlink.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/asmlink.mli b/asmcomp/asmlink.mli index dbebb7bed..b9465f809 100644 --- a/asmcomp/asmlink.mli +++ b/asmcomp/asmlink.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/asmpackager.ml b/asmcomp/asmpackager.ml index fadfa49f7..548a0a3d5 100644 --- a/asmcomp/asmpackager.ml +++ b/asmcomp/asmpackager.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/asmpackager.mli b/asmcomp/asmpackager.mli index 7d0bb588b..fafccfea3 100644 --- a/asmcomp/asmpackager.mli +++ b/asmcomp/asmpackager.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/clambda.ml b/asmcomp/clambda.ml index 1d25b555f..9bcb36fd1 100644 --- a/asmcomp/clambda.ml +++ b/asmcomp/clambda.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/clambda.mli b/asmcomp/clambda.mli index a1efd644e..72ab85769 100644 --- a/asmcomp/clambda.mli +++ b/asmcomp/clambda.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/closure.ml b/asmcomp/closure.ml index 8f2a034c2..f37908f03 100644 --- a/asmcomp/closure.ml +++ b/asmcomp/closure.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/closure.mli b/asmcomp/closure.mli index f16379068..f406603c2 100644 --- a/asmcomp/closure.mli +++ b/asmcomp/closure.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/cmm.ml b/asmcomp/cmm.ml index 68625e24c..671ce5d78 100644 --- a/asmcomp/cmm.ml +++ b/asmcomp/cmm.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/cmm.mli b/asmcomp/cmm.mli index 1b0907165..76c50859f 100644 --- a/asmcomp/cmm.mli +++ b/asmcomp/cmm.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/cmmgen.ml b/asmcomp/cmmgen.ml index 87a77c623..61fef31b8 100644 --- a/asmcomp/cmmgen.ml +++ b/asmcomp/cmmgen.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/cmmgen.mli b/asmcomp/cmmgen.mli index ba7e5ad00..a192b985e 100644 --- a/asmcomp/cmmgen.mli +++ b/asmcomp/cmmgen.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/cmx_format.mli b/asmcomp/cmx_format.mli index 9abfaf02e..78de321d9 100644 --- a/asmcomp/cmx_format.mli +++ b/asmcomp/cmx_format.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Gallium, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/codegen.ml b/asmcomp/codegen.ml index 280f13940..4b71503f9 100644 --- a/asmcomp/codegen.ml +++ b/asmcomp/codegen.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/codegen.mli b/asmcomp/codegen.mli index b6d8caa61..43f98e50b 100644 --- a/asmcomp/codegen.mli +++ b/asmcomp/codegen.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/coloring.ml b/asmcomp/coloring.ml index 37c03a05b..06c1eb824 100644 --- a/asmcomp/coloring.ml +++ b/asmcomp/coloring.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/coloring.mli b/asmcomp/coloring.mli index cbfb2d6cd..72576fa10 100644 --- a/asmcomp/coloring.mli +++ b/asmcomp/coloring.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/comballoc.ml b/asmcomp/comballoc.ml index 13dbcaffe..9767d2638 100644 --- a/asmcomp/comballoc.ml +++ b/asmcomp/comballoc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/comballoc.mli b/asmcomp/comballoc.mli index 329e92764..20be98054 100644 --- a/asmcomp/comballoc.mli +++ b/asmcomp/comballoc.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/compilenv.ml b/asmcomp/compilenv.ml index 27839311c..0b87efecf 100644 --- a/asmcomp/compilenv.ml +++ b/asmcomp/compilenv.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/compilenv.mli b/asmcomp/compilenv.mli index 664dab933..ca03724ef 100644 --- a/asmcomp/compilenv.mli +++ b/asmcomp/compilenv.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/debuginfo.ml b/asmcomp/debuginfo.ml index a7124e171..ad676d674 100644 --- a/asmcomp/debuginfo.ml +++ b/asmcomp/debuginfo.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Gallium, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/debuginfo.mli b/asmcomp/debuginfo.mli index c3c9c406e..c6e36041c 100644 --- a/asmcomp/debuginfo.mli +++ b/asmcomp/debuginfo.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Gallium, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/emit.mli b/asmcomp/emit.mli index ab7657af9..e2ff68ffc 100644 --- a/asmcomp/emit.mli +++ b/asmcomp/emit.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/emitaux.ml b/asmcomp/emitaux.ml index d4db78ad7..92bda9e29 100644 --- a/asmcomp/emitaux.ml +++ b/asmcomp/emitaux.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/emitaux.mli b/asmcomp/emitaux.mli index 4f666be73..c18d8e80c 100644 --- a/asmcomp/emitaux.mli +++ b/asmcomp/emitaux.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/hppa/arch.ml b/asmcomp/hppa/arch.ml index eb2e1938d..195c28e6f 100644 --- a/asmcomp/hppa/arch.ml +++ b/asmcomp/hppa/arch.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/hppa/emit.mlp b/asmcomp/hppa/emit.mlp index b697a335a..d35544109 100644 --- a/asmcomp/hppa/emit.mlp +++ b/asmcomp/hppa/emit.mlp @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/hppa/proc.ml b/asmcomp/hppa/proc.ml index c0b40adbe..7ee20040f 100644 --- a/asmcomp/hppa/proc.ml +++ b/asmcomp/hppa/proc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/hppa/reload.ml b/asmcomp/hppa/reload.ml index 54208fcc3..b6fe65980 100644 --- a/asmcomp/hppa/reload.ml +++ b/asmcomp/hppa/reload.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/hppa/scheduling.ml b/asmcomp/hppa/scheduling.ml index 0cdd0998c..b669aec21 100644 --- a/asmcomp/hppa/scheduling.ml +++ b/asmcomp/hppa/scheduling.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/hppa/selection.ml b/asmcomp/hppa/selection.ml index 74c546b08..72792e2b0 100644 --- a/asmcomp/hppa/selection.ml +++ b/asmcomp/hppa/selection.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/i386/arch.ml b/asmcomp/i386/arch.ml index 04d673d91..5ffbeeb23 100644 --- a/asmcomp/i386/arch.ml +++ b/asmcomp/i386/arch.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/i386/emit.mlp b/asmcomp/i386/emit.mlp index 881a936a1..7ac0e4e7d 100644 --- a/asmcomp/i386/emit.mlp +++ b/asmcomp/i386/emit.mlp @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/i386/emit_nt.mlp b/asmcomp/i386/emit_nt.mlp index 7091b3df8..e010cf8cc 100644 --- a/asmcomp/i386/emit_nt.mlp +++ b/asmcomp/i386/emit_nt.mlp @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/i386/proc.ml b/asmcomp/i386/proc.ml index d2e3cdda9..55cb32c9b 100644 --- a/asmcomp/i386/proc.ml +++ b/asmcomp/i386/proc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/i386/proc_nt.ml b/asmcomp/i386/proc_nt.ml index 5e617ff1a..ebed8f647 100644 --- a/asmcomp/i386/proc_nt.ml +++ b/asmcomp/i386/proc_nt.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/i386/reload.ml b/asmcomp/i386/reload.ml index 539d45dae..66ad6a140 100644 --- a/asmcomp/i386/reload.ml +++ b/asmcomp/i386/reload.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/i386/scheduling.ml b/asmcomp/i386/scheduling.ml index 6f018cc87..cbfaa2111 100644 --- a/asmcomp/i386/scheduling.ml +++ b/asmcomp/i386/scheduling.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/i386/selection.ml b/asmcomp/i386/selection.ml index 5a8720fbe..2e0f5a737 100644 --- a/asmcomp/i386/selection.ml +++ b/asmcomp/i386/selection.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/ia64/arch.ml b/asmcomp/ia64/arch.ml index 77dddaca2..006660d4a 100644 --- a/asmcomp/ia64/arch.ml +++ b/asmcomp/ia64/arch.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/ia64/emit.mlp b/asmcomp/ia64/emit.mlp index 3d8eeb974..b722af015 100644 --- a/asmcomp/ia64/emit.mlp +++ b/asmcomp/ia64/emit.mlp @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/ia64/proc.ml b/asmcomp/ia64/proc.ml index 15311aa02..97ee3f3cc 100644 --- a/asmcomp/ia64/proc.ml +++ b/asmcomp/ia64/proc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/ia64/reload.ml b/asmcomp/ia64/reload.ml index 338c08844..09210b164 100644 --- a/asmcomp/ia64/reload.ml +++ b/asmcomp/ia64/reload.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/ia64/scheduling.ml b/asmcomp/ia64/scheduling.ml index 9bed03a6c..6c696aca2 100644 --- a/asmcomp/ia64/scheduling.ml +++ b/asmcomp/ia64/scheduling.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/ia64/selection.ml b/asmcomp/ia64/selection.ml index 6be4a18cd..0c16c346a 100644 --- a/asmcomp/ia64/selection.ml +++ b/asmcomp/ia64/selection.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/interf.ml b/asmcomp/interf.ml index 30f17b725..f22672b55 100644 --- a/asmcomp/interf.ml +++ b/asmcomp/interf.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/interf.mli b/asmcomp/interf.mli index 00f4df498..9e16f8364 100644 --- a/asmcomp/interf.mli +++ b/asmcomp/interf.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/linearize.ml b/asmcomp/linearize.ml index 5833595ae..a5c758823 100644 --- a/asmcomp/linearize.ml +++ b/asmcomp/linearize.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/linearize.mli b/asmcomp/linearize.mli index aaf03184c..ca11006b5 100644 --- a/asmcomp/linearize.mli +++ b/asmcomp/linearize.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/liveness.ml b/asmcomp/liveness.ml index 4e743d646..74a034fb3 100644 --- a/asmcomp/liveness.ml +++ b/asmcomp/liveness.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/liveness.mli b/asmcomp/liveness.mli index 3353b4443..8a25a27bc 100644 --- a/asmcomp/liveness.mli +++ b/asmcomp/liveness.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/mach.ml b/asmcomp/mach.ml index 027550ab1..b628f76ca 100644 --- a/asmcomp/mach.ml +++ b/asmcomp/mach.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/mach.mli b/asmcomp/mach.mli index 438d15d2f..dd58b8a02 100644 --- a/asmcomp/mach.mli +++ b/asmcomp/mach.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/mips/arch.ml b/asmcomp/mips/arch.ml index c174ef6c9..af36f6f27 100644 --- a/asmcomp/mips/arch.ml +++ b/asmcomp/mips/arch.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/mips/emit.mlp b/asmcomp/mips/emit.mlp index 06915fd34..1abf9d599 100644 --- a/asmcomp/mips/emit.mlp +++ b/asmcomp/mips/emit.mlp @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/mips/proc.ml b/asmcomp/mips/proc.ml index 53971890e..9b2d84ae1 100644 --- a/asmcomp/mips/proc.ml +++ b/asmcomp/mips/proc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/mips/reload.ml b/asmcomp/mips/reload.ml index 0bdd208d6..2e9838bc9 100644 --- a/asmcomp/mips/reload.ml +++ b/asmcomp/mips/reload.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/mips/scheduling.ml b/asmcomp/mips/scheduling.ml index 062529ad5..17b7e3883 100644 --- a/asmcomp/mips/scheduling.ml +++ b/asmcomp/mips/scheduling.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/mips/selection.ml b/asmcomp/mips/selection.ml index 4dbaa86ea..791fe296d 100644 --- a/asmcomp/mips/selection.ml +++ b/asmcomp/mips/selection.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/power/arch.ml b/asmcomp/power/arch.ml index 8828de7c0..5da85099e 100644 --- a/asmcomp/power/arch.ml +++ b/asmcomp/power/arch.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/power/emit.mlp b/asmcomp/power/emit.mlp index b6496f987..efa215baa 100644 --- a/asmcomp/power/emit.mlp +++ b/asmcomp/power/emit.mlp @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/power/proc.ml b/asmcomp/power/proc.ml index ab8e5a5d5..6eaacbbad 100644 --- a/asmcomp/power/proc.ml +++ b/asmcomp/power/proc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/power/reload.ml b/asmcomp/power/reload.ml index 3f74c3f5e..ef0ab79df 100644 --- a/asmcomp/power/reload.ml +++ b/asmcomp/power/reload.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/power/scheduling.ml b/asmcomp/power/scheduling.ml index aac37c879..90d08831d 100644 --- a/asmcomp/power/scheduling.ml +++ b/asmcomp/power/scheduling.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/power/selection.ml b/asmcomp/power/selection.ml index d87b300cc..7c37f53ba 100644 --- a/asmcomp/power/selection.ml +++ b/asmcomp/power/selection.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/printcmm.ml b/asmcomp/printcmm.ml index 364d9ea88..996eaa21c 100644 --- a/asmcomp/printcmm.ml +++ b/asmcomp/printcmm.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/printcmm.mli b/asmcomp/printcmm.mli index d498ddb72..c64657653 100644 --- a/asmcomp/printcmm.mli +++ b/asmcomp/printcmm.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/printlinear.ml b/asmcomp/printlinear.ml index 3737e72c1..0e6f37b69 100644 --- a/asmcomp/printlinear.ml +++ b/asmcomp/printlinear.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/printlinear.mli b/asmcomp/printlinear.mli index 5e90c11c6..bb179c94c 100644 --- a/asmcomp/printlinear.mli +++ b/asmcomp/printlinear.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/printmach.ml b/asmcomp/printmach.ml index d7d538df3..339deb7ee 100644 --- a/asmcomp/printmach.ml +++ b/asmcomp/printmach.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/printmach.mli b/asmcomp/printmach.mli index 28328707c..509018d54 100644 --- a/asmcomp/printmach.mli +++ b/asmcomp/printmach.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/proc.mli b/asmcomp/proc.mli index ba593592b..7d0a5e485 100644 --- a/asmcomp/proc.mli +++ b/asmcomp/proc.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/reg.ml b/asmcomp/reg.ml index f9bef4967..30c0ab5ab 100644 --- a/asmcomp/reg.ml +++ b/asmcomp/reg.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/reg.mli b/asmcomp/reg.mli index b802344de..11e314f61 100644 --- a/asmcomp/reg.mli +++ b/asmcomp/reg.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/reload.mli b/asmcomp/reload.mli index fc72446e7..ff4b1637a 100644 --- a/asmcomp/reload.mli +++ b/asmcomp/reload.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/reloadgen.ml b/asmcomp/reloadgen.ml index 898c65c98..fc28acde4 100644 --- a/asmcomp/reloadgen.ml +++ b/asmcomp/reloadgen.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/reloadgen.mli b/asmcomp/reloadgen.mli index f0d1c78c0..9f0b2b4e1 100644 --- a/asmcomp/reloadgen.mli +++ b/asmcomp/reloadgen.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/schedgen.ml b/asmcomp/schedgen.ml index 00762fa36..a5dfcfdbf 100644 --- a/asmcomp/schedgen.ml +++ b/asmcomp/schedgen.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/schedgen.mli b/asmcomp/schedgen.mli index ab5f072b7..e2c046d22 100644 --- a/asmcomp/schedgen.mli +++ b/asmcomp/schedgen.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/scheduling.mli b/asmcomp/scheduling.mli index dd24354ad..a006d1f13 100644 --- a/asmcomp/scheduling.mli +++ b/asmcomp/scheduling.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/selectgen.ml b/asmcomp/selectgen.ml index 50f949a77..106d42bc2 100644 --- a/asmcomp/selectgen.ml +++ b/asmcomp/selectgen.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/selectgen.mli b/asmcomp/selectgen.mli index 7c30f9f54..73309bf7b 100644 --- a/asmcomp/selectgen.mli +++ b/asmcomp/selectgen.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/selection.mli b/asmcomp/selection.mli index ab17b557d..a78cb1dae 100644 --- a/asmcomp/selection.mli +++ b/asmcomp/selection.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/sparc/arch.ml b/asmcomp/sparc/arch.ml index 61ba35b9a..b42557c97 100644 --- a/asmcomp/sparc/arch.ml +++ b/asmcomp/sparc/arch.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/sparc/emit.mlp b/asmcomp/sparc/emit.mlp index f44f813e5..52a8bc60a 100644 --- a/asmcomp/sparc/emit.mlp +++ b/asmcomp/sparc/emit.mlp @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/sparc/proc.ml b/asmcomp/sparc/proc.ml index 2fd147bfc..f7b204db5 100644 --- a/asmcomp/sparc/proc.ml +++ b/asmcomp/sparc/proc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/sparc/reload.ml b/asmcomp/sparc/reload.ml index a590ba3ff..6b1d8aea9 100644 --- a/asmcomp/sparc/reload.ml +++ b/asmcomp/sparc/reload.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/sparc/scheduling.ml b/asmcomp/sparc/scheduling.ml index efe9a1f4c..180af4b19 100644 --- a/asmcomp/sparc/scheduling.ml +++ b/asmcomp/sparc/scheduling.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/sparc/selection.ml b/asmcomp/sparc/selection.ml index 965680b65..1dfc06f27 100644 --- a/asmcomp/sparc/selection.ml +++ b/asmcomp/sparc/selection.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/spill.ml b/asmcomp/spill.ml index 968987d48..874f73579 100644 --- a/asmcomp/spill.ml +++ b/asmcomp/spill.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/spill.mli b/asmcomp/spill.mli index 16a8c01ad..4db422227 100644 --- a/asmcomp/spill.mli +++ b/asmcomp/spill.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/split.ml b/asmcomp/split.ml index 9e6130d21..8c5e22703 100644 --- a/asmcomp/split.ml +++ b/asmcomp/split.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmcomp/split.mli b/asmcomp/split.mli index 67e0956e8..baf350d50 100644 --- a/asmcomp/split.mli +++ b/asmcomp/split.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/asmrun/Makefile b/asmrun/Makefile index 81c0120a4..2ccfa880d 100644 --- a/asmrun/Makefile +++ b/asmrun/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/asmrun/Makefile.nt b/asmrun/Makefile.nt index 75fe26141..67f94d658 100644 --- a/asmrun/Makefile.nt +++ b/asmrun/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/asmrun/alpha.S b/asmrun/alpha.S index c5251b73a..c726d4592 100644 --- a/asmrun/alpha.S +++ b/asmrun/alpha.S @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/asmrun/amd64.S b/asmrun/amd64.S index 645c2e616..b960ea802 100644 --- a/asmrun/amd64.S +++ b/asmrun/amd64.S @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/asmrun/amd64nt.asm b/asmrun/amd64nt.asm index 4c31bc873..2a38fd9f3 100644 --- a/asmrun/amd64nt.asm +++ b/asmrun/amd64nt.asm @@ -1,15 +1,15 @@ -;********************************************************************* -; -; Objective Caml -; -; Xavier Leroy, projet Gallium, INRIA Rocquencourt -; -; Copyright 2006 Institut National de Recherche en Informatique et -; en Automatique. All rights reserved. This file is distributed -; under the terms of the GNU Library General Public License, with -; the special exception on linking described in file ../LICENSE. -; -;********************************************************************* +;*********************************************************************** +;* * +;* OCaml * +;* * +;* Xavier Leroy, projet Gallium, INRIA Rocquencourt * +;* * +;* Copyright 2006 Institut National de Recherche en Informatique et * +;* en Automatique. All rights reserved. This file is distributed * +;* under the terms of the GNU Library General Public License, with * +;* the special exception on linking described in file ../LICENSE. * +;* * +;*********************************************************************** ; $Id$ diff --git a/asmrun/arm.S b/asmrun/arm.S index 8a47d182c..b7c64243a 100644 --- a/asmrun/arm.S +++ b/asmrun/arm.S @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/asmrun/backtrace.c b/asmrun/backtrace.c index 0825cade5..c9581dd27 100644 --- a/asmrun/backtrace.c +++ b/asmrun/backtrace.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Gallium, INRIA Rocquencourt */ /* */ diff --git a/asmrun/fail.c b/asmrun/fail.c index a1ec0fb07..45a4b8fa8 100644 --- a/asmrun/fail.c +++ b/asmrun/fail.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/asmrun/hppa.S b/asmrun/hppa.S index abdd4554b..1f367e827 100644 --- a/asmrun/hppa.S +++ b/asmrun/hppa.S @@ -1,15 +1,15 @@ -;********************************************************************* -;* * -;* Objective Caml * -;* * -;* Xavier Leroy, projet Cristal, INRIA Rocquencourt * -;* * -;* Copyright 1996 Institut National de Recherche en Informatique et * -;* en Automatique. All rights reserved. This file is distributed * -;* under the terms of the GNU Library General Public License, with * -;* the special exception on linking described in file ../LICENSE. * -;* * -;********************************************************************* +;*********************************************************************** +;* * +;* OCaml * +;* * +;* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +;* * +;* Copyright 1996 Institut National de Recherche en Informatique et * +;* en Automatique. All rights reserved. This file is distributed * +;* under the terms of the GNU Library General Public License, with * +;* the special exception on linking described in file ../LICENSE. * +;* * +;*********************************************************************** ; $Id$ diff --git a/asmrun/i386.S b/asmrun/i386.S index 73ac46741..fc91d393f 100644 --- a/asmrun/i386.S +++ b/asmrun/i386.S @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/asmrun/i386nt.asm b/asmrun/i386nt.asm index 711449cfb..02c6ff564 100644 --- a/asmrun/i386nt.asm +++ b/asmrun/i386nt.asm @@ -1,15 +1,15 @@ -;********************************************************************* -; -; Objective Caml -; -; Xavier Leroy, projet Cristal, INRIA Rocquencourt -; -; Copyright 1996 Institut National de Recherche en Informatique et -; en Automatique. All rights reserved. This file is distributed -; under the terms of the GNU Library General Public License, with -; the special exception on linking described in file ../LICENSE. -; -;********************************************************************* +;*********************************************************************** +;* * +;* OCaml * +;* * +;* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +;* * +;* Copyright 1996 Institut National de Recherche en Informatique et * +;* en Automatique. All rights reserved. This file is distributed * +;* under the terms of the GNU Library General Public License, with * +;* the special exception on linking described in file ../LICENSE. * +;* * +;*********************************************************************** ; $Id$ diff --git a/asmrun/ia64.S b/asmrun/ia64.S index d4296fa4a..4680aa932 100644 --- a/asmrun/ia64.S +++ b/asmrun/ia64.S @@ -1,12 +1,13 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ /* Copyright 1996 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ -/* under the terms of the Q Public License version 1.0. */ +/* under the terms of the GNU Library General Public License, with */ +/* the special exception on linking described in file ../LICENSE. */ /* */ /***********************************************************************/ diff --git a/asmrun/m68k.S b/asmrun/m68k.S index 559eacbeb..e456f3c35 100644 --- a/asmrun/m68k.S +++ b/asmrun/m68k.S @@ -1,6 +1,6 @@ |*********************************************************************** |* * -|* Objective Caml * +|* OCaml * |* * |* Xavier Leroy, projet Cristal, INRIA Rocquencourt * |* * diff --git a/asmrun/mips.s b/asmrun/mips.s index 03fd62343..5f63c3f3f 100644 --- a/asmrun/mips.s +++ b/asmrun/mips.s @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/asmrun/natdynlink.c b/asmrun/natdynlink.c index 84cfb590c..9de81b018 100644 --- a/asmrun/natdynlink.c +++ b/asmrun/natdynlink.c @@ -1,3 +1,16 @@ +/***********************************************************************/ +/* */ +/* OCaml */ +/* */ +/* Alain Frisch, projet Gallium, INRIA Rocquencourt */ +/* */ +/* Copyright 2007 Institut National de Recherche en Informatique et */ +/* en Automatique. All rights reserved. This file is distributed */ +/* under the terms of the GNU Library General Public License, with */ +/* the special exception on linking described in file ../LICENSE. */ +/* */ +/***********************************************************************/ + #include "misc.h" #include "mlvalues.h" #include "memory.h" diff --git a/asmrun/power-aix.S b/asmrun/power-aix.S index d63cdae86..21e1c7e28 100644 --- a/asmrun/power-aix.S +++ b/asmrun/power-aix.S @@ -1,15 +1,15 @@ -#********************************************************************* -#* * -#* Objective Caml * -#* * -#* Xavier Leroy, projet Cristal, INRIA Rocquencourt * -#* * -#* Copyright 1996 Institut National de Recherche en Informatique et * -#* en Automatique. All rights reserved. This file is distributed * -#* under the terms of the GNU Library General Public License, with * -#* the special exception on linking described in file ../LICENSE. * -#* * -#********************************************************************* +#*********************************************************************** +#* * +#* OCaml * +#* * +#* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +#* * +#* Copyright 1996 Institut National de Recherche en Informatique et * +#* en Automatique. All rights reserved. This file is distributed * +#* under the terms of the GNU Library General Public License, with * +#* the special exception on linking described in file ../LICENSE. * +#* * +#*********************************************************************** # $Id$ diff --git a/asmrun/power-elf.S b/asmrun/power-elf.S index 968e3aeb8..34ef6cc21 100644 --- a/asmrun/power-elf.S +++ b/asmrun/power-elf.S @@ -1,15 +1,15 @@ -/*********************************************************************/ -/* */ -/* Objective Caml */ -/* */ -/* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ -/* */ -/* Copyright 1996 Institut National de Recherche en Informatique et */ -/* en Automatique. All rights reserved. This file is distributed */ -/* under the terms of the GNU Library General Public License, with */ -/* the special exception on linking described in file ../LICENSE. */ -/* */ -/*********************************************************************/ +/***********************************************************************/ +/* */ +/* OCaml */ +/* */ +/* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ +/* */ +/* Copyright 1996 Institut National de Recherche en Informatique et */ +/* en Automatique. All rights reserved. This file is distributed */ +/* under the terms of the GNU Library General Public License, with */ +/* the special exception on linking described in file ../LICENSE. */ +/* */ +/***********************************************************************/ /* $Id$ */ diff --git a/asmrun/power-rhapsody.S b/asmrun/power-rhapsody.S index 765de9c8c..ab7f5384c 100644 --- a/asmrun/power-rhapsody.S +++ b/asmrun/power-rhapsody.S @@ -1,15 +1,15 @@ -/*********************************************************************/ -/* */ -/* Objective Caml */ -/* */ -/* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ -/* */ -/* Copyright 1996 Institut National de Recherche en Informatique et */ -/* en Automatique. All rights reserved. This file is distributed */ -/* under the terms of the GNU Library General Public License, with */ -/* the special exception on linking described in file ../LICENSE. */ -/* */ -/*********************************************************************/ +/***********************************************************************/ +/* */ +/* OCaml */ +/* */ +/* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ +/* */ +/* Copyright 1996 Institut National de Recherche en Informatique et */ +/* en Automatique. All rights reserved. This file is distributed */ +/* under the terms of the GNU Library General Public License, with */ +/* the special exception on linking described in file ../LICENSE. */ +/* */ +/***********************************************************************/ /* $Id$ */ diff --git a/asmrun/roots.c b/asmrun/roots.c index cb75a099c..4a495e2c1 100644 --- a/asmrun/roots.c +++ b/asmrun/roots.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/asmrun/signals_asm.c b/asmrun/signals_asm.c index f8f542ada..5b3f9955e 100644 --- a/asmrun/signals_asm.c +++ b/asmrun/signals_asm.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Gallium, INRIA Rocquencourt */ /* */ diff --git a/asmrun/signals_osdep.h b/asmrun/signals_osdep.h index 76552e5ee..85e9b750a 100644 --- a/asmrun/signals_osdep.h +++ b/asmrun/signals_osdep.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/asmrun/sparc.S b/asmrun/sparc.S index 38d0be0c1..dd1e5844a 100644 --- a/asmrun/sparc.S +++ b/asmrun/sparc.S @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/asmrun/stack.h b/asmrun/stack.h index 62a33e71f..2609d391c 100644 --- a/asmrun/stack.h +++ b/asmrun/stack.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/asmrun/startup.c b/asmrun/startup.c index 8bfe76211..0f8ed10f7 100644 --- a/asmrun/startup.c +++ b/asmrun/startup.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/boot/ocamlc b/boot/ocamlc index 8b5982d7c46f0d988b8f37c8af10d3fc1a2d6f07..beb85c70daab8ed49f74bf4b172e35aeb9ecbeab 100755 GIT binary patch delta 1149 zcmZA0Z%iCT6aesh%kIn_d$+ehEZ&{4cN}mCYO$EMT9Y+hmHrJSTFy`ts*S-En@dXK zpFpGrQcOrh%fX}EA*nXj(xzNP)A>*%F(eXG6B^?uTU$$eQToAZno5%@<6GOB>L$PJ zzIpp*_s#4cy6RlcJNx>ePw6W-rH;%hH@D+&2CEid&Z_&K=+QkM&wHeW#0ijoq7aL? z$Gv>yPWW%Wl;RMH5{DEKla!M(;?BoNkUUEa;^y3%ySeZ`$+a}FLiKp+=v+;FgbDkW zIv4Y`(scpZjZI-~CDdb2ShJu8C&Jn~2;up#)}!29#&cdRjBiG?%A!TOxrAusMUuxL zRVY7tus*C+^q+`m;zWd*3N+(P8AI5L$#PalQExe02`}SxIZMDdc%BB88%NP=u~v8v zcUjC<@{@SjVyEFO?ufD^XgD2Z?OkqTHzE>Ws!fk(eSBbG@rf!5XoM_|; z{J4?(p#(AM+gYl=hW0p*)V425>3+%gcd>kT z0{?x*&5IaqF;?`CjdS89K2k_@;umA%f$no+@@?Y_5Z|SYodv!Ms&;>*N}TF4EQsT! z4mwrfe79kVu}7E(VrrlNWld8{VhiSrVPs%sm`#;pN}WXZ{9t@>00~ delta 1054 zcmY+CZD?C%6vuOtd!HxiO>XZp+ceGS%}dwRWuulvEp{4hYH61b!Pi16ZZgWC&2Ty~ z3?~j-?4a6}HTHB{QY?NbDuugsco~C5DcYfE)%n7FYn_%^e5sp4hr%Au)eiK5A3W!O z?)jg4&b{9)r>1^L9U6o|`=H~rG(IOUJY=)kuzXe4apVKJ#{6VX$|XQEzqlsNhngLf z+(`5hc4C0Aj!am(L_A0&;NQE3nOkKaRN{24+~f+bt0_#{9X_bRwOY9qTo@0?&q>SI zg}}+1)EfLSAlLgZt~*-Jmg8rH<=%k{ze)N~-zM4Y+r)kb$YXaML)ee2bu30vKxa+x zJf?LPg;m_IvzXogI=-T_EcD}FI!oG>H*kB9y$M(F_aN(r7^XvP5A@<}h@ufx!Ylw2 z7!9+2yK@E$VYb5_nZczny96)cT!h8p9Ii#Es&!*wB$v3l&0QX{`ft8^dziOal z98*!Y8y>^yD9gz6h7h~4yj}94w~=+il-bkB6oB{4JvTESxL!Lc#MW6MM$MruEdME} zrnt^-@4`nrxf?t7@lO1+*XcITb@E^uF5u!AACuquQiufR3q0lT`dSEDj?F`CC1}zA ze4l>2P~Z_bifaX)^q--pn!XhxPrO6?N>ncjaVKV8=4EKZ%5ff*PmyB7WR_m_{&C(2 z4fxDBe-$>PjywQ&U@P)5$l(I=Vfnz45EpUh1n=3fO4l2$sk`k3e1C#J4hFU!;~6R& zKE{V(7JbJ#?axdf=SM(3eMyKuTs*;b`IqmlVH`ys_oSAEXt_+r#44tWJPFrupva>e z)F1!fBY|g&JO%flDDt#tl(I3aHJvlqUE;d`BuQ52C7KBs{aE; zi3heku_AAo>g@SV>zelX7(vH_kg{*W$668YM!63yzSt& zmEK^`kSajgd!HdGpxm;B2JI|?%-dN4Sv>Oqq*w`B delta 28 jcmX^6Pw4DFp@tU57N#xCOo2>>7VRv7%-dN4Sv>Oqq@)R9 diff --git a/boot/ocamllex b/boot/ocamllex index 50e5cc5f157cb3eed6993ef071253b2d5a77c5a0..1f351993fbe4c2f4f11bb5181271c918d5187e07 100755 GIT binary patch delta 22 ecmX@Glk31vu7(!IElihUn2ZdzUx{IQV-Emv2nlEa delta 22 ecmX@Glk31vu7(!IElihUm<%npUx{IQV-EmvI0
>... to ...foo... per line h s/.*<:lower<\(.*\)>>.*/\1/ diff --git a/build/world.all.sh b/build/world.all.sh index d8a18abb9..bf456fc27 100755 --- a/build/world.all.sh +++ b/build/world.all.sh @@ -1,4 +1,17 @@ #!/bin/sh + +######################################################################### +# # +# OCaml # +# # +# Nicolas Pouillard, projet Gallium, INRIA Rocquencourt # +# # +# Copyright 2007 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the Q Public License version 1.0. # +# # +######################################################################### + # $Id$ set -e cd `dirname $0`/.. diff --git a/build/world.byte.sh b/build/world.byte.sh index d3e96dc4b..a30cda2ff 100755 --- a/build/world.byte.sh +++ b/build/world.byte.sh @@ -1,4 +1,17 @@ #!/bin/sh + +######################################################################### +# # +# OCaml # +# # +# Nicolas Pouillard, projet Gallium, INRIA Rocquencourt # +# # +# Copyright 2007 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the Q Public License version 1.0. # +# # +######################################################################### + # $Id$ set -e cd `dirname $0`/.. diff --git a/build/world.native.sh b/build/world.native.sh index ac4a18323..19526805e 100755 --- a/build/world.native.sh +++ b/build/world.native.sh @@ -1,4 +1,17 @@ #!/bin/sh + +######################################################################### +# # +# OCaml # +# # +# Nicolas Pouillard, projet Gallium, INRIA Rocquencourt # +# # +# Copyright 2007 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the Q Public License version 1.0. # +# # +######################################################################### + # $Id$ set -e cd `dirname $0`/.. diff --git a/build/world.sh b/build/world.sh index 534bce545..3b08dc78d 100755 --- a/build/world.sh +++ b/build/world.sh @@ -2,7 +2,7 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Nicolas Pouillard, projet Gallium, INRIA Rocquencourt # # # diff --git a/bytecomp/bytegen.ml b/bytecomp/bytegen.ml index b6c8f6fae..9773f0b7c 100644 --- a/bytecomp/bytegen.ml +++ b/bytecomp/bytegen.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/bytegen.mli b/bytecomp/bytegen.mli index 04265fde3..e0cd5f617 100644 --- a/bytecomp/bytegen.mli +++ b/bytecomp/bytegen.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/bytelibrarian.ml b/bytecomp/bytelibrarian.ml index ba08fc019..62d900023 100644 --- a/bytecomp/bytelibrarian.ml +++ b/bytecomp/bytelibrarian.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/bytelibrarian.mli b/bytecomp/bytelibrarian.mli index a4f9cc2f2..a4250f96d 100644 --- a/bytecomp/bytelibrarian.mli +++ b/bytecomp/bytelibrarian.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/bytelink.ml b/bytecomp/bytelink.ml index 15c6f7f58..794a0acb4 100644 --- a/bytecomp/bytelink.ml +++ b/bytecomp/bytelink.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/bytelink.mli b/bytecomp/bytelink.mli index 2e8f0cb31..375bde0d5 100644 --- a/bytecomp/bytelink.mli +++ b/bytecomp/bytelink.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/bytepackager.ml b/bytecomp/bytepackager.ml index e2b6ff54b..eee60f0f4 100644 --- a/bytecomp/bytepackager.ml +++ b/bytecomp/bytepackager.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/bytepackager.mli b/bytecomp/bytepackager.mli index 836eb9c63..2a599d9f9 100644 --- a/bytecomp/bytepackager.mli +++ b/bytecomp/bytepackager.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/bytesections.ml b/bytecomp/bytesections.ml index 16eaf2377..342f07141 100644 --- a/bytecomp/bytesections.ml +++ b/bytecomp/bytesections.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/bytesections.mli b/bytecomp/bytesections.mli index 5292cc1b4..c9264ad89 100644 --- a/bytecomp/bytesections.mli +++ b/bytecomp/bytesections.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/cmo_format.mli b/bytecomp/cmo_format.mli index c87e6df4e..b0cd05d67 100644 --- a/bytecomp/cmo_format.mli +++ b/bytecomp/cmo_format.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/dll.ml b/bytecomp/dll.ml index bcf66b429..6109028fc 100644 --- a/bytecomp/dll.ml +++ b/bytecomp/dll.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/dll.mli b/bytecomp/dll.mli index fea455f7c..a4841d3d3 100644 --- a/bytecomp/dll.mli +++ b/bytecomp/dll.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/emitcode.ml b/bytecomp/emitcode.ml index 2cec99dc8..f9a33db73 100644 --- a/bytecomp/emitcode.ml +++ b/bytecomp/emitcode.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/emitcode.mli b/bytecomp/emitcode.mli index fa20de181..55f3dff11 100644 --- a/bytecomp/emitcode.mli +++ b/bytecomp/emitcode.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/instruct.ml b/bytecomp/instruct.ml index 4f4fa14fa..a26c09458 100644 --- a/bytecomp/instruct.ml +++ b/bytecomp/instruct.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/instruct.mli b/bytecomp/instruct.mli index 6b9367f9a..0fdccd298 100644 --- a/bytecomp/instruct.mli +++ b/bytecomp/instruct.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/lambda.ml b/bytecomp/lambda.ml index 06523ebcc..b1e6f16eb 100644 --- a/bytecomp/lambda.ml +++ b/bytecomp/lambda.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/lambda.mli b/bytecomp/lambda.mli index e671b8915..d09a8c6f6 100644 --- a/bytecomp/lambda.mli +++ b/bytecomp/lambda.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/matching.ml b/bytecomp/matching.ml index 21006cc69..402ac12ad 100644 --- a/bytecomp/matching.ml +++ b/bytecomp/matching.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/matching.mli b/bytecomp/matching.mli index ebfed8410..d8ea79108 100644 --- a/bytecomp/matching.mli +++ b/bytecomp/matching.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/meta.ml b/bytecomp/meta.ml index a4beaf422..732bcc8a1 100644 --- a/bytecomp/meta.ml +++ b/bytecomp/meta.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/meta.mli b/bytecomp/meta.mli index 774c5f137..93be656ad 100644 --- a/bytecomp/meta.mli +++ b/bytecomp/meta.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/printinstr.ml b/bytecomp/printinstr.ml index 2f0508b29..f2aa87dc3 100644 --- a/bytecomp/printinstr.ml +++ b/bytecomp/printinstr.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/printinstr.mli b/bytecomp/printinstr.mli index e88e76ffc..57cea578b 100644 --- a/bytecomp/printinstr.mli +++ b/bytecomp/printinstr.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/printlambda.ml b/bytecomp/printlambda.ml index 9bfa099e1..38182db7e 100644 --- a/bytecomp/printlambda.ml +++ b/bytecomp/printlambda.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/printlambda.mli b/bytecomp/printlambda.mli index 352d6d024..16618350c 100644 --- a/bytecomp/printlambda.mli +++ b/bytecomp/printlambda.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/runtimedef.mli b/bytecomp/runtimedef.mli index 27309f60a..489200094 100644 --- a/bytecomp/runtimedef.mli +++ b/bytecomp/runtimedef.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/simplif.ml b/bytecomp/simplif.ml index 1f1d32b2c..e26524e67 100644 --- a/bytecomp/simplif.ml +++ b/bytecomp/simplif.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/simplif.mli b/bytecomp/simplif.mli index 2d9b352bb..816c44b84 100644 --- a/bytecomp/simplif.mli +++ b/bytecomp/simplif.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/switch.ml b/bytecomp/switch.ml index 4fa7b62ba..ff193ee13 100644 --- a/bytecomp/switch.ml +++ b/bytecomp/switch.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Luc Maranget, projet Moscova, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/switch.mli b/bytecomp/switch.mli index 33014c0f7..69fc800d3 100644 --- a/bytecomp/switch.mli +++ b/bytecomp/switch.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Luc Maranget, projet Moscova, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/symtable.ml b/bytecomp/symtable.ml index 136144efa..cf210d92a 100644 --- a/bytecomp/symtable.ml +++ b/bytecomp/symtable.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/symtable.mli b/bytecomp/symtable.mli index cbef01e25..d9001051e 100644 --- a/bytecomp/symtable.mli +++ b/bytecomp/symtable.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/translclass.ml b/bytecomp/translclass.ml index e18a13ba6..f06e43b46 100644 --- a/bytecomp/translclass.ml +++ b/bytecomp/translclass.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/translclass.mli b/bytecomp/translclass.mli index 4938278f7..7a5d6d143 100644 --- a/bytecomp/translclass.mli +++ b/bytecomp/translclass.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/translcore.ml b/bytecomp/translcore.ml index 3b0b0b0d5..1e68756cd 100644 --- a/bytecomp/translcore.ml +++ b/bytecomp/translcore.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/translcore.mli b/bytecomp/translcore.mli index baac05567..1bc5ce613 100644 --- a/bytecomp/translcore.mli +++ b/bytecomp/translcore.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/translmod.ml b/bytecomp/translmod.ml index bd6107f03..7f52f99a1 100644 --- a/bytecomp/translmod.ml +++ b/bytecomp/translmod.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/translmod.mli b/bytecomp/translmod.mli index 9e47ca5e6..5b6d0a006 100644 --- a/bytecomp/translmod.mli +++ b/bytecomp/translmod.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/translobj.ml b/bytecomp/translobj.ml index a0df551d8..f72e34b0a 100644 --- a/bytecomp/translobj.ml +++ b/bytecomp/translobj.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/translobj.mli b/bytecomp/translobj.mli index 26fa504b4..be1e6a90f 100644 --- a/bytecomp/translobj.mli +++ b/bytecomp/translobj.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/typeopt.ml b/bytecomp/typeopt.ml index f8e43f0df..3af231839 100644 --- a/bytecomp/typeopt.ml +++ b/bytecomp/typeopt.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/bytecomp/typeopt.mli b/bytecomp/typeopt.mli index 811c2da37..163ca44da 100644 --- a/bytecomp/typeopt.mli +++ b/bytecomp/typeopt.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/byterun/Makefile b/byterun/Makefile index f39cde49a..c8669710d 100644 --- a/byterun/Makefile +++ b/byterun/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/byterun/Makefile.common b/byterun/Makefile.common index d29036810..bf64e78c1 100755 --- a/byterun/Makefile.common +++ b/byterun/Makefile.common @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/byterun/Makefile.nt b/byterun/Makefile.nt index a633787de..b93fa58a8 100644 --- a/byterun/Makefile.nt +++ b/byterun/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/byterun/alloc.c b/byterun/alloc.c index cc19698a8..034562e8e 100644 --- a/byterun/alloc.c +++ b/byterun/alloc.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/byterun/alloc.h b/byterun/alloc.h index 66cab7024..7e954e36e 100644 --- a/byterun/alloc.h +++ b/byterun/alloc.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/byterun/array.c b/byterun/array.c index 8f658058b..ec609d04b 100644 --- a/byterun/array.c +++ b/byterun/array.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/backtrace.c b/byterun/backtrace.c index 2b29c31dc..7b8ddca88 100644 --- a/byterun/backtrace.c +++ b/byterun/backtrace.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/backtrace.h b/byterun/backtrace.h index 2d9c202ea..23c72e6c9 100644 --- a/byterun/backtrace.h +++ b/byterun/backtrace.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/callback.c b/byterun/callback.c index d76cf108b..0d781259a 100644 --- a/byterun/callback.c +++ b/byterun/callback.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/callback.h b/byterun/callback.h index ffa6cf3b5..550053add 100644 --- a/byterun/callback.h +++ b/byterun/callback.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/compact.c b/byterun/compact.c index ba1042fbe..d40949287 100644 --- a/byterun/compact.c +++ b/byterun/compact.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/compact.h b/byterun/compact.h index a4ef4cb18..949a2766e 100644 --- a/byterun/compact.h +++ b/byterun/compact.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/compare.c b/byterun/compare.c index 751630757..79f71ef61 100644 --- a/byterun/compare.c +++ b/byterun/compare.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/compare.h b/byterun/compare.h index dc392ff3d..c73a49a46 100644 --- a/byterun/compare.h +++ b/byterun/compare.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, Projet Moscova, INRIA Rocquencourt */ /* */ diff --git a/byterun/compatibility.h b/byterun/compatibility.h index 5c21774e0..429d2275d 100644 --- a/byterun/compatibility.h +++ b/byterun/compatibility.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Moscova, INRIA Rocquencourt */ /* */ diff --git a/byterun/config.h b/byterun/config.h index 22abe871d..b36b73c95 100644 --- a/byterun/config.h +++ b/byterun/config.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/byterun/custom.c b/byterun/custom.c index 24281db84..b2d7b5206 100644 --- a/byterun/custom.c +++ b/byterun/custom.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Manuel Serrano and Xavier Leroy, INRIA Rocquencourt */ /* */ diff --git a/byterun/custom.h b/byterun/custom.h index 51fabed9d..f71fb4fe1 100644 --- a/byterun/custom.h +++ b/byterun/custom.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Manuel Serrano and Xavier Leroy, INRIA Rocquencourt */ /* */ diff --git a/byterun/debugger.c b/byterun/debugger.c index f9689126a..c69b1edd1 100644 --- a/byterun/debugger.c +++ b/byterun/debugger.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/debugger.h b/byterun/debugger.h index 57a58f1c6..a9501abff 100644 --- a/byterun/debugger.h +++ b/byterun/debugger.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/dynlink.c b/byterun/dynlink.c index 7df594dbe..ddd406bab 100644 --- a/byterun/dynlink.c +++ b/byterun/dynlink.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/dynlink.h b/byterun/dynlink.h index ad4bfbadb..b1d14d844 100644 --- a/byterun/dynlink.h +++ b/byterun/dynlink.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/exec.h b/byterun/exec.h index 1abfa455c..88cf6d28b 100644 --- a/byterun/exec.h +++ b/byterun/exec.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/extern.c b/byterun/extern.c index 89e89f00e..ef07f9c94 100644 --- a/byterun/extern.c +++ b/byterun/extern.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/fail.c b/byterun/fail.c index aceb253b9..2696ab8d9 100644 --- a/byterun/fail.c +++ b/byterun/fail.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/fail.h b/byterun/fail.h index f092c8115..88ec381db 100644 --- a/byterun/fail.h +++ b/byterun/fail.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/finalise.c b/byterun/finalise.c index bc7996d55..9a93084ae 100644 --- a/byterun/finalise.c +++ b/byterun/finalise.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Moscova, INRIA Rocquencourt */ /* */ diff --git a/byterun/finalise.h b/byterun/finalise.h index ec656f4f4..e41baa320 100644 --- a/byterun/finalise.h +++ b/byterun/finalise.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Moscova, INRIA Rocquencourt */ /* */ diff --git a/byterun/fix_code.c b/byterun/fix_code.c index b252efd58..7a8f1ffa5 100644 --- a/byterun/fix_code.c +++ b/byterun/fix_code.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/fix_code.h b/byterun/fix_code.h index f6e9e3b77..fb47b6c4d 100644 --- a/byterun/fix_code.h +++ b/byterun/fix_code.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/floats.c b/byterun/floats.c index c067e60d2..51cfb23f1 100644 --- a/byterun/floats.c +++ b/byterun/floats.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/freelist.c b/byterun/freelist.c index ab1d458ba..f3bb4a8ee 100644 --- a/byterun/freelist.c +++ b/byterun/freelist.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/freelist.h b/byterun/freelist.h index 8db168e9b..b4285d955 100644 --- a/byterun/freelist.h +++ b/byterun/freelist.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/gc.h b/byterun/gc.h index 50d9945a8..4f67ed906 100644 --- a/byterun/gc.h +++ b/byterun/gc.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/gc_ctrl.c b/byterun/gc_ctrl.c index 9a2e0b08c..287122043 100644 --- a/byterun/gc_ctrl.c +++ b/byterun/gc_ctrl.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/gc_ctrl.h b/byterun/gc_ctrl.h index 205636d59..4dba74fa5 100644 --- a/byterun/gc_ctrl.h +++ b/byterun/gc_ctrl.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/globroots.c b/byterun/globroots.c index acac1e217..513b7be55 100644 --- a/byterun/globroots.c +++ b/byterun/globroots.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/globroots.h b/byterun/globroots.h index 4dee35f23..97a1edab1 100644 --- a/byterun/globroots.h +++ b/byterun/globroots.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/hash.c b/byterun/hash.c index 494cf28b6..5b8955df7 100644 --- a/byterun/hash.c +++ b/byterun/hash.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/hash.h b/byterun/hash.h index 213f72016..56eeec113 100644 --- a/byterun/hash.h +++ b/byterun/hash.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Gallium, INRIA Rocquencourt */ /* */ diff --git a/byterun/instrtrace.c b/byterun/instrtrace.c index 3afdc9541..1c329daa6 100644 --- a/byterun/instrtrace.c +++ b/byterun/instrtrace.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/instrtrace.h b/byterun/instrtrace.h index c1ca4a7ec..686b9e4ed 100644 --- a/byterun/instrtrace.h +++ b/byterun/instrtrace.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/instruct.h b/byterun/instruct.h index c45d4ea28..92f228504 100644 --- a/byterun/instruct.h +++ b/byterun/instruct.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/int64_emul.h b/byterun/int64_emul.h index 202006a04..ad48584d8 100644 --- a/byterun/int64_emul.h +++ b/byterun/int64_emul.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/int64_format.h b/byterun/int64_format.h index b9ae91040..53df3fbc2 100644 --- a/byterun/int64_format.h +++ b/byterun/int64_format.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/int64_native.h b/byterun/int64_native.h index 4ae188af4..9aa45e3c0 100644 --- a/byterun/int64_native.h +++ b/byterun/int64_native.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/intern.c b/byterun/intern.c index f44211462..9fa403ad6 100644 --- a/byterun/intern.c +++ b/byterun/intern.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/interp.c b/byterun/interp.c index 7bcdf7acb..cbec02a5c 100644 --- a/byterun/interp.c +++ b/byterun/interp.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/interp.h b/byterun/interp.h index 9eb733940..7c3d26f28 100644 --- a/byterun/interp.h +++ b/byterun/interp.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/intext.h b/byterun/intext.h index b757d1718..05fc61441 100644 --- a/byterun/intext.h +++ b/byterun/intext.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/ints.c b/byterun/ints.c index a9f224c2b..4fa1657be 100644 --- a/byterun/ints.c +++ b/byterun/ints.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/io.c b/byterun/io.c index 8d95ef70d..90a399510 100644 --- a/byterun/io.c +++ b/byterun/io.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/io.h b/byterun/io.h index d02a5a72f..53d9bb9bf 100644 --- a/byterun/io.h +++ b/byterun/io.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/lexing.c b/byterun/lexing.c index 6e74795c2..cb763bce9 100644 --- a/byterun/lexing.c +++ b/byterun/lexing.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/main.c b/byterun/main.c index e6afb1b32..63355840f 100644 --- a/byterun/main.c +++ b/byterun/main.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/byterun/major_gc.c b/byterun/major_gc.c index b9ec8cbfe..aeb192fde 100644 --- a/byterun/major_gc.c +++ b/byterun/major_gc.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/major_gc.h b/byterun/major_gc.h index 12f880670..427312784 100644 --- a/byterun/major_gc.h +++ b/byterun/major_gc.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/md5.c b/byterun/md5.c index d0b6e5e46..41a86ed72 100644 --- a/byterun/md5.c +++ b/byterun/md5.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/md5.h b/byterun/md5.h index b92b02ad1..7a3799eb3 100644 --- a/byterun/md5.h +++ b/byterun/md5.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/memory.c b/byterun/memory.c index bc4c88df1..2a98ada34 100644 --- a/byterun/memory.c +++ b/byterun/memory.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/memory.h b/byterun/memory.h index e0df37c7c..0c659b84e 100644 --- a/byterun/memory.h +++ b/byterun/memory.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/meta.c b/byterun/meta.c index 1ed4fbddd..73287f79d 100644 --- a/byterun/meta.c +++ b/byterun/meta.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/minor_gc.c b/byterun/minor_gc.c index 91aa29799..2cab6d2b1 100644 --- a/byterun/minor_gc.c +++ b/byterun/minor_gc.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/minor_gc.h b/byterun/minor_gc.h index 8e834129b..82c82cd3f 100644 --- a/byterun/minor_gc.h +++ b/byterun/minor_gc.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/misc.c b/byterun/misc.c index e8597ee38..927cbd81b 100644 --- a/byterun/misc.c +++ b/byterun/misc.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/byterun/misc.h b/byterun/misc.h index d0aaffd1a..e970d3d03 100644 --- a/byterun/misc.h +++ b/byterun/misc.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/byterun/mlvalues.h b/byterun/mlvalues.h index d66d5e9d2..201b86bda 100644 --- a/byterun/mlvalues.h +++ b/byterun/mlvalues.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/byterun/obj.c b/byterun/obj.c index e085d6727..72464b315 100644 --- a/byterun/obj.c +++ b/byterun/obj.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/osdeps.h b/byterun/osdeps.h index 248b3f6aa..902ea2de6 100644 --- a/byterun/osdeps.h +++ b/byterun/osdeps.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/parsing.c b/byterun/parsing.c index bcb9e5faa..aeba38d62 100644 --- a/byterun/parsing.c +++ b/byterun/parsing.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/prims.h b/byterun/prims.h index d8c1671e1..3d7bb6d82 100644 --- a/byterun/prims.h +++ b/byterun/prims.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/printexc.c b/byterun/printexc.c index f72157ff0..ca0a0bc2a 100644 --- a/byterun/printexc.c +++ b/byterun/printexc.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/printexc.h b/byterun/printexc.h index e7d176888..5b0549b23 100644 --- a/byterun/printexc.h +++ b/byterun/printexc.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/reverse.h b/byterun/reverse.h index e80d1f7d9..a48b6f255 100644 --- a/byterun/reverse.h +++ b/byterun/reverse.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/roots.c b/byterun/roots.c index 74fbb41ed..8a4d23b33 100644 --- a/byterun/roots.c +++ b/byterun/roots.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/byterun/roots.h b/byterun/roots.h index 95c2f63f7..f2d3bd694 100644 --- a/byterun/roots.h +++ b/byterun/roots.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/byterun/signals.c b/byterun/signals.c index 90fe89196..40ba0ab5e 100644 --- a/byterun/signals.c +++ b/byterun/signals.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/byterun/signals.h b/byterun/signals.h index e5ba98777..f771a799e 100644 --- a/byterun/signals.h +++ b/byterun/signals.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/byterun/signals_byt.c b/byterun/signals_byt.c index 523814938..f52ee5a45 100644 --- a/byterun/signals_byt.c +++ b/byterun/signals_byt.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/byterun/signals_machdep.h b/byterun/signals_machdep.h index 08c5f4cb8..0308d3c1f 100644 --- a/byterun/signals_machdep.h +++ b/byterun/signals_machdep.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/byterun/stacks.c b/byterun/stacks.c index ed06f9534..5f7a871d0 100644 --- a/byterun/stacks.c +++ b/byterun/stacks.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/stacks.h b/byterun/stacks.h index 48e8acc9c..f8469572d 100644 --- a/byterun/stacks.h +++ b/byterun/stacks.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/startup.c b/byterun/startup.c index 20e61e7d2..6117ff7a3 100644 --- a/byterun/startup.c +++ b/byterun/startup.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ @@ -216,7 +216,7 @@ static char * read_section(int fd, struct exec_trailer *trail, char *name) Algorithm: 1- If argument 0 is a valid byte-code file that does not start with #!, then we are in case 3 and we pass the same command line to the - Objective Caml program. + OCaml program. 2- In all other cases, we parse the command line as: (whatever) [options] bytecode args... and we strip "(whatever) [options]" from the command line. @@ -247,7 +247,7 @@ static int parse_command_line(char **argv) #endif case 'v': if (!strcmp (argv[i], "-version")){ - printf ("The Objective Caml runtime, version " OCAML_VERSION "\n"); + printf ("The OCaml runtime, version " OCAML_VERSION "\n"); exit (0); }else if (!strcmp (argv[i], "-vnum")){ printf (OCAML_VERSION "\n"); diff --git a/byterun/startup.h b/byterun/startup.h index 0d1a5a604..5a42a73aa 100644 --- a/byterun/startup.h +++ b/byterun/startup.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/str.c b/byterun/str.c index 760b154e3..3941cae17 100644 --- a/byterun/str.c +++ b/byterun/str.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/sys.c b/byterun/sys.c index 9928910f7..4b35d1e03 100644 --- a/byterun/sys.c +++ b/byterun/sys.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/sys.h b/byterun/sys.h index 4ad8011d9..c6f5d3204 100644 --- a/byterun/sys.h +++ b/byterun/sys.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/terminfo.c b/byterun/terminfo.c index e4502fb02..679756967 100644 --- a/byterun/terminfo.c +++ b/byterun/terminfo.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/ui.h b/byterun/ui.h index fcd9cd9f8..0c3309b39 100644 --- a/byterun/ui.h +++ b/byterun/ui.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/unix.c b/byterun/unix.c index cdc1f2a01..664c32b18 100644 --- a/byterun/unix.c +++ b/byterun/unix.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/byterun/weak.c b/byterun/weak.c index c6c4a223f..efdb15e9c 100644 --- a/byterun/weak.c +++ b/byterun/weak.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/weak.h b/byterun/weak.h index 270082dbf..a30001a7e 100644 --- a/byterun/weak.h +++ b/byterun/weak.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Para, INRIA Rocquencourt */ /* */ diff --git a/byterun/win32.c b/byterun/win32.c index 866977b12..e958fd6f2 100644 --- a/byterun/win32.c +++ b/byterun/win32.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/camlp4/Camlp4/Camlp4Ast.partial.ml b/camlp4/Camlp4/Camlp4Ast.partial.ml index 624ab86db..bca2180b9 100644 --- a/camlp4/Camlp4/Camlp4Ast.partial.ml +++ b/camlp4/Camlp4/Camlp4Ast.partial.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + type loc = Loc.t and meta_bool = [ BTrue diff --git a/camlp4/Camlp4/Debug.ml b/camlp4/Camlp4/Debug.ml index cbd309227..2d901f3e9 100644 --- a/camlp4/Camlp4/Debug.ml +++ b/camlp4/Camlp4/Debug.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Debug.mli b/camlp4/Camlp4/Debug.mli index 13af77339..97597f9c0 100644 --- a/camlp4/Camlp4/Debug.mli +++ b/camlp4/Camlp4/Debug.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/ErrorHandler.ml b/camlp4/Camlp4/ErrorHandler.ml index 84eceafab..bfefa49ab 100644 --- a/camlp4/Camlp4/ErrorHandler.ml +++ b/camlp4/Camlp4/ErrorHandler.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/ErrorHandler.mli b/camlp4/Camlp4/ErrorHandler.mli index 674811459..d73238df0 100644 --- a/camlp4/Camlp4/ErrorHandler.mli +++ b/camlp4/Camlp4/ErrorHandler.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/OCamlInitSyntax.ml b/camlp4/Camlp4/OCamlInitSyntax.ml index 85f8915f2..c424bfa72 100644 --- a/camlp4/Camlp4/OCamlInitSyntax.ml +++ b/camlp4/Camlp4/OCamlInitSyntax.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Options.ml b/camlp4/Camlp4/Options.ml index e9979beeb..20503b408 100644 --- a/camlp4/Camlp4/Options.ml +++ b/camlp4/Camlp4/Options.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Options.mli b/camlp4/Camlp4/Options.mli index caffd8c21..2deb878d5 100644 --- a/camlp4/Camlp4/Options.mli +++ b/camlp4/Camlp4/Options.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/PreCast.ml b/camlp4/Camlp4/PreCast.ml index 8e3da3483..169748519 100644 --- a/camlp4/Camlp4/PreCast.ml +++ b/camlp4/Camlp4/PreCast.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/PreCast.mli b/camlp4/Camlp4/PreCast.mli index 1c6eb2e98..a7dad534c 100644 --- a/camlp4/Camlp4/PreCast.mli +++ b/camlp4/Camlp4/PreCast.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Printers/DumpCamlp4Ast.ml b/camlp4/Camlp4/Printers/DumpCamlp4Ast.ml index bd220c16d..5b34e994d 100644 --- a/camlp4/Camlp4/Printers/DumpCamlp4Ast.ml +++ b/camlp4/Camlp4/Printers/DumpCamlp4Ast.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Printers/DumpCamlp4Ast.mli b/camlp4/Camlp4/Printers/DumpCamlp4Ast.mli index d35642ab4..5a0eb96f6 100644 --- a/camlp4/Camlp4/Printers/DumpCamlp4Ast.mli +++ b/camlp4/Camlp4/Printers/DumpCamlp4Ast.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Printers/DumpOCamlAst.ml b/camlp4/Camlp4/Printers/DumpOCamlAst.ml index dd6c60f6f..57d2a15e2 100644 --- a/camlp4/Camlp4/Printers/DumpOCamlAst.ml +++ b/camlp4/Camlp4/Printers/DumpOCamlAst.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Printers/DumpOCamlAst.mli b/camlp4/Camlp4/Printers/DumpOCamlAst.mli index 3233557d0..16eafbdb0 100644 --- a/camlp4/Camlp4/Printers/DumpOCamlAst.mli +++ b/camlp4/Camlp4/Printers/DumpOCamlAst.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Printers/Null.ml b/camlp4/Camlp4/Printers/Null.ml index a9a2c486b..3b3b95490 100644 --- a/camlp4/Camlp4/Printers/Null.ml +++ b/camlp4/Camlp4/Printers/Null.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Printers/Null.mli b/camlp4/Camlp4/Printers/Null.mli index d77151177..f81ce6137 100644 --- a/camlp4/Camlp4/Printers/Null.mli +++ b/camlp4/Camlp4/Printers/Null.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Printers/OCaml.ml b/camlp4/Camlp4/Printers/OCaml.ml index 18da100ed..f941fb59b 100644 --- a/camlp4/Camlp4/Printers/OCaml.ml +++ b/camlp4/Camlp4/Printers/OCaml.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Printers/OCaml.mli b/camlp4/Camlp4/Printers/OCaml.mli index 1ec7120b9..0d36742bf 100644 --- a/camlp4/Camlp4/Printers/OCaml.mli +++ b/camlp4/Camlp4/Printers/OCaml.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Printers/OCamlr.ml b/camlp4/Camlp4/Printers/OCamlr.ml index 199458792..b91f8ea7c 100644 --- a/camlp4/Camlp4/Printers/OCamlr.ml +++ b/camlp4/Camlp4/Printers/OCamlr.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Printers/OCamlr.mli b/camlp4/Camlp4/Printers/OCamlr.mli index f1db176a5..45fcbdef5 100644 --- a/camlp4/Camlp4/Printers/OCamlr.mli +++ b/camlp4/Camlp4/Printers/OCamlr.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Register.ml b/camlp4/Camlp4/Register.ml index e286eafb9..010a83109 100644 --- a/camlp4/Camlp4/Register.ml +++ b/camlp4/Camlp4/Register.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Register.mli b/camlp4/Camlp4/Register.mli index bd8e13a1e..d997d417b 100644 --- a/camlp4/Camlp4/Register.mli +++ b/camlp4/Camlp4/Register.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Sig.ml b/camlp4/Camlp4/Sig.ml index 1664be75b..507fb7008 100644 --- a/camlp4/Camlp4/Sig.ml +++ b/camlp4/Camlp4/Sig.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) @@ -843,7 +843,7 @@ module type Token = sig module Error : Error; end; -(** This signature describes tokens for the Objective Caml and the Revised +(** This signature describes tokens for the OCaml and the Revised syntax lexing rules. For some tokens the data constructor holds two representations with the evaluated one and the source one. For example the INT data constructor holds an integer and a string, this string can diff --git a/camlp4/Camlp4/Struct/AstFilters.ml b/camlp4/Camlp4/Struct/AstFilters.ml index 665e610af..6474ba8e5 100644 --- a/camlp4/Camlp4/Struct/AstFilters.ml +++ b/camlp4/Camlp4/Struct/AstFilters.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Camlp4Ast.mlast b/camlp4/Camlp4/Struct/Camlp4Ast.mlast index 4c692a380..9c5a99752 100644 --- a/camlp4/Camlp4/Struct/Camlp4Ast.mlast +++ b/camlp4/Camlp4/Struct/Camlp4Ast.mlast @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml b/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml index d6a9c5aff..5965a42c1 100644 --- a/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml +++ b/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.mli b/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.mli index 6c2848332..0e6f52cc9 100644 --- a/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.mli +++ b/camlp4/Camlp4/Struct/Camlp4Ast2OCamlAst.mli @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/CleanAst.ml b/camlp4/Camlp4/Struct/CleanAst.ml index ab9250543..8354d1c23 100644 --- a/camlp4/Camlp4/Struct/CleanAst.ml +++ b/camlp4/Camlp4/Struct/CleanAst.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/CommentFilter.ml b/camlp4/Camlp4/Struct/CommentFilter.ml index 9dac53fbf..f8cb3004d 100644 --- a/camlp4/Camlp4/Struct/CommentFilter.ml +++ b/camlp4/Camlp4/Struct/CommentFilter.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/CommentFilter.mli b/camlp4/Camlp4/Struct/CommentFilter.mli index 79ece6a4c..1df29f7bb 100644 --- a/camlp4/Camlp4/Struct/CommentFilter.mli +++ b/camlp4/Camlp4/Struct/CommentFilter.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/DynAst.ml b/camlp4/Camlp4/Struct/DynAst.ml index 2161e1c91..4bc8a33b7 100644 --- a/camlp4/Camlp4/Struct/DynAst.ml +++ b/camlp4/Camlp4/Struct/DynAst.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2007 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/DynLoader.ml b/camlp4/Camlp4/Struct/DynLoader.ml index f8e8c22fd..00ab05ab3 100644 --- a/camlp4/Camlp4/Struct/DynLoader.ml +++ b/camlp4/Camlp4/Struct/DynLoader.ml @@ -1,15 +1,15 @@ (* camlp4r pa_macro.cmo *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2001-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/DynLoader.mli b/camlp4/Camlp4/Struct/DynLoader.mli index 292b705b5..7a7dc899a 100644 --- a/camlp4/Camlp4/Struct/DynLoader.mli +++ b/camlp4/Camlp4/Struct/DynLoader.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/EmptyError.ml b/camlp4/Camlp4/Struct/EmptyError.ml index 1acb2251a..52a502892 100644 --- a/camlp4/Camlp4/Struct/EmptyError.ml +++ b/camlp4/Camlp4/Struct/EmptyError.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) @@ -19,4 +19,4 @@ type t = unit; exception E of t; value print _ = assert False; -value to_string _ = assert False; \ No newline at end of file +value to_string _ = assert False; diff --git a/camlp4/Camlp4/Struct/EmptyError.mli b/camlp4/Camlp4/Struct/EmptyError.mli index 9d216623a..076ee3170 100644 --- a/camlp4/Camlp4/Struct/EmptyError.mli +++ b/camlp4/Camlp4/Struct/EmptyError.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) @@ -16,4 +16,4 @@ * - Daniel de Rauglaudre: initial version * - Nicolas Pouillard: refactoring *) -include Sig.Error; \ No newline at end of file +include Sig.Error; diff --git a/camlp4/Camlp4/Struct/EmptyPrinter.ml b/camlp4/Camlp4/Struct/EmptyPrinter.ml index 5886809b6..11a93cd68 100644 --- a/camlp4/Camlp4/Struct/EmptyPrinter.ml +++ b/camlp4/Camlp4/Struct/EmptyPrinter.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/EmptyPrinter.mli b/camlp4/Camlp4/Struct/EmptyPrinter.mli index f8bf907ae..94585b329 100644 --- a/camlp4/Camlp4/Struct/EmptyPrinter.mli +++ b/camlp4/Camlp4/Struct/EmptyPrinter.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/FreeVars.ml b/camlp4/Camlp4/Struct/FreeVars.ml index 69e903036..8c253ff50 100644 --- a/camlp4/Camlp4/Struct/FreeVars.ml +++ b/camlp4/Camlp4/Struct/FreeVars.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/FreeVars.mli b/camlp4/Camlp4/Struct/FreeVars.mli index aac72db05..06d3cc0a9 100644 --- a/camlp4/Camlp4/Struct/FreeVars.mli +++ b/camlp4/Camlp4/Struct/FreeVars.mli @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Delete.ml b/camlp4/Camlp4/Struct/Grammar/Delete.ml index 929ac2b4e..d8f9f9aa4 100644 --- a/camlp4/Camlp4/Struct/Grammar/Delete.ml +++ b/camlp4/Camlp4/Struct/Grammar/Delete.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Dynamic.ml b/camlp4/Camlp4/Struct/Grammar/Dynamic.ml index 7889cf071..06ac28f1f 100644 --- a/camlp4/Camlp4/Struct/Grammar/Dynamic.ml +++ b/camlp4/Camlp4/Struct/Grammar/Dynamic.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Entry.ml b/camlp4/Camlp4/Struct/Grammar/Entry.ml index 0b39b7ca6..4ab0c8960 100644 --- a/camlp4/Camlp4/Struct/Grammar/Entry.ml +++ b/camlp4/Camlp4/Struct/Grammar/Entry.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Failed.ml b/camlp4/Camlp4/Struct/Grammar/Failed.ml index b22998bd4..a0327b152 100644 --- a/camlp4/Camlp4/Struct/Grammar/Failed.ml +++ b/camlp4/Camlp4/Struct/Grammar/Failed.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Find.ml b/camlp4/Camlp4/Struct/Grammar/Find.ml index 9e7774d15..82bd2f0ed 100644 --- a/camlp4/Camlp4/Struct/Grammar/Find.ml +++ b/camlp4/Camlp4/Struct/Grammar/Find.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Fold.ml b/camlp4/Camlp4/Struct/Grammar/Fold.ml index caf8a7a0a..99e095505 100644 --- a/camlp4/Camlp4/Struct/Grammar/Fold.ml +++ b/camlp4/Camlp4/Struct/Grammar/Fold.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Fold.mli b/camlp4/Camlp4/Struct/Grammar/Fold.mli index 0b9b22b79..1578ccbd0 100644 --- a/camlp4/Camlp4/Struct/Grammar/Fold.mli +++ b/camlp4/Camlp4/Struct/Grammar/Fold.mli @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Insert.ml b/camlp4/Camlp4/Struct/Grammar/Insert.ml index a6cbf0eee..551ce95ec 100644 --- a/camlp4/Camlp4/Struct/Grammar/Insert.ml +++ b/camlp4/Camlp4/Struct/Grammar/Insert.ml @@ -1,15 +1,15 @@ (* -*- camlp4r -*- *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Parser.ml b/camlp4/Camlp4/Struct/Grammar/Parser.ml index 89bbe884d..d97eb2875 100644 --- a/camlp4/Camlp4/Struct/Grammar/Parser.ml +++ b/camlp4/Camlp4/Struct/Grammar/Parser.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Parser.mli b/camlp4/Camlp4/Struct/Grammar/Parser.mli index 7b7cbe5a2..74e0fe07d 100644 --- a/camlp4/Camlp4/Struct/Grammar/Parser.mli +++ b/camlp4/Camlp4/Struct/Grammar/Parser.mli @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2007 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Print.ml b/camlp4/Camlp4/Struct/Grammar/Print.ml index 77000c88a..06e09c218 100644 --- a/camlp4/Camlp4/Struct/Grammar/Print.ml +++ b/camlp4/Camlp4/Struct/Grammar/Print.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Print.mli b/camlp4/Camlp4/Struct/Grammar/Print.mli index 9acc836de..b1059a6d9 100644 --- a/camlp4/Camlp4/Struct/Grammar/Print.mli +++ b/camlp4/Camlp4/Struct/Grammar/Print.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Search.ml b/camlp4/Camlp4/Struct/Grammar/Search.ml index bc4ed301a..226a0d44e 100644 --- a/camlp4/Camlp4/Struct/Grammar/Search.ml +++ b/camlp4/Camlp4/Struct/Grammar/Search.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Static.ml b/camlp4/Camlp4/Struct/Grammar/Static.ml index a94c9fa1c..02aec0b17 100644 --- a/camlp4/Camlp4/Struct/Grammar/Static.ml +++ b/camlp4/Camlp4/Struct/Grammar/Static.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Structure.ml b/camlp4/Camlp4/Struct/Grammar/Structure.ml index 67b99feb9..e2a79b18b 100644 --- a/camlp4/Camlp4/Struct/Grammar/Structure.ml +++ b/camlp4/Camlp4/Struct/Grammar/Structure.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Grammar/Tools.ml b/camlp4/Camlp4/Struct/Grammar/Tools.ml index cb63478ad..df4b03fe5 100644 --- a/camlp4/Camlp4/Struct/Grammar/Tools.ml +++ b/camlp4/Camlp4/Struct/Grammar/Tools.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Lexer.mll b/camlp4/Camlp4/Struct/Lexer.mll index 1823ae0af..c73369959 100644 --- a/camlp4/Camlp4/Struct/Lexer.mll +++ b/camlp4/Camlp4/Struct/Lexer.mll @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Loc.ml b/camlp4/Camlp4/Struct/Loc.ml index ac42d4b1c..2fd2c9106 100644 --- a/camlp4/Camlp4/Struct/Loc.ml +++ b/camlp4/Camlp4/Struct/Loc.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Loc.mli b/camlp4/Camlp4/Struct/Loc.mli index e90161938..c6c523fc5 100644 --- a/camlp4/Camlp4/Struct/Loc.mli +++ b/camlp4/Camlp4/Struct/Loc.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Quotation.ml b/camlp4/Camlp4/Struct/Quotation.ml index 65202c875..c9d6169a9 100644 --- a/camlp4/Camlp4/Struct/Quotation.ml +++ b/camlp4/Camlp4/Struct/Quotation.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Token.ml b/camlp4/Camlp4/Struct/Token.ml index 384bba911..262072972 100644 --- a/camlp4/Camlp4/Struct/Token.ml +++ b/camlp4/Camlp4/Struct/Token.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4/Struct/Token.mli b/camlp4/Camlp4/Struct/Token.mli index 812df0e00..d3e866a33 100644 --- a/camlp4/Camlp4/Struct/Token.mli +++ b/camlp4/Camlp4/Struct/Token.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Bin.ml b/camlp4/Camlp4Bin.ml index a123cc12f..ecc64311f 100644 --- a/camlp4/Camlp4Bin.ml +++ b/camlp4/Camlp4Bin.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Filters/Camlp4AstLifter.ml b/camlp4/Camlp4Filters/Camlp4AstLifter.ml index 768e4dac9..cc594aac8 100644 --- a/camlp4/Camlp4Filters/Camlp4AstLifter.ml +++ b/camlp4/Camlp4Filters/Camlp4AstLifter.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Filters/Camlp4ExceptionTracer.ml b/camlp4/Camlp4Filters/Camlp4ExceptionTracer.ml index 3d338c419..3cf570c07 100644 --- a/camlp4/Camlp4Filters/Camlp4ExceptionTracer.ml +++ b/camlp4/Camlp4Filters/Camlp4ExceptionTracer.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Filters/Camlp4FoldGenerator.ml b/camlp4/Camlp4Filters/Camlp4FoldGenerator.ml index 66c48d7e5..205afa927 100644 --- a/camlp4/Camlp4Filters/Camlp4FoldGenerator.ml +++ b/camlp4/Camlp4Filters/Camlp4FoldGenerator.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) -(* Copyright 2006,2007 Institut National de Recherche en Informatique et *) +(* Copyright 2006-2007 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Filters/Camlp4LocationStripper.ml b/camlp4/Camlp4Filters/Camlp4LocationStripper.ml index 533292de6..59199f888 100644 --- a/camlp4/Camlp4Filters/Camlp4LocationStripper.ml +++ b/camlp4/Camlp4Filters/Camlp4LocationStripper.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Filters/Camlp4MapGenerator.ml b/camlp4/Camlp4Filters/Camlp4MapGenerator.ml index 52b00eb6a..de1f910bf 100644 --- a/camlp4/Camlp4Filters/Camlp4MapGenerator.ml +++ b/camlp4/Camlp4Filters/Camlp4MapGenerator.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + (* This module is useless now. Camlp4FoldGenerator handles map too. *) module Id = struct value name = "Camlp4MapGenerator"; diff --git a/camlp4/Camlp4Filters/Camlp4MetaGenerator.ml b/camlp4/Camlp4Filters/Camlp4MetaGenerator.ml index a49cbf32f..b716d5afd 100644 --- a/camlp4/Camlp4Filters/Camlp4MetaGenerator.ml +++ b/camlp4/Camlp4Filters/Camlp4MetaGenerator.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + open Camlp4; open PreCast; module MapTy = Map.Make String; diff --git a/camlp4/Camlp4Filters/Camlp4Profiler.ml b/camlp4/Camlp4Filters/Camlp4Profiler.ml index 180085160..99335cc84 100644 --- a/camlp4/Camlp4Filters/Camlp4Profiler.ml +++ b/camlp4/Camlp4Filters/Camlp4Profiler.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Filters/Camlp4TrashRemover.ml b/camlp4/Camlp4Filters/Camlp4TrashRemover.ml index 07ead66a8..d486e2b66 100644 --- a/camlp4/Camlp4Filters/Camlp4TrashRemover.ml +++ b/camlp4/Camlp4Filters/Camlp4TrashRemover.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4AstLoader.ml b/camlp4/Camlp4Parsers/Camlp4AstLoader.ml index 67d04edf9..eb0a21390 100644 --- a/camlp4/Camlp4Parsers/Camlp4AstLoader.ml +++ b/camlp4/Camlp4Parsers/Camlp4AstLoader.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4DebugParser.ml b/camlp4/Camlp4Parsers/Camlp4DebugParser.ml index 7e7228188..be4fe60ac 100644 --- a/camlp4/Camlp4Parsers/Camlp4DebugParser.ml +++ b/camlp4/Camlp4Parsers/Camlp4DebugParser.ml @@ -1,15 +1,15 @@ open Camlp4; (* -*- camlp4r -*- *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4GrammarParser.ml b/camlp4/Camlp4Parsers/Camlp4GrammarParser.ml index 3d64b1ae3..6b4e1d8e2 100644 --- a/camlp4/Camlp4Parsers/Camlp4GrammarParser.ml +++ b/camlp4/Camlp4Parsers/Camlp4GrammarParser.ml @@ -1,15 +1,15 @@ open Camlp4; (* -*- camlp4r -*- *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4ListComprehension.ml b/camlp4/Camlp4Parsers/Camlp4ListComprehension.ml index f5878fb98..7bdad3c4e 100644 --- a/camlp4/Camlp4Parsers/Camlp4ListComprehension.ml +++ b/camlp4/Camlp4Parsers/Camlp4ListComprehension.ml @@ -1,15 +1,15 @@ open Camlp4; (* -*- camlp4r -*- *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2007 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4MacroParser.ml b/camlp4/Camlp4Parsers/Camlp4MacroParser.ml index 0cb81be94..c29cdd734 100644 --- a/camlp4/Camlp4Parsers/Camlp4MacroParser.ml +++ b/camlp4/Camlp4Parsers/Camlp4MacroParser.ml @@ -1,15 +1,15 @@ open Camlp4; (* -*- camlp4r -*- *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4OCamlOriginalQuotationExpander.ml b/camlp4/Camlp4Parsers/Camlp4OCamlOriginalQuotationExpander.ml index c033a22cb..eace67b4b 100644 --- a/camlp4/Camlp4Parsers/Camlp4OCamlOriginalQuotationExpander.ml +++ b/camlp4/Camlp4Parsers/Camlp4OCamlOriginalQuotationExpander.ml @@ -1,15 +1,15 @@ open Camlp4; (* -*- camlp4r -*- *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4OCamlParser.ml b/camlp4/Camlp4Parsers/Camlp4OCamlParser.ml index ec5351c40..2367f7c0d 100644 --- a/camlp4/Camlp4Parsers/Camlp4OCamlParser.ml +++ b/camlp4/Camlp4Parsers/Camlp4OCamlParser.ml @@ -1,15 +1,15 @@ open Camlp4; (* -*- camlp4r -*- *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4OCamlParserParser.ml b/camlp4/Camlp4Parsers/Camlp4OCamlParserParser.ml index 94a2bdb21..082ac836a 100644 --- a/camlp4/Camlp4Parsers/Camlp4OCamlParserParser.ml +++ b/camlp4/Camlp4Parsers/Camlp4OCamlParserParser.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 1998-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4OCamlReloadedParser.ml b/camlp4/Camlp4Parsers/Camlp4OCamlReloadedParser.ml index e56ab3619..02c89f818 100644 --- a/camlp4/Camlp4Parsers/Camlp4OCamlReloadedParser.ml +++ b/camlp4/Camlp4Parsers/Camlp4OCamlReloadedParser.ml @@ -1,15 +1,15 @@ open Camlp4; (* -*- camlp4r -*- *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2007 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4OCamlRevisedParser.ml b/camlp4/Camlp4Parsers/Camlp4OCamlRevisedParser.ml index a1dd59d8b..d9317591a 100644 --- a/camlp4/Camlp4Parsers/Camlp4OCamlRevisedParser.ml +++ b/camlp4/Camlp4Parsers/Camlp4OCamlRevisedParser.ml @@ -1,15 +1,15 @@ open Camlp4; (* -*- camlp4r -*- *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4OCamlRevisedParserParser.ml b/camlp4/Camlp4Parsers/Camlp4OCamlRevisedParserParser.ml index 97747d448..2bdab6bf9 100644 --- a/camlp4/Camlp4Parsers/Camlp4OCamlRevisedParserParser.ml +++ b/camlp4/Camlp4Parsers/Camlp4OCamlRevisedParserParser.ml @@ -1,15 +1,15 @@ open Camlp4; (* -*- camlp4r -*- *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 1998-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4OCamlRevisedQuotationExpander.ml b/camlp4/Camlp4Parsers/Camlp4OCamlRevisedQuotationExpander.ml index 07d2a01eb..2e32bcd83 100644 --- a/camlp4/Camlp4Parsers/Camlp4OCamlRevisedQuotationExpander.ml +++ b/camlp4/Camlp4Parsers/Camlp4OCamlRevisedQuotationExpander.ml @@ -1,15 +1,15 @@ open Camlp4; (* -*- camlp4r -*- *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4QuotationCommon.ml b/camlp4/Camlp4Parsers/Camlp4QuotationCommon.ml index 76e67f412..3cf80b560 100644 --- a/camlp4/Camlp4Parsers/Camlp4QuotationCommon.ml +++ b/camlp4/Camlp4Parsers/Camlp4QuotationCommon.ml @@ -1,15 +1,15 @@ open Camlp4; (* -*- camlp4r -*- *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Parsers/Camlp4QuotationExpander.ml b/camlp4/Camlp4Parsers/Camlp4QuotationExpander.ml index fb225a583..81680c6b4 100644 --- a/camlp4/Camlp4Parsers/Camlp4QuotationExpander.ml +++ b/camlp4/Camlp4Parsers/Camlp4QuotationExpander.ml @@ -1,15 +1,15 @@ open Camlp4; (* -*- camlp4r -*- *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Printers/Camlp4AstDumper.ml b/camlp4/Camlp4Printers/Camlp4AstDumper.ml index f89fed40f..b9adf9085 100644 --- a/camlp4/Camlp4Printers/Camlp4AstDumper.ml +++ b/camlp4/Camlp4Printers/Camlp4AstDumper.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Printers/Camlp4AutoPrinter.ml b/camlp4/Camlp4Printers/Camlp4AutoPrinter.ml index eb6b9a24d..4b2787efc 100644 --- a/camlp4/Camlp4Printers/Camlp4AutoPrinter.ml +++ b/camlp4/Camlp4Printers/Camlp4AutoPrinter.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Printers/Camlp4NullDumper.ml b/camlp4/Camlp4Printers/Camlp4NullDumper.ml index 0e02b66df..77105dc7d 100644 --- a/camlp4/Camlp4Printers/Camlp4NullDumper.ml +++ b/camlp4/Camlp4Printers/Camlp4NullDumper.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Printers/Camlp4OCamlAstDumper.ml b/camlp4/Camlp4Printers/Camlp4OCamlAstDumper.ml index 174e5ad13..872be9258 100644 --- a/camlp4/Camlp4Printers/Camlp4OCamlAstDumper.ml +++ b/camlp4/Camlp4Printers/Camlp4OCamlAstDumper.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Printers/Camlp4OCamlPrinter.ml b/camlp4/Camlp4Printers/Camlp4OCamlPrinter.ml index 487b8627b..63fd2a1c7 100644 --- a/camlp4/Camlp4Printers/Camlp4OCamlPrinter.ml +++ b/camlp4/Camlp4Printers/Camlp4OCamlPrinter.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Printers/Camlp4OCamlRevisedPrinter.ml b/camlp4/Camlp4Printers/Camlp4OCamlRevisedPrinter.ml index bd5af1f50..4f8bf71d7 100644 --- a/camlp4/Camlp4Printers/Camlp4OCamlRevisedPrinter.ml +++ b/camlp4/Camlp4Printers/Camlp4OCamlRevisedPrinter.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Top/Rprint.ml b/camlp4/Camlp4Top/Rprint.ml index ce772d1db..e5f1ec31c 100644 --- a/camlp4/Camlp4Top/Rprint.ml +++ b/camlp4/Camlp4Top/Rprint.ml @@ -1,15 +1,15 @@ (* camlp4r *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4Top/Top.ml b/camlp4/Camlp4Top/Top.ml index dcd3aa460..1ff0ef821 100644 --- a/camlp4/Camlp4Top/Top.ml +++ b/camlp4/Camlp4Top/Top.ml @@ -1,15 +1,15 @@ (* camlp4r q_MLast.cmo *) (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4_config.ml b/camlp4/Camlp4_config.ml index 745930b79..bb4d4cfd2 100644 --- a/camlp4/Camlp4_config.ml +++ b/camlp4/Camlp4_config.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/Camlp4_config.mli b/camlp4/Camlp4_config.mli index 175920846..cbc163223 100644 --- a/camlp4/Camlp4_config.mli +++ b/camlp4/Camlp4_config.mli @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/boot/Camlp4.ml b/camlp4/boot/Camlp4.ml index 8996b4908..47aa80ce6 100644 --- a/camlp4/boot/Camlp4.ml +++ b/camlp4/boot/Camlp4.ml @@ -1,16 +1,29 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) module Debug : sig (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -28,15 +41,15 @@ module Debug : struct (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -110,15 +123,15 @@ module Options : sig (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -142,15 +155,15 @@ module Options : struct (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -357,15 +370,15 @@ module Sig = (* camlp4r *) (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -788,6 +801,19 @@ module Sig = (** The inner module for locations *) module Loc : Loc + (****************************************************************************) + (* *) + (* OCaml *) + (* *) + (* INRIA Rocquencourt *) + (* *) + (* Copyright 2007 Institut National de Recherche en Informatique et *) + (* en Automatique. All rights reserved. This file is distributed under *) + (* the terms of the GNU Library General Public License, with the special *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) + (* *) + (****************************************************************************) type loc = Loc. t diff --git a/camlp4/boot/Camlp4.ml4 b/camlp4/boot/Camlp4.ml4 index 3eb7978ac..ffd0646f2 100644 --- a/camlp4/boot/Camlp4.ml4 +++ b/camlp4/boot/Camlp4.ml4 @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + module Debug : sig INCLUDE "camlp4/Camlp4/Debug.mli"; end = struct INCLUDE "camlp4/Camlp4/Debug.ml"; end; module Options : sig INCLUDE "camlp4/Camlp4/Options.mli"; end = struct INCLUDE "camlp4/Camlp4/Options.ml"; end; module Sig = struct INCLUDE "camlp4/Camlp4/Sig.ml"; end; diff --git a/camlp4/boot/Camlp4Ast.ml b/camlp4/boot/Camlp4Ast.ml index cab41221e..c00b360a5 100644 --- a/camlp4/boot/Camlp4Ast.ml +++ b/camlp4/boot/Camlp4Ast.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -4990,7 +4990,20 @@ module Make (Loc : Sig.Loc) : Sig.Camlp4Ast with module Loc = Loc = let _x = o#loc _x in let _x_i1 = o#string _x_i1 in MbAnt _x _x_i1 ]; method meta_option : - ! 'a 'a_out. + ! (****************************************************************************) + (* *) + (* OCaml *) + (* *) + (* INRIA Rocquencourt *) + (* *) + (* Copyright 2007 Institut National de Recherche en Informatique et *) + (* en Automatique. All rights reserved. This file is distributed under *) + (* the terms of the GNU Library General Public License, with the special *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) + (* *) + (****************************************************************************) + 'a 'a_out. ('self_type -> 'a -> 'a_out) -> meta_option 'a -> meta_option 'a_out = fun _f_a -> diff --git a/camlp4/boot/camlp4boot.ml b/camlp4/boot/camlp4boot.ml index e7a26e71a..ea49fe70d 100644 --- a/camlp4/boot/camlp4boot.ml +++ b/camlp4/boot/camlp4boot.ml @@ -1,3 +1,16 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) module R = struct open Camlp4 @@ -5,15 +18,15 @@ module R = (* -*- camlp4r -*- *) (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -9229,15 +9242,15 @@ module Camlp4QuotationCommon = (* -*- camlp4r -*- *) (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -10024,15 +10037,15 @@ module Q = (* -*- camlp4r -*- *) (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -10066,15 +10079,15 @@ module Rp = (* -*- camlp4r -*- *) (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 1998-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -11009,15 +11022,15 @@ module G = (* -*- camlp4r -*- *) (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2002-2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -13464,15 +13477,15 @@ module M = (* -*- camlp4r -*- *) (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -14637,15 +14650,15 @@ module D = (* -*- camlp4r -*- *) (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -14830,15 +14843,15 @@ module L = (* -*- camlp4r -*- *) (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2007 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -15204,15 +15217,15 @@ module P = struct (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: @@ -15227,15 +15240,15 @@ module B = (* camlp4r *) (****************************************************************************) (* *) - (* Objective Caml *) + (* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) - (* exception on linking described in LICENSE at the top of the Objective *) - (* Caml source tree. *) + (* exception on linking described in LICENSE at the top of the OCaml *) + (* source tree. *) (* *) (****************************************************************************) (* Authors: diff --git a/camlp4/boot/camlp4boot.ml4 b/camlp4/boot/camlp4boot.ml4 index 4c4c46d14..686f1c8da 100644 --- a/camlp4/boot/camlp4boot.ml4 +++ b/camlp4/boot/camlp4boot.ml4 @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + module R = struct INCLUDE "camlp4/Camlp4Parsers/Camlp4OCamlRevisedParser.ml"; end; module Camlp4QuotationCommon = struct INCLUDE "camlp4/Camlp4Parsers/Camlp4QuotationCommon.ml"; end; module Q = struct INCLUDE "camlp4/Camlp4Parsers/Camlp4QuotationExpander.ml"; end; diff --git a/camlp4/camlp4prof.ml b/camlp4/camlp4prof.ml index 7e9df17f7..ec2ba8c5a 100644 --- a/camlp4/camlp4prof.ml +++ b/camlp4/camlp4prof.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2006 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + module Debug = struct value mode _ = False; end; value count = diff --git a/camlp4/camlp4prof.mli b/camlp4/camlp4prof.mli index 0703ac03c..b7de6450d 100644 --- a/camlp4/camlp4prof.mli +++ b/camlp4/camlp4prof.mli @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + value count : string -> unit; value load : in_channel -> list (string * int); diff --git a/camlp4/examples/_tags b/camlp4/examples/_tags index 19b2d7017..296772b8d 100644 --- a/camlp4/examples/_tags +++ b/camlp4/examples/_tags @@ -1,3 +1,16 @@ +######################################################################### +# # +# OCaml # +# # +# Nicolas Pouillard, projet Gallium, INRIA Rocquencourt # +# # +# Copyright 2007 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../LICENSE. # +# # +######################################################################### + true: warn_A, warn_e <{apply_operator,type_quotation,global_handler,expression_closure{,_filter}}.ml> or : camlp4rf, use_camlp4 "lambda_quot.ml": camlp4rf, use_camlp4_full diff --git a/camlp4/examples/apply_operator.ml b/camlp4/examples/apply_operator.ml index 35b17e541..9afbf481b 100644 --- a/camlp4/examples/apply_operator.ml +++ b/camlp4/examples/apply_operator.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + open Camlp4.PreCast; AstFilters.register_str_item_filter (Ast.map_expr diff --git a/camlp4/examples/apply_operator_test.ml b/camlp4/examples/apply_operator_test.ml index 07ca329f6..94e7355cf 100644 --- a/camlp4/examples/apply_operator_test.ml +++ b/camlp4/examples/apply_operator_test.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + let ( & ) = ();; (* To force it to be inlined. If not it's not well typed. *) fun f g h x -> f& g& h x diff --git a/camlp4/examples/arith.ml b/camlp4/examples/arith.ml index ff7ab4f0d..e60c7fb59 100644 --- a/camlp4/examples/arith.ml +++ b/camlp4/examples/arith.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + (* Please keep me in sync with brion.inria.fr/gallium/index.php/Arithmetic_Example *) open Camlp4.PreCast;; diff --git a/camlp4/examples/debug_extension.ml b/camlp4/examples/debug_extension.ml index 21696e4a9..a690044ef 100644 --- a/camlp4/examples/debug_extension.ml +++ b/camlp4/examples/debug_extension.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + (* * No debugging code at all: * $ camlp4o -parser Camlp4DebugParser debug_extension.ml diff --git a/camlp4/examples/ex_str.ml b/camlp4/examples/ex_str.ml index ac9513b9a..744cc33c8 100644 --- a/camlp4/examples/ex_str.ml +++ b/camlp4/examples/ex_str.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + open Camlp4.PreCast;; module Caml = Camlp4OCamlParser.Make diff --git a/camlp4/examples/ex_str_test.ml b/camlp4/examples/ex_str_test.ml index 49a696fd2..7349c5833 100644 --- a/camlp4/examples/ex_str_test.ml +++ b/camlp4/examples/ex_str_test.ml @@ -1 +1,15 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + function <> -> <> diff --git a/camlp4/examples/expression_closure.ml b/camlp4/examples/expression_closure.ml index cfc47454d..300d97108 100644 --- a/camlp4/examples/expression_closure.ml +++ b/camlp4/examples/expression_closure.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2006 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + #default_quotation "expr"; open Camlp4.PreCast; diff --git a/camlp4/examples/expression_closure_filter.ml b/camlp4/examples/expression_closure_filter.ml index fb1fbe070..dec08b622 100644 --- a/camlp4/examples/expression_closure_filter.ml +++ b/camlp4/examples/expression_closure_filter.ml @@ -1,4 +1,18 @@ (* camlp4r *) +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2006 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + #default_quotation "expr"; open Camlp4.PreCast; diff --git a/camlp4/examples/expression_closure_test.ml b/camlp4/examples/expression_closure_test.ml index 28747ce01..9e4cc536a 100644 --- a/camlp4/examples/expression_closure_test.ml +++ b/camlp4/examples/expression_closure_test.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + (* x and y are free *) close_expr(x y);; diff --git a/camlp4/examples/fancy_lambda_quot.ml b/camlp4/examples/fancy_lambda_quot.ml index be21fa2fd..8384dd198 100644 --- a/camlp4/examples/fancy_lambda_quot.ml +++ b/camlp4/examples/fancy_lambda_quot.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2008 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + (* module LambdaSyntax = struct module Loc = Camlp4.PreCast.Loc type 'a antiquotable = diff --git a/camlp4/examples/fancy_lambda_quot_test.ml b/camlp4/examples/fancy_lambda_quot_test.ml index 5ff348c9d..9f74deea6 100644 --- a/camlp4/examples/fancy_lambda_quot_test.ml +++ b/camlp4/examples/fancy_lambda_quot_test.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2008 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + open Fancy_lambda_quot.LambdaSyntax;; let _loc = Camlp4.PreCast.Loc.ghost;; let rec propagate = function diff --git a/camlp4/examples/free_vars_test.ml b/camlp4/examples/free_vars_test.ml index be01edc15..84d608b40 100644 --- a/camlp4/examples/free_vars_test.ml +++ b/camlp4/examples/free_vars_test.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2006 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + open Format; open Camlp4.PreCast; diff --git a/camlp4/examples/gen_match_case.ml b/camlp4/examples/gen_match_case.ml index c72a14623..cd402d4cf 100644 --- a/camlp4/examples/gen_match_case.ml +++ b/camlp4/examples/gen_match_case.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + open Camlp4.PreCast;; let gen patts exprs = diff --git a/camlp4/examples/gen_type_N.ml b/camlp4/examples/gen_type_N.ml index 276f682b3..361f74737 100644 --- a/camlp4/examples/gen_type_N.ml +++ b/camlp4/examples/gen_type_N.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + open Camlp4.PreCast;; let data_constructor_arguments _loc n t = diff --git a/camlp4/examples/gettext_test.ml b/camlp4/examples/gettext_test.ml index 27f6ceed2..11d1f146e 100644 --- a/camlp4/examples/gettext_test.ml +++ b/camlp4/examples/gettext_test.ml @@ -1 +1,15 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2008 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + f "test", f "foo", "bar" diff --git a/camlp4/examples/global_handler.ml b/camlp4/examples/global_handler.ml index e2da52873..08957fb80 100644 --- a/camlp4/examples/global_handler.ml +++ b/camlp4/examples/global_handler.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2006 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + open Camlp4.PreCast; value ghost = Loc.ghost; diff --git a/camlp4/examples/global_handler_test.ml b/camlp4/examples/global_handler_test.ml index 882af4943..9c3e98ca2 100644 --- a/camlp4/examples/global_handler_test.ml +++ b/camlp4/examples/global_handler_test.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2006 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + open Format;; let f1 x = printf "f1 %d@." x;; let f2 x = printf "f2 %f@." x;; diff --git a/camlp4/examples/lambda_parser.ml b/camlp4/examples/lambda_parser.ml index 9c7097679..82ab3b8b5 100644 --- a/camlp4/examples/lambda_parser.ml +++ b/camlp4/examples/lambda_parser.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2008 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + (* Please keep me in sync with brion.inria.fr/gallium/index.php/Lambda_calculus_quotations *) type term = diff --git a/camlp4/examples/lambda_quot.ml b/camlp4/examples/lambda_quot.ml index 654511af2..cf6485ab3 100644 --- a/camlp4/examples/lambda_quot.ml +++ b/camlp4/examples/lambda_quot.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + open Camlp4.PreCast; module CamlSyntax = Camlp4OCamlParser.Make (Camlp4OCamlRevisedParser.Make Syntax); diff --git a/camlp4/examples/lambda_quot_expr.ml b/camlp4/examples/lambda_quot_expr.ml index 98922123a..d3eb22fe1 100644 --- a/camlp4/examples/lambda_quot_expr.ml +++ b/camlp4/examples/lambda_quot_expr.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + (* Please keep me in sync with brion.inria.fr/gallium/index.php/Lambda_calculus_quotations *) open Camlp4.PreCast;; diff --git a/camlp4/examples/lambda_quot_patt.ml b/camlp4/examples/lambda_quot_patt.ml index e6732dd3a..044007b53 100644 --- a/camlp4/examples/lambda_quot_patt.ml +++ b/camlp4/examples/lambda_quot_patt.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2008 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + (* Please keep me in sync with brion.inria.fr/gallium/index.php/Lambda_calculus_quotations *) open Camlp4.PreCast;; diff --git a/camlp4/examples/lambda_test.ml b/camlp4/examples/lambda_test.ml index e2603259a..f56451fc0 100644 --- a/camlp4/examples/lambda_test.ml +++ b/camlp4/examples/lambda_test.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + let id = << fun x -> x >> (* Imported and traduced from CCT *) let zero = << fun s -> fun z -> z >> diff --git a/camlp4/examples/macros.ml b/camlp4/examples/macros.ml index fe7b7392e..3ad5687f5 100644 --- a/camlp4/examples/macros.ml +++ b/camlp4/examples/macros.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + open Camlp4.PreCast;; let foldr_funs = ref [];; let foldl_funs = ref [];; diff --git a/camlp4/examples/parse_files.ml b/camlp4/examples/parse_files.ml index 0df49c18b..46cf8420b 100644 --- a/camlp4/examples/parse_files.ml +++ b/camlp4/examples/parse_files.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + open Camlp4.PreCast;; module Caml = diff --git a/camlp4/examples/syb_fold.ml b/camlp4/examples/syb_fold.ml index 3441c6b61..f5abc698f 100644 --- a/camlp4/examples/syb_fold.ml +++ b/camlp4/examples/syb_fold.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + type variable = string and term = | Var of variable diff --git a/camlp4/examples/syb_map.ml b/camlp4/examples/syb_map.ml index 8ef923f32..918563051 100644 --- a/camlp4/examples/syb_map.ml +++ b/camlp4/examples/syb_map.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + type variable = string and term = | Var of variable diff --git a/camlp4/examples/test_macros.ml b/camlp4/examples/test_macros.ml index 1e1b172b5..955a7c212 100644 --- a/camlp4/examples/test_macros.ml +++ b/camlp4/examples/test_macros.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + (* DEFINE F(x, y, z) = x + y * z;; *) (* F(F(1, 2, 3), 4, 5);; *) diff --git a/camlp4/examples/test_type_quotation.ml b/camlp4/examples/test_type_quotation.ml index 772dfcfca..088924c8f 100644 --- a/camlp4/examples/test_type_quotation.ml +++ b/camlp4/examples/test_type_quotation.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + type t1 = <:power< 6 | int >> type t2 = <:power< 3 | int -> int >> -> int type t3 = <:power< 3 | int -> <:power< 2 | int >> >> -> int diff --git a/camlp4/examples/type_quotation.ml b/camlp4/examples/type_quotation.ml index 5dae046fd..5c569a94a 100644 --- a/camlp4/examples/type_quotation.ml +++ b/camlp4/examples/type_quotation.ml @@ -1,3 +1,17 @@ +(****************************************************************************) +(* *) +(* OCaml *) +(* *) +(* INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed under *) +(* the terms of the GNU Library General Public License, with the special *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) +(* *) +(****************************************************************************) + open Camlp4.PreCast; value rec mk_tuple _loc t n = diff --git a/camlp4/man/Makefile b/camlp4/man/Makefile index 381bdcc53..64b3f970e 100644 --- a/camlp4/man/Makefile +++ b/camlp4/man/Makefile @@ -1,4 +1,15 @@ - +######################################################################### +# # +# OCaml # +# # +# Daniel de Rauglaudre, projet Cristal, INRIA Rocquencourt # +# # +# Copyright 2001 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../LICENSE. # +# # +######################################################################### include ../config/Makefile.cnf diff --git a/camlp4/man/camlp4.1.tpl b/camlp4/man/camlp4.1.tpl index ff8c65047..664ca9f75 100644 --- a/camlp4/man/camlp4.1.tpl +++ b/camlp4/man/camlp4.1.tpl @@ -1,3 +1,18 @@ +.\"*********************************************************************** +.\"* * +.\"* OCaml * +.\"* * +.\"* Daniel de Rauglaudre, projet Cristal, INRIA Rocquencourt * +.\"* * +.\"* Copyright 2001 Institut National de Recherche en Informatique et * +.\"* en Automatique. All rights reserved. This file is distributed * +.\"* under the terms of the GNU Library General Public License, with * +.\"* the special exception on linking described in file ../LICENSE. * +.\"* * +.\"*********************************************************************** +.\" +.\" $Id$ +.\" .TH CAMLP4 1 "" "INRIA" .SH NAME camlp4 - Pre-Precessor-Pretty-Printer for OCaml diff --git a/camlp4/mkcamlp4.ml b/camlp4/mkcamlp4.ml index 8c911b12d..180b17eff 100644 --- a/camlp4/mkcamlp4.ml +++ b/camlp4/mkcamlp4.ml @@ -1,14 +1,14 @@ (****************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* INRIA Rocquencourt *) (* *) (* Copyright 2006 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed under *) (* the terms of the GNU Library General Public License, with the special *) -(* exception on linking described in LICENSE at the top of the Objective *) -(* Caml source tree. *) +(* exception on linking described in LICENSE at the top of the OCaml *) +(* source tree. *) (* *) (****************************************************************************) diff --git a/camlp4/unmaintained/Makefile b/camlp4/unmaintained/Makefile index b6db0753c..ff79e3367 100644 --- a/camlp4/unmaintained/Makefile +++ b/camlp4/unmaintained/Makefile @@ -1,12 +1,13 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Camlp4 # # # # Copyright 2004 Institut National de Recherche en Informatique et # # en Automatique. All rights reserved. This file is distributed # -# under the terms of the Q Public License version 1.0. # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../../LICENSE. # # # ######################################################################### # diff --git a/camlp4/unmaintained/extfold/README b/camlp4/unmaintained/extfold/README index 2a09ff098..dce3da112 100644 --- a/camlp4/unmaintained/extfold/README +++ b/camlp4/unmaintained/extfold/README @@ -7,8 +7,8 @@ accessible from the Camlp4 hump. If you are interested in developing this package further and/or actively maintain it, please let us know (caml@inria.fr) -This package is distributed under the same license as the Objective -Caml Library (that is, LGPL with a special exception allowing both +This package is distributed under the same license as the OCaml +Library (that is, LGPL with a special exception allowing both static and dynamic link). -- Michel Mauny diff --git a/camlp4/unmaintained/format/Makefile b/camlp4/unmaintained/format/Makefile index c38872097..1211a7999 100644 --- a/camlp4/unmaintained/format/Makefile +++ b/camlp4/unmaintained/format/Makefile @@ -1,12 +1,13 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Camlp4 # # # # Copyright 2004 Institut National de Recherche en Informatique et # # en Automatique. All rights reserved. This file is distributed # -# under the terms of the Q Public License version 1.0. # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../../../LICENSE.# # # ######################################################################### # diff --git a/camlp4/unmaintained/format/README b/camlp4/unmaintained/format/README index 809d42f2a..830402b65 100644 --- a/camlp4/unmaintained/format/README +++ b/camlp4/unmaintained/format/README @@ -7,8 +7,8 @@ accessible from the Camlp4 hump. If you are interested in developing this package further and/or actively maintain it, please let us know (caml@inria.fr) -This package is distributed under the same license as the Objective -Caml Library (that is, LGPL with a special exception allowing both +This package is distributed under the same license as the OCaml +Library (that is, LGPL with a special exception allowing both static and dynamic link). -- Michel Mauny diff --git a/camlp4/unmaintained/lefteval/Makefile b/camlp4/unmaintained/lefteval/Makefile index 7e5cdd02e..5d47776c5 100644 --- a/camlp4/unmaintained/lefteval/Makefile +++ b/camlp4/unmaintained/lefteval/Makefile @@ -1,12 +1,13 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Camlp4 # # # # Copyright 2004 Institut National de Recherche en Informatique et # # en Automatique. All rights reserved. This file is distributed # -# under the terms of the Q Public License version 1.0. # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../../../LICENSE.# # # ######################################################################### # diff --git a/camlp4/unmaintained/lefteval/README b/camlp4/unmaintained/lefteval/README index 809d42f2a..830402b65 100644 --- a/camlp4/unmaintained/lefteval/README +++ b/camlp4/unmaintained/lefteval/README @@ -7,8 +7,8 @@ accessible from the Camlp4 hump. If you are interested in developing this package further and/or actively maintain it, please let us know (caml@inria.fr) -This package is distributed under the same license as the Objective -Caml Library (that is, LGPL with a special exception allowing both +This package is distributed under the same license as the OCaml +Library (that is, LGPL with a special exception allowing both static and dynamic link). -- Michel Mauny diff --git a/camlp4/unmaintained/ocamllex/Makefile b/camlp4/unmaintained/ocamllex/Makefile index b232023e5..1407c40a6 100644 --- a/camlp4/unmaintained/ocamllex/Makefile +++ b/camlp4/unmaintained/ocamllex/Makefile @@ -1,12 +1,13 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Camlp4 # # # # Copyright 2004 Institut National de Recherche en Informatique et # # en Automatique. All rights reserved. This file is distributed # -# under the terms of the Q Public License version 1.0. # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../../../LICENSE.# # # ######################################################################### # diff --git a/camlp4/unmaintained/ocamllex/README b/camlp4/unmaintained/ocamllex/README index 809d42f2a..830402b65 100644 --- a/camlp4/unmaintained/ocamllex/README +++ b/camlp4/unmaintained/ocamllex/README @@ -7,8 +7,8 @@ accessible from the Camlp4 hump. If you are interested in developing this package further and/or actively maintain it, please let us know (caml@inria.fr) -This package is distributed under the same license as the Objective -Caml Library (that is, LGPL with a special exception allowing both +This package is distributed under the same license as the OCaml +Library (that is, LGPL with a special exception allowing both static and dynamic link). -- Michel Mauny diff --git a/camlp4/unmaintained/olabl/Makefile b/camlp4/unmaintained/olabl/Makefile index f928d4589..2d9eb6904 100644 --- a/camlp4/unmaintained/olabl/Makefile +++ b/camlp4/unmaintained/olabl/Makefile @@ -1,12 +1,13 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Camlp4 # # # # Copyright 2004 Institut National de Recherche en Informatique et # # en Automatique. All rights reserved. This file is distributed # -# under the terms of the Q Public License version 1.0. # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../../../LICENSE.# # # ######################################################################### # diff --git a/camlp4/unmaintained/olabl/README b/camlp4/unmaintained/olabl/README index 809d42f2a..830402b65 100644 --- a/camlp4/unmaintained/olabl/README +++ b/camlp4/unmaintained/olabl/README @@ -7,8 +7,8 @@ accessible from the Camlp4 hump. If you are interested in developing this package further and/or actively maintain it, please let us know (caml@inria.fr) -This package is distributed under the same license as the Objective -Caml Library (that is, LGPL with a special exception allowing both +This package is distributed under the same license as the OCaml +Library (that is, LGPL with a special exception allowing both static and dynamic link). -- Michel Mauny diff --git a/camlp4/unmaintained/scheme/Makefile b/camlp4/unmaintained/scheme/Makefile index 01036c225..4034629fb 100644 --- a/camlp4/unmaintained/scheme/Makefile +++ b/camlp4/unmaintained/scheme/Makefile @@ -1,12 +1,13 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Camlp4 # # # # Copyright 2004 Institut National de Recherche en Informatique et # # en Automatique. All rights reserved. This file is distributed # -# under the terms of the Q Public License version 1.0. # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../../../LICENSE.# # # ######################################################################### # @@ -77,7 +78,7 @@ pr_schemep.cmo: pr_schp_main.cmo .ml.cmo: - $(OCAMLC) $(OCAMLCFLAGS) -pp "$(CAMLP4) $(P4INCLUDES) `awk 'NR == 1 { ORS=" "; for (i=2; i < NF; i++) print $$i; } ' $<` -loc loc" -c $< + $(OCAMLC) $(OCAMLCFLAGS) -pp "$(CAMLP4) $(P4INCLUDES) `awk 'NR == 1 { ORS=" "; for (i=2; i < NF; i++) print $$i; } ' $<` -loc loc" -c $< .ml.cmx: $(OCAMLOPT) $(OCAMLCFLAGS) -pp "$(CAMLP4) $(P4INCLUDES) `awk 'NR == 1 { ORS=" "; for (i=2; i < NF; i++) print $$i; } ' $<` -loc loc" -c $< diff --git a/camlp4/unmaintained/scheme/README b/camlp4/unmaintained/scheme/README index 809d42f2a..830402b65 100644 --- a/camlp4/unmaintained/scheme/README +++ b/camlp4/unmaintained/scheme/README @@ -7,8 +7,8 @@ accessible from the Camlp4 hump. If you are interested in developing this package further and/or actively maintain it, please let us know (caml@inria.fr) -This package is distributed under the same license as the Objective -Caml Library (that is, LGPL with a special exception allowing both +This package is distributed under the same license as the OCaml +Library (that is, LGPL with a special exception allowing both static and dynamic link). -- Michel Mauny diff --git a/camlp4/unmaintained/sml/Makefile b/camlp4/unmaintained/sml/Makefile index ea3980bef..80b172425 100644 --- a/camlp4/unmaintained/sml/Makefile +++ b/camlp4/unmaintained/sml/Makefile @@ -1,12 +1,13 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Camlp4 # # # # Copyright 2004 Institut National de Recherche en Informatique et # # en Automatique. All rights reserved. This file is distributed # -# under the terms of the Q Public License version 1.0. # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../../../LICENSE.# # # ######################################################################### # diff --git a/camlp4/unmaintained/sml/README b/camlp4/unmaintained/sml/README index 809d42f2a..830402b65 100644 --- a/camlp4/unmaintained/sml/README +++ b/camlp4/unmaintained/sml/README @@ -7,8 +7,8 @@ accessible from the Camlp4 hump. If you are interested in developing this package further and/or actively maintain it, please let us know (caml@inria.fr) -This package is distributed under the same license as the Objective -Caml Library (that is, LGPL with a special exception allowing both +This package is distributed under the same license as the OCaml +Library (that is, LGPL with a special exception allowing both static and dynamic link). -- Michel Mauny diff --git a/config/Makefile-templ b/config/Makefile-templ index dd65452a9..1420522c8 100644 --- a/config/Makefile-templ +++ b/config/Makefile-templ @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/config/Makefile.mingw b/config/Makefile.mingw index f2e408cc0..2be898e52 100644 --- a/config/Makefile.mingw +++ b/config/Makefile.mingw @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/config/Makefile.msvc b/config/Makefile.msvc index 8f0a50ce4..7006fa639 100644 --- a/config/Makefile.msvc +++ b/config/Makefile.msvc @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/config/Makefile.msvc64 b/config/Makefile.msvc64 index e91b26f72..c62e51a36 100644 --- a/config/Makefile.msvc64 +++ b/config/Makefile.msvc64 @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/config/auto-aux/align.c b/config/auto-aux/align.c index 0bedf77a0..a04684b48 100644 --- a/config/auto-aux/align.c +++ b/config/auto-aux/align.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/ansi.c b/config/auto-aux/ansi.c index f1a416b85..01d46252a 100644 --- a/config/auto-aux/ansi.c +++ b/config/auto-aux/ansi.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/async_io.c b/config/auto-aux/async_io.c index 2b5faa2d7..2ce3da725 100644 --- a/config/auto-aux/async_io.c +++ b/config/auto-aux/async_io.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/bytecopy.c b/config/auto-aux/bytecopy.c index 923b444e5..2006147fd 100644 --- a/config/auto-aux/bytecopy.c +++ b/config/auto-aux/bytecopy.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/dblalign.c b/config/auto-aux/dblalign.c index c2520381c..91d4194c0 100644 --- a/config/auto-aux/dblalign.c +++ b/config/auto-aux/dblalign.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/divmod.c b/config/auto-aux/divmod.c index 8f69dabf3..d59bf31cc 100644 --- a/config/auto-aux/divmod.c +++ b/config/auto-aux/divmod.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/elf.c b/config/auto-aux/elf.c index 026c4838e..27be98d6b 100644 --- a/config/auto-aux/elf.c +++ b/config/auto-aux/elf.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/endian.c b/config/auto-aux/endian.c index def617f0f..b019eb1c7 100644 --- a/config/auto-aux/endian.c +++ b/config/auto-aux/endian.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/expm1.c b/config/auto-aux/expm1.c index ec315871f..f115a9111 100644 --- a/config/auto-aux/expm1.c +++ b/config/auto-aux/expm1.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/getgroups.c b/config/auto-aux/getgroups.c index 1ed8a1fbb..b69b0be41 100644 --- a/config/auto-aux/getgroups.c +++ b/config/auto-aux/getgroups.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/gethostbyaddr.c b/config/auto-aux/gethostbyaddr.c index c5dd12971..f6d36a7f3 100644 --- a/config/auto-aux/gethostbyaddr.c +++ b/config/auto-aux/gethostbyaddr.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/gethostbyname.c b/config/auto-aux/gethostbyname.c index 043b9d334..96a39438d 100644 --- a/config/auto-aux/gethostbyname.c +++ b/config/auto-aux/gethostbyname.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/hasgot b/config/auto-aux/hasgot index 5014b903d..53d578660 100755 --- a/config/auto-aux/hasgot +++ b/config/auto-aux/hasgot @@ -1,5 +1,18 @@ #!/bin/sh +######################################################################### +# # +# OCaml # +# # +# Xavier Leroy, projet Cristal, INRIA Rocquencourt # +# # +# Copyright 1995 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../../LICENSE. # +# # +######################################################################### + opts="" libs="$cclibs" args=$* diff --git a/config/auto-aux/hasgot2 b/config/auto-aux/hasgot2 index 98e04698e..0e9cef9b0 100644 --- a/config/auto-aux/hasgot2 +++ b/config/auto-aux/hasgot2 @@ -1,5 +1,18 @@ #!/bin/sh +######################################################################### +# # +# OCaml # +# # +# Xavier Leroy, projet Cristal, INRIA Rocquencourt # +# # +# Copyright 2011 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../../LICENSE. # +# # +######################################################################### + opts="" libs="$cclibs" args=$* diff --git a/config/auto-aux/ia32sse2.c b/config/auto-aux/ia32sse2.c index cbe114626..8ba81601b 100644 --- a/config/auto-aux/ia32sse2.c +++ b/config/auto-aux/ia32sse2.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/initgroups.c b/config/auto-aux/initgroups.c index b6e0ffbdf..7b9c23983 100644 --- a/config/auto-aux/initgroups.c +++ b/config/auto-aux/initgroups.c @@ -1,6 +1,8 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ +/* */ +/* Contributed by Stephane Glondu */ /* */ /* Copyright 2009 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ @@ -9,8 +11,6 @@ /* */ /***********************************************************************/ -/* Contributed by Stephane Glondu */ - /* $Id$ */ #include diff --git a/config/auto-aux/int64align.c b/config/auto-aux/int64align.c index 6bdd25567..b087a3d66 100644 --- a/config/auto-aux/int64align.c +++ b/config/auto-aux/int64align.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/longlong.c b/config/auto-aux/longlong.c index bcdf4c974..424e540fd 100644 --- a/config/auto-aux/longlong.c +++ b/config/auto-aux/longlong.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/runtest b/config/auto-aux/runtest index ce65bd07f..c8d7c435a 100755 --- a/config/auto-aux/runtest +++ b/config/auto-aux/runtest @@ -1,4 +1,18 @@ #!/bin/sh + +######################################################################### +# # +# OCaml # +# # +# Xavier Leroy, projet Cristal, INRIA Rocquencourt # +# # +# Copyright 1995 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../../LICENSE. # +# # +######################################################################### + if test "$verbose" = yes; then echo "runtest: $cc -o tst $* $cclibs" >&2 $cc -o tst $* $cclibs || exit 100 diff --git a/config/auto-aux/schar.c b/config/auto-aux/schar.c index 55d49f31a..e3e81e395 100644 --- a/config/auto-aux/schar.c +++ b/config/auto-aux/schar.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/schar2.c b/config/auto-aux/schar2.c index d1d781a53..d041af183 100644 --- a/config/auto-aux/schar2.c +++ b/config/auto-aux/schar2.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/searchpath b/config/auto-aux/searchpath index 9b31267f6..79d7fcaeb 100755 --- a/config/auto-aux/searchpath +++ b/config/auto-aux/searchpath @@ -1,4 +1,18 @@ #!/bin/sh + +######################################################################### +# # +# OCaml # +# # +# Xavier Leroy, projet Cristal, INRIA Rocquencourt # +# # +# Copyright 1996 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../../LICENSE. # +# # +######################################################################### + # Find a program in the path IFS=':' diff --git a/config/auto-aux/setgroups.c b/config/auto-aux/setgroups.c index 5cfe49c08..63ac1b8c3 100644 --- a/config/auto-aux/setgroups.c +++ b/config/auto-aux/setgroups.c @@ -1,6 +1,8 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ +/* */ +/* Contributed by Stephane Glondu */ /* */ /* Copyright 2009 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ @@ -9,8 +11,6 @@ /* */ /***********************************************************************/ -/* Contributed by Stephane Glondu */ - /* $Id$ */ #include diff --git a/config/auto-aux/sighandler.c b/config/auto-aux/sighandler.c index 7e748df57..b36557c5f 100644 --- a/config/auto-aux/sighandler.c +++ b/config/auto-aux/sighandler.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/signals.c b/config/auto-aux/signals.c index df0a8b0b5..78ba8de69 100644 --- a/config/auto-aux/signals.c +++ b/config/auto-aux/signals.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/sizes.c b/config/auto-aux/sizes.c index 992c47a65..58fd6b23f 100644 --- a/config/auto-aux/sizes.c +++ b/config/auto-aux/sizes.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/solaris-ld b/config/auto-aux/solaris-ld index 3ab90bcef..cc846a31b 100644 --- a/config/auto-aux/solaris-ld +++ b/config/auto-aux/solaris-ld @@ -1,4 +1,18 @@ #!/bin/sh + +######################################################################### +# # +# OCaml # +# # +# Xavier Leroy, projet Cristal, INRIA Rocquencourt # +# # +# Copyright 2001 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../../LICENSE. # +# # +######################################################################### + # Determine if gcc calls the Solaris ld or the GNU ld # Exit code is 0 for Solaris ld, 1 for GNU ld diff --git a/config/auto-aux/stackov.c b/config/auto-aux/stackov.c index 39e4e832b..47f252aa6 100644 --- a/config/auto-aux/stackov.c +++ b/config/auto-aux/stackov.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/auto-aux/tclversion.c b/config/auto-aux/tclversion.c index 77c0bb729..84a94033c 100644 --- a/config/auto-aux/tclversion.c +++ b/config/auto-aux/tclversion.c @@ -1,3 +1,21 @@ +/***********************************************************************/ +/* */ +/* MLTk, Tcl/Tk interface of OCaml */ +/* */ +/* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ +/* projet Cristal, INRIA Rocquencourt */ +/* Jacques Garrigue, Kyoto University RIMS */ +/* */ +/* Copyright 2002 Institut National de Recherche en Informatique et */ +/* en Automatique and Kyoto University. All rights reserved. */ +/* This file is distributed under the terms of the GNU Library */ +/* General Public License, with the special exception on linking */ +/* described in file LICENSE found in the OCaml source tree. */ +/* */ +/***********************************************************************/ + +/* $Id$ */ + #include #include #include diff --git a/config/auto-aux/trycompile b/config/auto-aux/trycompile index 797a1c386..934a00a9b 100755 --- a/config/auto-aux/trycompile +++ b/config/auto-aux/trycompile @@ -1,4 +1,18 @@ #!/bin/sh + +######################################################################### +# # +# OCaml # +# # +# Xavier Leroy, projet Cristal, INRIA Rocquencourt # +# # +# Copyright 2002 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../../LICENSE. # +# # +######################################################################### + if test "$verbose" = yes; then echo "trycompile: $cc -o tst $* $cclibs" >&2 $cc -o tst $* $cclibs || exit 100 diff --git a/config/m-nt.h b/config/m-nt.h index 7a9282811..80e0b5ee6 100644 --- a/config/m-nt.h +++ b/config/m-nt.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/m-templ.h b/config/m-templ.h index 392ec562b..6e09f64e4 100644 --- a/config/m-templ.h +++ b/config/m-templ.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/s-nt.h b/config/s-nt.h index 5eaf3770f..d3502401d 100644 --- a/config/s-nt.h +++ b/config/s-nt.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/config/s-templ.h b/config/s-templ.h index 52f3cf609..971bc48f1 100644 --- a/config/s-templ.h +++ b/config/s-templ.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/configure b/configure index 4b7fabbdd..5397a98fb 100755 --- a/configure +++ b/configure @@ -2,7 +2,7 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/debugger/Makefile b/debugger/Makefile index 3ff1b54aa..2e6534c73 100644 --- a/debugger/Makefile +++ b/debugger/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/debugger/Makefile.nt b/debugger/Makefile.nt index 70263e94d..40034ef48 100644 --- a/debugger/Makefile.nt +++ b/debugger/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/debugger/Makefile.shared b/debugger/Makefile.shared index 778fcf112..77b9c60e0 100644 --- a/debugger/Makefile.shared +++ b/debugger/Makefile.shared @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/debugger/breakpoints.ml b/debugger/breakpoints.ml index 1da4b74e2..5e84cc6ca 100644 --- a/debugger/breakpoints.ml +++ b/debugger/breakpoints.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/breakpoints.mli b/debugger/breakpoints.mli index 091f60998..855ef5e17 100644 --- a/debugger/breakpoints.mli +++ b/debugger/breakpoints.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/checkpoints.ml b/debugger/checkpoints.ml index ffcff35e3..e2371f170 100644 --- a/debugger/checkpoints.ml +++ b/debugger/checkpoints.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/checkpoints.mli b/debugger/checkpoints.mli index 17c1037aa..b37d1ae55 100644 --- a/debugger/checkpoints.mli +++ b/debugger/checkpoints.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/command_line.ml b/debugger/command_line.ml index 944efa864..3f84ea7b2 100644 --- a/debugger/command_line.ml +++ b/debugger/command_line.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/command_line.mli b/debugger/command_line.mli index dd2349d2c..422cf6a24 100644 --- a/debugger/command_line.mli +++ b/debugger/command_line.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/debugcom.ml b/debugger/debugcom.ml index dfe905bac..8839476e3 100644 --- a/debugger/debugcom.ml +++ b/debugger/debugcom.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/debugcom.mli b/debugger/debugcom.mli index abf4fd0b2..7d107ac5b 100644 --- a/debugger/debugcom.mli +++ b/debugger/debugcom.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/debugger_config.ml b/debugger/debugger_config.ml index 54d6b2d58..007a3e973 100644 --- a/debugger/debugger_config.ml +++ b/debugger/debugger_config.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) @@ -56,7 +56,7 @@ let shell = "Win32" -> "cmd" | _ -> "/bin/sh" -(* Name of the Objective Caml runtime. *) +(* Name of the OCaml runtime. *) let runtime_program = "ocamlrun" (* Time history size (for `last') *) diff --git a/debugger/debugger_config.mli b/debugger/debugger_config.mli index 18faf9c62..64411f96a 100644 --- a/debugger/debugger_config.mli +++ b/debugger/debugger_config.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/envaux.ml b/debugger/envaux.ml index 8d462e2f8..56786929e 100644 --- a/debugger/envaux.ml +++ b/debugger/envaux.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/envaux.mli b/debugger/envaux.mli index 8b122cc34..b78173c4a 100644 --- a/debugger/envaux.mli +++ b/debugger/envaux.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/eval.ml b/debugger/eval.ml index 7ee1339f0..0f8c8a056 100644 --- a/debugger/eval.ml +++ b/debugger/eval.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/eval.mli b/debugger/eval.mli index b2a2998f1..96661b2a3 100644 --- a/debugger/eval.mli +++ b/debugger/eval.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/events.ml b/debugger/events.ml index 2521c064d..78733bfc4 100644 --- a/debugger/events.ml +++ b/debugger/events.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/events.mli b/debugger/events.mli index 7166f2c9d..f795058cc 100644 --- a/debugger/events.mli +++ b/debugger/events.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/exec.ml b/debugger/exec.ml index 1ea165978..22d281bcc 100644 --- a/debugger/exec.ml +++ b/debugger/exec.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/exec.mli b/debugger/exec.mli index 9d3b98604..c9d665ae0 100644 --- a/debugger/exec.mli +++ b/debugger/exec.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/frames.ml b/debugger/frames.ml index c533782fc..2a87ffdd8 100644 --- a/debugger/frames.ml +++ b/debugger/frames.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/frames.mli b/debugger/frames.mli index b4863433d..5023236cb 100644 --- a/debugger/frames.mli +++ b/debugger/frames.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/history.ml b/debugger/history.ml index e8c5ed8ff..473ba80bb 100644 --- a/debugger/history.ml +++ b/debugger/history.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/history.mli b/debugger/history.mli index 249629fdb..542b9ca04 100644 --- a/debugger/history.mli +++ b/debugger/history.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/input_handling.ml b/debugger/input_handling.ml index f25d47426..8bbc0d80f 100644 --- a/debugger/input_handling.ml +++ b/debugger/input_handling.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/input_handling.mli b/debugger/input_handling.mli index 959547df7..7ae190ee1 100644 --- a/debugger/input_handling.mli +++ b/debugger/input_handling.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/int64ops.ml b/debugger/int64ops.ml index b854a6c34..a3dbdbe2c 100644 --- a/debugger/int64ops.ml +++ b/debugger/int64ops.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Moscova, INRIA Rocqencourt *) (* *) diff --git a/debugger/int64ops.mli b/debugger/int64ops.mli index 98f7228d3..f898f1431 100644 --- a/debugger/int64ops.mli +++ b/debugger/int64ops.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Moscova, INRIA Rocqencourt *) (* *) diff --git a/debugger/lexer.mli b/debugger/lexer.mli index 7214ed2be..23f88e571 100644 --- a/debugger/lexer.mli +++ b/debugger/lexer.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/lexer.mll b/debugger/lexer.mll index eea8ed028..7dd51e704 100644 --- a/debugger/lexer.mll +++ b/debugger/lexer.mll @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/loadprinter.ml b/debugger/loadprinter.ml index ac5aa0187..49f76a402 100644 --- a/debugger/loadprinter.ml +++ b/debugger/loadprinter.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/debugger/loadprinter.mli b/debugger/loadprinter.mli index bdaf77a28..77edfc53d 100644 --- a/debugger/loadprinter.mli +++ b/debugger/loadprinter.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/debugger/main.ml b/debugger/main.ml index c25f9ffb4..5e80081f0 100644 --- a/debugger/main.ml +++ b/debugger/main.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/parameters.ml b/debugger/parameters.ml index 9d518e549..fb816e4d5 100644 --- a/debugger/parameters.ml +++ b/debugger/parameters.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/parameters.mli b/debugger/parameters.mli index 8f750e68a..eb055f7c5 100644 --- a/debugger/parameters.mli +++ b/debugger/parameters.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/parser.mly b/debugger/parser.mly index 6fc8392a8..ae1b0d153 100644 --- a/debugger/parser.mly +++ b/debugger/parser.mly @@ -1,9 +1,9 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Jerome Vouillon, projet Cristal, INRIA Rocquencourt */ -/* Objective Caml port by John Malecki and Xavier Leroy */ +/* OCaml port by John Malecki and Xavier Leroy */ /* */ /* Copyright 1996 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ diff --git a/debugger/parser_aux.mli b/debugger/parser_aux.mli index a68e08d5c..275281cc4 100644 --- a/debugger/parser_aux.mli +++ b/debugger/parser_aux.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/pattern_matching.ml b/debugger/pattern_matching.ml index 97af9326b..b92118265 100644 --- a/debugger/pattern_matching.ml +++ b/debugger/pattern_matching.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/pattern_matching.mli b/debugger/pattern_matching.mli index 3490edef6..a7a525622 100644 --- a/debugger/pattern_matching.mli +++ b/debugger/pattern_matching.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/pos.ml b/debugger/pos.ml index 4beba3de0..6c43f4339 100644 --- a/debugger/pos.ml +++ b/debugger/pos.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Moscova, INRIA Rocquencourt *) (* *) diff --git a/debugger/pos.mli b/debugger/pos.mli index e7632e427..a4c8e9e8d 100644 --- a/debugger/pos.mli +++ b/debugger/pos.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Moscova, INRIA Rocquencourt *) (* *) diff --git a/debugger/primitives.ml b/debugger/primitives.ml index d4ba22e5f..bfd2fdd8d 100644 --- a/debugger/primitives.ml +++ b/debugger/primitives.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/primitives.mli b/debugger/primitives.mli index 4333128fb..4d914da98 100644 --- a/debugger/primitives.mli +++ b/debugger/primitives.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/printval.ml b/debugger/printval.ml index 5f36e1a7c..84a0f06e4 100644 --- a/debugger/printval.ml +++ b/debugger/printval.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/printval.mli b/debugger/printval.mli index bb6318880..f1c4569bb 100644 --- a/debugger/printval.mli +++ b/debugger/printval.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/program_loading.ml b/debugger/program_loading.ml index 79577ff4b..3f32cb245 100644 --- a/debugger/program_loading.ml +++ b/debugger/program_loading.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/program_loading.mli b/debugger/program_loading.mli index d1210d1ab..2814eb39c 100644 --- a/debugger/program_loading.mli +++ b/debugger/program_loading.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/program_management.ml b/debugger/program_management.ml index 8ebb907d1..3e6ffa81d 100644 --- a/debugger/program_management.ml +++ b/debugger/program_management.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/program_management.mli b/debugger/program_management.mli index 8e2f28e54..96f5a4382 100644 --- a/debugger/program_management.mli +++ b/debugger/program_management.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/question.ml b/debugger/question.ml index 2eeec3ab0..f17227b9b 100644 --- a/debugger/question.ml +++ b/debugger/question.ml @@ -1,3 +1,15 @@ +(***********************************************************************) +(* *) +(* OCaml *) +(* *) +(* Nicolas Pouillard, projet Gallium, INRIA Rocquencourt *) +(* *) +(* Copyright 2006 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed *) +(* under the terms of the Q Public License version 1.0. *) +(* *) +(***********************************************************************) + open Input_handling open Primitives diff --git a/debugger/question.mli b/debugger/question.mli index 3a92dee6b..d8e50ef9b 100644 --- a/debugger/question.mli +++ b/debugger/question.mli @@ -1,2 +1,14 @@ +(***********************************************************************) +(* *) +(* OCaml *) +(* *) +(* Nicolas Pouillard, projet Gallium, INRIA Rocquencourt *) +(* *) +(* Copyright 2006 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed *) +(* under the terms of the Q Public License version 1.0. *) +(* *) +(***********************************************************************) + (* Ask user a yes or no question. *) val yes_or_no : string -> bool diff --git a/debugger/show_information.ml b/debugger/show_information.ml index bd746eb7f..86e9637a4 100644 --- a/debugger/show_information.ml +++ b/debugger/show_information.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/show_information.mli b/debugger/show_information.mli index 3069f9332..7774721a9 100644 --- a/debugger/show_information.mli +++ b/debugger/show_information.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/show_source.ml b/debugger/show_source.ml index 2826c9e68..4a998f520 100644 --- a/debugger/show_source.ml +++ b/debugger/show_source.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/show_source.mli b/debugger/show_source.mli index 5ba418af5..3b136ab74 100644 --- a/debugger/show_source.mli +++ b/debugger/show_source.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/source.ml b/debugger/source.ml index f0d3d48fb..0314cfacb 100644 --- a/debugger/source.ml +++ b/debugger/source.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/source.mli b/debugger/source.mli index 273cb517b..50fa3f02a 100644 --- a/debugger/source.mli +++ b/debugger/source.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/symbols.ml b/debugger/symbols.ml index 392da976a..9fba3e09c 100644 --- a/debugger/symbols.ml +++ b/debugger/symbols.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/symbols.mli b/debugger/symbols.mli index 57ac8007b..8823abd29 100644 --- a/debugger/symbols.mli +++ b/debugger/symbols.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/time_travel.ml b/debugger/time_travel.ml index a4a4c83fa..e10e03969 100644 --- a/debugger/time_travel.ml +++ b/debugger/time_travel.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/time_travel.mli b/debugger/time_travel.mli index 453e4df05..dad47fedc 100644 --- a/debugger/time_travel.mli +++ b/debugger/time_travel.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/trap_barrier.ml b/debugger/trap_barrier.ml index dba9c929f..6aa22b267 100644 --- a/debugger/trap_barrier.ml +++ b/debugger/trap_barrier.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/trap_barrier.mli b/debugger/trap_barrier.mli index 28bba5a3e..b12391af6 100644 --- a/debugger/trap_barrier.mli +++ b/debugger/trap_barrier.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/unix_tools.ml b/debugger/unix_tools.ml index 9926e05d5..dea47f99f 100644 --- a/debugger/unix_tools.ml +++ b/debugger/unix_tools.ml @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/debugger/unix_tools.mli b/debugger/unix_tools.mli index b5e4ee6ca..bbea8447e 100644 --- a/debugger/unix_tools.mli +++ b/debugger/unix_tools.mli @@ -1,9 +1,9 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) -(* Objective Caml port by John Malecki and Xavier Leroy *) +(* OCaml port by John Malecki and Xavier Leroy *) (* *) (* Copyright 1996 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) diff --git a/driver/compile.ml b/driver/compile.ml index 4e2d8566e..33a198ed8 100644 --- a/driver/compile.ml +++ b/driver/compile.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/driver/compile.mli b/driver/compile.mli index 507d61bbd..779239a8c 100644 --- a/driver/compile.mli +++ b/driver/compile.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/driver/errors.ml b/driver/errors.ml index 22dd1fc6a..9400e9ebc 100644 --- a/driver/errors.ml +++ b/driver/errors.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/driver/errors.mli b/driver/errors.mli index ac203a53e..9f7020d08 100644 --- a/driver/errors.mli +++ b/driver/errors.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/driver/main.ml b/driver/main.ml index e8f8021c9..a2246f75f 100644 --- a/driver/main.ml +++ b/driver/main.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/driver/main.mli b/driver/main.mli index d175a3ca2..b949bb0fe 100644 --- a/driver/main.mli +++ b/driver/main.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Moscova, INRIA Rocquencourt *) (* *) diff --git a/driver/main_args.ml b/driver/main_args.ml index ca6258d4b..4a7136b29 100644 --- a/driver/main_args.ml +++ b/driver/main_args.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/driver/main_args.mli b/driver/main_args.mli index 3abe626e8..2c1a965f2 100644 --- a/driver/main_args.mli +++ b/driver/main_args.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/driver/ocamlcomp.sh.in b/driver/ocamlcomp.sh.in index 2aeb2de20..fc0a8e113 100644 --- a/driver/ocamlcomp.sh.in +++ b/driver/ocamlcomp.sh.in @@ -1,5 +1,17 @@ #!/bin/sh +######################################################################### +# # +# OCaml # +# # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 2002 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the Q Public License version 1.0. # +# # +######################################################################### + topdir=`dirname $0` exec @compiler@ -nostdlib -I $topdir/stdlib "$@" diff --git a/driver/optcompile.ml b/driver/optcompile.ml index 29afc628d..ada7d9f71 100644 --- a/driver/optcompile.ml +++ b/driver/optcompile.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/driver/optcompile.mli b/driver/optcompile.mli index 507d61bbd..779239a8c 100644 --- a/driver/optcompile.mli +++ b/driver/optcompile.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/driver/opterrors.ml b/driver/opterrors.ml index 581781997..f931990a4 100644 --- a/driver/opterrors.ml +++ b/driver/opterrors.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/driver/opterrors.mli b/driver/opterrors.mli index d09dc733b..94966741b 100644 --- a/driver/opterrors.mli +++ b/driver/opterrors.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/driver/optmain.ml b/driver/optmain.ml index d285bc535..6184d513f 100644 --- a/driver/optmain.ml +++ b/driver/optmain.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/driver/optmain.mli b/driver/optmain.mli index 628d2d398..701508af2 100644 --- a/driver/optmain.mli +++ b/driver/optmain.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Moscova, INRIA Rocquencourt *) (* *) diff --git a/driver/pparse.ml b/driver/pparse.ml index 0622ddad9..5d27beeb4 100644 --- a/driver/pparse.ml +++ b/driver/pparse.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Daniel de Rauglaudre, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/driver/pparse.mli b/driver/pparse.mli index 0ed039136..96c2594f1 100644 --- a/driver/pparse.mli +++ b/driver/pparse.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Daniel de Rauglaudre, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/emacs/Makefile b/emacs/Makefile index 077770c64..125e9eb54 100644 --- a/emacs/Makefile +++ b/emacs/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/emacs/README b/emacs/README index 7ddb362b4..7dedfc89a 100644 --- a/emacs/README +++ b/emacs/README @@ -1,7 +1,7 @@ O'Caml emacs mode, snapshot of $Date$ The files in this archive define a caml-mode for emacs, for editing -Objective Caml and Objective Label programs, as well as an +OCaml and Objective Label programs, as well as an inferior-caml-mode, to run a toplevel. Caml-mode supports indentation, compilation and error retrieving, @@ -21,7 +21,7 @@ three lines in your .emacs. (autoload 'run-caml "inf-caml" "Run an inferior Caml process." t) I added camldebug.el from the original distribution, since there will -soon be a debugger for Objective Caml, but I do not know enough about +soon be a debugger for OCaml, but I do not know enough about it. To install the mode itself, edit the Makefile and do diff --git a/emacs/caml-compat.el b/emacs/caml-compat.el index 8ba7a99c7..da54cd0dc 100644 --- a/emacs/caml-compat.el +++ b/emacs/caml-compat.el @@ -1,6 +1,6 @@ ;(***********************************************************************) ;(* *) -;(* Objective Caml *) +;(* OCaml *) ;(* *) ;(* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) ;(* *) diff --git a/emacs/caml-emacs.el b/emacs/caml-emacs.el index d0a2c86ee..06cabf302 100644 --- a/emacs/caml-emacs.el +++ b/emacs/caml-emacs.el @@ -1,6 +1,6 @@ ;(***********************************************************************) ;(* *) -;(* Objective Caml *) +;(* OCaml *) ;(* *) ;(* Didier Remy, projet Cristal, INRIA Rocquencourt *) ;(* *) diff --git a/emacs/caml-font-old.el b/emacs/caml-font-old.el index 8faa542f0..12c318c90 100644 --- a/emacs/caml-font-old.el +++ b/emacs/caml-font-old.el @@ -1,6 +1,6 @@ ;(***********************************************************************) ;(* *) -;(* Objective Caml *) +;(* OCaml *) ;(* *) ;(* Jacques Garrigue and Ian T Zimmerman *) ;(* *) @@ -55,7 +55,7 @@ ; The same definition is in caml.el: ; we don't know in which order they will be loaded. (defvar caml-quote-char "'" - "*Quote for character constants. \"'\" for Objective Caml, \"`\" for Caml-Light.") + "*Quote for character constants. \"'\" for OCaml, \"`\" for Caml-Light.") (defconst caml-font-lock-keywords (list diff --git a/emacs/caml-font.el b/emacs/caml-font.el index 956225466..09d1ae701 100644 --- a/emacs/caml-font.el +++ b/emacs/caml-font.el @@ -1,3 +1,15 @@ +;(***********************************************************************) +;(* *) +;(* OCaml *) +;(* *) +;(* Jacques Garrigue and Ian T Zimmerman *) +;(* *) +;(* Copyright 1997 Institut National de Recherche en Informatique et *) +;(* en Automatique. All rights reserved. This file is distributed *) +;(* under the terms of the GNU General Public License. *) +;(* *) +;(***********************************************************************) + ;; caml-font: font-lock support for OCaml files ;; ;; rewrite and clean-up. diff --git a/emacs/caml-help.el b/emacs/caml-help.el index 59d8a3b0c..101963294 100644 --- a/emacs/caml-help.el +++ b/emacs/caml-help.el @@ -1,6 +1,6 @@ ;(***********************************************************************) ;(* *) -;(* Objective Caml *) +;(* OCaml *) ;(* *) ;(* Didier Remy, projet Cristal, INRIA Rocquencourt *) ;(* *) diff --git a/emacs/caml-hilit.el b/emacs/caml-hilit.el index 697e58173..0d437c509 100644 --- a/emacs/caml-hilit.el +++ b/emacs/caml-hilit.el @@ -1,6 +1,6 @@ ;(***********************************************************************) ;(* *) -;(* Objective Caml *) +;(* OCaml *) ;(* *) ;(* Jacques Garrigue and Ian T Zimmerman *) ;(* *) @@ -16,7 +16,7 @@ ; defined also in caml.el (defvar caml-quote-char "'" - "*Quote for character constants. \"'\" for Objective Caml, \"`\" for Caml-Light.") + "*Quote for character constants. \"'\" for OCaml, \"`\" for Caml-Light.") (defconst caml-mode-patterns (list diff --git a/emacs/caml-types.el b/emacs/caml-types.el index 3c7433a81..70d38bcce 100644 --- a/emacs/caml-types.el +++ b/emacs/caml-types.el @@ -1,6 +1,6 @@ ;(***********************************************************************) ;(* *) -;(* Objective Caml *) +;(* OCaml *) ;(* *) ;(* Damien Doligez, projet Moscova, INRIA Rocquencourt *) ;(* *) diff --git a/emacs/caml-xemacs.el b/emacs/caml-xemacs.el index 45d670c7a..79321e005 100644 --- a/emacs/caml-xemacs.el +++ b/emacs/caml-xemacs.el @@ -1,6 +1,6 @@ ;(***********************************************************************) ;(* *) -;(* Objective Caml *) +;(* OCaml *) ;(* *) ;(* Didier Remy, projet Cristal, INRIA Rocquencourt *) ;(* *) diff --git a/emacs/caml.el b/emacs/caml.el index 2e37bff52..342305de9 100644 --- a/emacs/caml.el +++ b/emacs/caml.el @@ -1,6 +1,6 @@ ;(***********************************************************************) ;(* *) -;(* Objective Caml *) +;(* OCaml *) ;(* *) ;(* Jacques Garrigue and Ian T Zimmerman *) ;(* *) @@ -19,12 +19,12 @@ ;;indentation code is Copyright (C) 1996 by Ian T Zimmerman ;;copying: covered by the current FSF General Public License. -;; indentation code adapted for Objective Caml by Jacques Garrigue, +;; indentation code adapted for OCaml by Jacques Garrigue, ;; july 1997. ;;user customizable variables (defvar caml-quote-char "'" - "*Quote for character constants. \"'\" for Objective Caml, \"`\" for Caml-Light.") + "*Quote for character constants. \"'\" for OCaml, \"`\" for Caml-Light.") (defvar caml-imenu-enable nil "*Enable Imenu support.") diff --git a/emacs/camldebug.el b/emacs/camldebug.el index 57a98701b..199a6cc1a 100644 --- a/emacs/camldebug.el +++ b/emacs/camldebug.el @@ -1,6 +1,6 @@ ;(***********************************************************************) ;(* *) -;(* Objective Caml *) +;(* OCaml *) ;(* *) ;(* Jacques Garrigue and Ian T Zimmerman *) ;(* *) diff --git a/emacs/inf-caml.el b/emacs/inf-caml.el index f3e4c48d1..4b9cd6bb8 100644 --- a/emacs/inf-caml.el +++ b/emacs/inf-caml.el @@ -1,6 +1,6 @@ ;(***********************************************************************) ;(* *) -;(* Objective Caml *) +;(* OCaml *) ;(* *) ;(* Xavier Leroy and Jacques Garrigue *) ;(* *) diff --git a/emacs/ocamltags.in b/emacs/ocamltags.in index aa3f8df1d..2a6aadbfb 100644 --- a/emacs/ocamltags.in +++ b/emacs/ocamltags.in @@ -2,7 +2,7 @@ ;(***********************************************************************) ;(* *) -;(* Objective Caml *) +;(* OCaml *) ;(* *) ;(* Jacques Garrigue and Ian T Zimmerman *) ;(* *) diff --git a/experimental/doligez/checkheaders b/experimental/doligez/checkheaders new file mode 100755 index 000000000..671325a5e --- /dev/null +++ b/experimental/doligez/checkheaders @@ -0,0 +1,157 @@ +#!/bin/sh + +####################################################################### +# # +# OCaml # +# # +# Damien Doligez, projet Gallium, INRIA Rocquencourt # +# # +# Copyright 2011 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the Q Public License version 1.0. # +# # +####################################################################### + +( +case $# in + 0) find . -type f -print;; + *) echo $1;; +esac +) | \ +while read f; do +awk -f - "$f" <<\EOF + +function checkline (x) { + return ( $0 ~ ("^.{0,4}" x) ); +} + +function hrule () { + return (checkline("[*#]{69}")); +} + +function blank () { + return (checkline(" {69}")); +} + +function ocaml () { + return (checkline(" {32}OCaml {32}") \ + || checkline(" {35}OCaml {32}") \ + || checkline(" MLTk, Tcl/Tk interface of OCaml ") \ + || checkline(" OCaml LablTk library ") \ + || checkline(" ocamlbuild ") \ + || checkline(" OCamldoc ") \ + ); +} + +function any () { + return (checkline(".{69}")); +} + +function copy1 () { + return (checkline(" Copyright +[-0-9]+ +Institut +National +de +Recherche +en +Informatique +et ")); +} + +function copy2 () { + return (checkline(" en Automatique")); +} + +function err () { + printf ("File \"%s\", line %d:\n", FILENAME, FNR); + printf (" Error: line %d of header is wrong.\n", FNR + offset); + print $0; +} + +function add_ignore_re (x) { + ignore_re[++ignore_re_index] = x; +} + +function add_exception (x) { + exception[++exception_index] = x; +} + +FNR == 1 { + offset = 0; + add_ignore_re("/\\.svn/"); + add_ignore_re("/\\.depend(\\.nt)?$"); + add_ignore_re("/\\.ignore$"); + add_ignore_re("\\.gif$"); + add_ignore_re("/[A-Z]*$"); + add_ignore_re("/README\\.[^/]*$"); + add_ignore_re("/Changes$"); + add_ignore_re("\\.mlpack$"); + add_ignore_re("\\.mllib$"); + add_ignore_re("\\.mltop$"); + add_ignore_re("\\.clib$"); + add_ignore_re("\\.odocl$"); + add_ignore_re("\\.itarget$"); + add_ignore_re("^\\./boot/"); + add_ignore_re("^\\./camlp4/test/"); + add_ignore_re("^\\./camlp4/unmaintained/"); + add_ignore_re("^\\./config/gnu/"); + add_ignore_re("^\\./experimental/"); + add_ignore_re("^\\./ocamlbuild/examples/"); + add_ignore_re("^\\./ocamlbuild/test/"); + add_ignore_re("^\\./otherlibs/labltk/builtin/"); + add_ignore_re("^\\./otherlibs/labltk/examples_"); + add_ignore_re("^\\./testsuite/"); + for (i in ignore_re){ + if (FILENAME ~ ignore_re[i]) { nextfile; } + } + add_exception("./asmrun/m68k.S"); # obsolete + add_exception("./build/camlp4-bootstrap-recipe.txt"); + add_exception("./build/new-build-system"); + add_exception("./ocamlbuild/ChangeLog"); + add_exception("./ocamlbuild/manual/myocamlbuild.ml"); # TeX input file ? + add_exception("./ocamlbuild/manual/trace.out"); # TeX input file + add_exception("./ocamldoc/Changes.txt"); + add_exception("./ocamldoc/ocamldoc.sty"); # public domain + add_exception("./otherlibs/labltk/browser/help.txt"); + add_exception("./tools/objinfo_helper.c"); # non-INRIA + add_exception("./tools/magic"); # public domain ? + add_exception("./Upgrading"); + add_exception("./win32caml/inriares.h"); # generated + add_exception("./win32caml/ocaml.rc"); # generated + add_exception("./win32caml/resource.h"); # generated + for (i in exception){ + if (FILENAME == exception[i]) { nextfile; } + } +} + +# 1 [!hrule] #! +# 2 [!hrule] empty +# 3 hrule +# 4 [blank] +# 5 ocaml title +# 6 blank +# 7 any author +# 8 [!blank] author +# 9 [!blank] author +#10 blank +#11 copy1 copyright +#12 copy2 copyright +#13 any copyright +#14 [!blank] copyright +#15 [!blank] copyright +#16 blank +#17 hrule + +FNR + offset == 1 && hrule() { ++offset; } +FNR + offset == 2 && hrule() { ++offset; } +FNR + offset == 3 && ! hrule() { err(); nextfile; } +FNR + offset == 4 && ! blank() { ++offset; } +FNR + offset == 5 && ! ocaml() { err(); nextfile; } +FNR + offset == 6 && ! blank() { err(); nextfile; } +FNR + offset == 7 && ! any() { err(); nextfile; } +FNR + offset == 8 && blank() { ++offset; } +FNR + offset == 9 && blank() { ++offset; } +FNR + offset ==10 && ! blank() { err(); nextfile; } +FNR + offset ==11 && ! copy1() { err(); nextfile; } +FNR + offset ==12 && ! copy2() { err(); nextfile; } +FNR + offset ==13 && ! any() { err(); nextfile; } +FNR + offset ==14 && blank() { ++offset; } +FNR + offset ==15 && blank() { ++offset; } +FNR + offset ==16 && ! blank() { err(); nextfile; } +FNR + offset ==17 && ! hrule() { err(); nextfile; } + +EOF +done diff --git a/lex/Makefile b/lex/Makefile index f190ed892..d73939a3c 100644 --- a/lex/Makefile +++ b/lex/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/lex/Makefile.nt b/lex/Makefile.nt index cb1ef94a5..8443c5759 100644 --- a/lex/Makefile.nt +++ b/lex/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/lex/common.ml b/lex/common.ml index cacea62d0..5638185d0 100644 --- a/lex/common.ml +++ b/lex/common.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Luc Maranget, projet Moscova, *) (* INRIA Rocquencourt *) diff --git a/lex/common.mli b/lex/common.mli index e5742b45b..f85baa01f 100644 --- a/lex/common.mli +++ b/lex/common.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Moscova, INRIA Rocquencourt *) (* *) diff --git a/lex/compact.ml b/lex/compact.ml index abbf5a503..72cfd9e7c 100644 --- a/lex/compact.ml +++ b/lex/compact.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/lex/compact.mli b/lex/compact.mli index 18363c3d4..6e48df006 100644 --- a/lex/compact.mli +++ b/lex/compact.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/lex/cset.ml b/lex/cset.ml index c4594540e..ce77044b6 100644 --- a/lex/cset.ml +++ b/lex/cset.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Luc Maranget, Jerome Vouillon projet Cristal, *) (* INRIA Rocquencourt *) diff --git a/lex/cset.mli b/lex/cset.mli index 53b589959..b30c3b671 100644 --- a/lex/cset.mli +++ b/lex/cset.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Luc Maranget, Jerome Vouillon projet Cristal, *) (* INRIA Rocquencourt *) diff --git a/lex/lexer.mli b/lex/lexer.mli index be34674eb..5097d3094 100644 --- a/lex/lexer.mli +++ b/lex/lexer.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/lex/lexer.mll b/lex/lexer.mll index b72804287..b99dddf9e 100644 --- a/lex/lexer.mll +++ b/lex/lexer.mll @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/lex/lexgen.ml b/lex/lexgen.ml index 775e78b05..37720be61 100644 --- a/lex/lexgen.ml +++ b/lex/lexgen.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, *) (* Luc Maranget, projet Moscova, *) diff --git a/lex/lexgen.mli b/lex/lexgen.mli index 5136f8f28..155b9e45a 100644 --- a/lex/lexgen.mli +++ b/lex/lexgen.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/lex/main.ml b/lex/main.ml index 4f05ca21e..28f1e55e6 100644 --- a/lex/main.ml +++ b/lex/main.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/lex/output.ml b/lex/output.ml index 5ca403b52..377c00a2d 100644 --- a/lex/output.ml +++ b/lex/output.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/lex/output.mli b/lex/output.mli index 85f89b30c..5eae10314 100644 --- a/lex/output.mli +++ b/lex/output.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/lex/outputbis.ml b/lex/outputbis.ml index 6d5e77c30..7eac35444 100644 --- a/lex/outputbis.ml +++ b/lex/outputbis.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/lex/outputbis.mli b/lex/outputbis.mli index 76f00672b..df6bf9600 100644 --- a/lex/outputbis.mli +++ b/lex/outputbis.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Luc Maranget projet Moscova INRIA Rocquencourt *) (* *) diff --git a/lex/parser.mly b/lex/parser.mly index 9bc0906af..c36d8e020 100644 --- a/lex/parser.mly +++ b/lex/parser.mly @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/lex/syntax.ml b/lex/syntax.ml index d1daa02db..746a99a24 100644 --- a/lex/syntax.ml +++ b/lex/syntax.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/lex/syntax.mli b/lex/syntax.mli index 4864b50ee..d61fdb228 100644 --- a/lex/syntax.mli +++ b/lex/syntax.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/lex/table.ml b/lex/table.ml index 402f52be8..fb5a6128e 100644 --- a/lex/table.ml +++ b/lex/table.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Luc Maranget, projet Moscova, INRIA Rocquencourt *) (* *) diff --git a/lex/table.mli b/lex/table.mli index b88d7d345..8d9938cbf 100644 --- a/lex/table.mli +++ b/lex/table.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Luc Maranget, projet Moscova, INRIA Rocquencourt *) (* *) diff --git a/man/Makefile b/man/Makefile index 4753c202e..e6c1e193b 100644 --- a/man/Makefile +++ b/man/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/man/ocaml.m b/man/ocaml.m index 80d641c12..d7679af3a 100644 --- a/man/ocaml.m +++ b/man/ocaml.m @@ -1,5 +1,17 @@ -\" $Id$ - +.\"*********************************************************************** +.\"* * +.\"* OCaml * +.\"* * +.\"* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +.\"* * +.\"* Copyright 1996 Institut National de Recherche en Informatique et * +.\"* en Automatique. All rights reserved. This file is distributed * +.\"* under the terms of the Q Public License version 1.0. * +.\"* * +.\"*********************************************************************** +.\" +.\" $Id$ +.\" .TH OCAML 1 .SH NAME diff --git a/man/ocamlc.m b/man/ocamlc.m index 54c4296dd..a1587d94a 100644 --- a/man/ocamlc.m +++ b/man/ocamlc.m @@ -1,5 +1,17 @@ -\" $Id$ - +.\"*********************************************************************** +.\"* * +.\"* OCaml * +.\"* * +.\"* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +.\"* * +.\"* Copyright 1996 Institut National de Recherche en Informatique et * +.\"* en Automatique. All rights reserved. This file is distributed * +.\"* under the terms of the Q Public License version 1.0. * +.\"* * +.\"*********************************************************************** +.\" +.\" $Id$ +.\" .TH OCAMLC 1 .SH NAME diff --git a/man/ocamlcp.m b/man/ocamlcp.m index c29cb0030..0c9979f10 100644 --- a/man/ocamlcp.m +++ b/man/ocamlcp.m @@ -1,5 +1,17 @@ -\" $Id$ - +.\"*********************************************************************** +.\"* * +.\"* OCaml * +.\"* * +.\"* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +.\"* * +.\"* Copyright 1996 Institut National de Recherche en Informatique et * +.\"* en Automatique. All rights reserved. This file is distributed * +.\"* under the terms of the Q Public License version 1.0. * +.\"* * +.\"*********************************************************************** +.\" +.\" $Id$ +.\" .TH OCAMLCP 1 .SH NAME diff --git a/man/ocamldebug.m b/man/ocamldebug.m index 141076c5f..0eceeba3b 100644 --- a/man/ocamldebug.m +++ b/man/ocamldebug.m @@ -1,5 +1,17 @@ -\" $Id$ - +.\"*********************************************************************** +.\"* * +.\"* OCaml * +.\"* * +.\"* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +.\"* * +.\"* Copyright 2001 Institut National de Recherche en Informatique et * +.\"* en Automatique. All rights reserved. This file is distributed * +.\"* under the terms of the Q Public License version 1.0. * +.\"* * +.\"*********************************************************************** +.\" +.\" $Id$ +.\" .TH OCAMLDEBUG 1 .SH NAME diff --git a/man/ocamldep.m b/man/ocamldep.m index 97d4b3776..be1e7348e 100644 --- a/man/ocamldep.m +++ b/man/ocamldep.m @@ -1,5 +1,17 @@ -\" $Id$ - +.\"*********************************************************************** +.\"* * +.\"* OCaml * +.\"* * +.\"* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +.\"* * +.\"* Copyright 1996 Institut National de Recherche en Informatique et * +.\"* en Automatique. All rights reserved. This file is distributed * +.\"* under the terms of the Q Public License version 1.0. * +.\"* * +.\"*********************************************************************** +.\" +.\" $Id$ +.\" .TH OCAMLDEP 1 .SH NAME diff --git a/man/ocamldoc.m b/man/ocamldoc.m index 17be62d86..32d6aae1c 100644 --- a/man/ocamldoc.m +++ b/man/ocamldoc.m @@ -1,5 +1,17 @@ -\" $Id$ - +.\"*********************************************************************** +.\"* * +.\"* OCaml * +.\"* * +.\"* Maxence Guesdon, projet Cristal, INRIA Rocquencourt * +.\"* * +.\"* Copyright 2004 Institut National de Recherche en Informatique et * +.\"* en Automatique. All rights reserved. This file is distributed * +.\"* under the terms of the Q Public License version 1.0. * +.\"* * +.\"*********************************************************************** +.\" +.\" $Id$ +.\" .TH OCAMLDOC 1 \" .de Sh \" Subsection heading diff --git a/man/ocamllex.m b/man/ocamllex.m index f07cc6cd6..314af516c 100644 --- a/man/ocamllex.m +++ b/man/ocamllex.m @@ -1,4 +1,17 @@ -\" $Id$ +.\"*********************************************************************** +.\"* * +.\"* OCaml * +.\"* * +.\"* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +.\"* * +.\"* Copyright 1996 Institut National de Recherche en Informatique et * +.\"* en Automatique. All rights reserved. This file is distributed * +.\"* under the terms of the Q Public License version 1.0. * +.\"* * +.\"*********************************************************************** +.\" +.\" $Id$ +.\" .TH OCAMLLEX 1 .SH NAME diff --git a/man/ocamlmktop.m b/man/ocamlmktop.m index 647a29d80..f9c014c54 100644 --- a/man/ocamlmktop.m +++ b/man/ocamlmktop.m @@ -1,4 +1,17 @@ -\" $Id$ +.\"*********************************************************************** +.\"* * +.\"* OCaml * +.\"* * +.\"* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +.\"* * +.\"* Copyright 1999 Institut National de Recherche en Informatique et * +.\"* en Automatique. All rights reserved. This file is distributed * +.\"* under the terms of the Q Public License version 1.0. * +.\"* * +.\"*********************************************************************** +.\" +.\" $Id$ +.\" .TH OCAMLMKTOP 1 .SH NAME diff --git a/man/ocamlopt.m b/man/ocamlopt.m index 80811fb89..a366d5a84 100644 --- a/man/ocamlopt.m +++ b/man/ocamlopt.m @@ -1,5 +1,17 @@ -\" $Id$ - +.\"*********************************************************************** +.\"* * +.\"* OCaml * +.\"* * +.\"* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +.\"* * +.\"* Copyright 1996 Institut National de Recherche en Informatique et * +.\"* en Automatique. All rights reserved. This file is distributed * +.\"* under the terms of the Q Public License version 1.0. * +.\"* * +.\"*********************************************************************** +.\" +.\" $Id$ +.\" .TH OCAMLOPT 1 .SH NAME diff --git a/man/ocamlprof.m b/man/ocamlprof.m index f9775ae7b..3f20398f0 100644 --- a/man/ocamlprof.m +++ b/man/ocamlprof.m @@ -1,4 +1,17 @@ -\" $Id$ +.\"*********************************************************************** +.\"* * +.\"* OCaml * +.\"* * +.\"* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +.\"* * +.\"* Copyright 1996 Institut National de Recherche en Informatique et * +.\"* en Automatique. All rights reserved. This file is distributed * +.\"* under the terms of the Q Public License version 1.0. * +.\"* * +.\"*********************************************************************** +.\" +.\" $Id$ +.\" .TH OCAMLPROF 1 .SH NAME diff --git a/man/ocamlrun.m b/man/ocamlrun.m index aaa93a277..7aef64eeb 100644 --- a/man/ocamlrun.m +++ b/man/ocamlrun.m @@ -1,5 +1,17 @@ -\" $Id$ - +.\"*********************************************************************** +.\"* * +.\"* OCaml * +.\"* * +.\"* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +.\"* * +.\"* Copyright 1996 Institut National de Recherche en Informatique et * +.\"* en Automatique. All rights reserved. This file is distributed * +.\"* under the terms of the Q Public License version 1.0. * +.\"* * +.\"*********************************************************************** +.\" +.\" $Id$ +.\" .TH OCAMLRUN 1 .SH NAME @@ -60,6 +72,7 @@ flag in the OCAMLRUNPARAM environment variable (see below). Search the directory .I dir for dynamically-loaded libraries, in addition to the standard search path. +.TP .B \-p Print the names of the primitives known to this version of .BR ocamlrun (1) diff --git a/man/ocamlyacc.m b/man/ocamlyacc.m index 43436f2f6..ce53cc4af 100644 --- a/man/ocamlyacc.m +++ b/man/ocamlyacc.m @@ -1,4 +1,17 @@ -\" $Id$ +.\"*********************************************************************** +.\"* * +.\"* OCaml * +.\"* * +.\"* Xavier Leroy, projet Cristal, INRIA Rocquencourt * +.\"* * +.\"* Copyright 1996 Institut National de Recherche en Informatique et * +.\"* en Automatique. All rights reserved. This file is distributed * +.\"* under the terms of the Q Public License version 1.0. * +.\"* * +.\"*********************************************************************** +.\" +.\" $Id$ +.\" .TH OCAMLYACC 1 .SH NAME diff --git a/myocamlbuild.ml b/myocamlbuild.ml index 663847b49..af07c8df3 100644 --- a/myocamlbuild.ml +++ b/myocamlbuild.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Nicolas Pouillard, projet Gallium, INRIA Rocquencourt *) (* *) diff --git a/myocamlbuild_config.mli b/myocamlbuild_config.mli index 28b226177..c50049956 100644 --- a/myocamlbuild_config.mli +++ b/myocamlbuild_config.mli @@ -1,3 +1,15 @@ +(*************************************************************************) +(* *) +(* OCaml *) +(* *) +(* Nicolas Pouillard, projet Gallium, INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed *) +(* under the terms of the Q Public License version 1.0. *) +(* *) +(*************************************************************************) + val prefix : string val bindir : string val libdir : string diff --git a/ocamlbuild/Makefile b/ocamlbuild/Makefile index 0f1903369..e4ee877eb 100644 --- a/ocamlbuild/Makefile +++ b/ocamlbuild/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Nicolas Pouillard, Berke Durak, projet Gallium, INRIA Rocquencourt # # # diff --git a/ocamlbuild/_tags b/ocamlbuild/_tags index 617d6a72f..cd271d16f 100644 --- a/ocamlbuild/_tags +++ b/ocamlbuild/_tags @@ -1,3 +1,15 @@ +######################################################################### +# # +# OCaml # +# # +# Nicolas Pouillard, projet Gallium, INRIA Rocquencourt # +# # +# Copyright 2007 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the Q Public License version 1.0. # +# # +######################################################################### + # OCamlbuild tags file true: debug <*.ml> or <*.mli>: warn_L, warn_R, warn_Z, annot diff --git a/ocamlbuild/exit_codes.ml b/ocamlbuild/exit_codes.ml index 19cb4f02f..71c9f06f2 100644 --- a/ocamlbuild/exit_codes.ml +++ b/ocamlbuild/exit_codes.ml @@ -1,3 +1,14 @@ +(***********************************************************************) +(* ocamlbuild *) +(* *) +(* Nicolas Pouillard, Berke Durak, projet Gallium, INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed *) +(* under the terms of the Q Public License version 1.0. *) +(* *) +(***********************************************************************) + let rc_ok = 0 let rc_usage = 1 let rc_failure = 2 diff --git a/ocamlbuild/exit_codes.mli b/ocamlbuild/exit_codes.mli index acbc0ede3..a83a300b6 100644 --- a/ocamlbuild/exit_codes.mli +++ b/ocamlbuild/exit_codes.mli @@ -1,3 +1,14 @@ +(***********************************************************************) +(* ocamlbuild *) +(* *) +(* Nicolas Pouillard, Berke Durak, projet Gallium, INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed *) +(* under the terms of the Q Public License version 1.0. *) +(* *) +(***********************************************************************) + val rc_ok : int val rc_usage : int val rc_failure : int diff --git a/ocamlbuild/man/ocamlbuild.1 b/ocamlbuild/man/ocamlbuild.1 index 58a33740b..dab9e941d 100644 --- a/ocamlbuild/man/ocamlbuild.1 +++ b/ocamlbuild/man/ocamlbuild.1 @@ -1,7 +1,18 @@ +.\"***********************************************************************) +.\"* ocamlbuild *) +.\"* *) +.\"* Nicolas Pouillard, Berke Durak, projet Gallium, INRIA Rocquencourt *) +.\"* *) +.\"* Copyright 2007 Institut National de Recherche en Informatique et *) +.\"* en Automatique. All rights reserved. This file is distributed *) +.\"* under the terms of the Q Public License version 1.0. *) +.\"* *) +.\"***********************************************************************) +.\" .TH OCAMLBUILD 1 .SH NAME -ocamlbuild \- The Objective Caml project compilation tool +ocamlbuild \- The OCaml project compilation tool .SH SYNOPSIS @@ -250,4 +261,4 @@ manual, .BR ocaml (1), .BR make (1). .br -.I The Objective Caml user's manual, chapter "Batch compilation". +.I The OCaml user's manual, chapter "Batch compilation". diff --git a/ocamlbuild/manual/Makefile b/ocamlbuild/manual/Makefile index 055d42e71..595f730ee 100644 --- a/ocamlbuild/manual/Makefile +++ b/ocamlbuild/manual/Makefile @@ -1,3 +1,14 @@ +####################################################################### +# ocamlbuild # +# # +# Nicolas Pouillard, Berke Durak, projet Gallium, INRIA Rocquencourt # +# # +# Copyright 2007 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the Q Public License version 1.0. # +# # +####################################################################### + # Makefile all: manual.pdf manual.html diff --git a/ocamlbuild/manual/manual.tex b/ocamlbuild/manual/manual.tex index 62d900450..01d671eb7 100644 --- a/ocamlbuild/manual/manual.tex +++ b/ocamlbuild/manual/manual.tex @@ -1,4 +1,15 @@ % -*- LaTeX -*- +%(***********************************************************************) +%(* ocamlbuild *) +%(* *) +%(* Nicolas Pouillard, Berke Durak, projet Gallium, INRIA Rocquencourt *) +%(* *) +%(* Copyright 2007 Institut National de Recherche en Informatique et *) +%(* en Automatique. All rights reserved. This file is distributed *) +%(* under the terms of the Q Public License version 1.0. *) +%(* *) +%(***********************************************************************) + %(*** preamble \documentclass[9pt]{article} \usepackage[utf8]{inputenc} diff --git a/ocamlbuild/ocamlbuild-presentation.rslide b/ocamlbuild/ocamlbuild-presentation.rslide index 30ba657b3..8f17da0bc 100644 --- a/ocamlbuild/ocamlbuild-presentation.rslide +++ b/ocamlbuild/ocamlbuild-presentation.rslide @@ -1,3 +1,15 @@ +######################################################################### +# # +# OCaml # +# # +# Nicolas Pouillard, Berke Durak, projet Gallium, INRIA Rocquencourt # +# # +# Copyright 2007 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the Q Public License version 1.0. # +# # +######################################################################### + # Works with rslide revision 8 # http://gallium.inria.fr/~pouillar/rslide/rslide documentclass :beamer, :t, :compress, :red diff --git a/ocamlbuild/ocamlbuild_plugin.mli b/ocamlbuild/ocamlbuild_plugin.mli index 8e642f31a..0844b4d7c 100644 --- a/ocamlbuild/ocamlbuild_plugin.mli +++ b/ocamlbuild/ocamlbuild_plugin.mli @@ -1,3 +1,14 @@ +(***********************************************************************) +(* ocamlbuild *) +(* *) +(* Nicolas Pouillard, Berke Durak, projet Gallium, INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed *) +(* under the terms of the Q Public License version 1.0. *) +(* *) +(***********************************************************************) + include Ocamlbuild_pack.Signatures.PLUGIN with module Pathname = Ocamlbuild_pack.Pathname and module Outcome = Ocamlbuild_pack.My_std.Outcome diff --git a/ocamlbuild/ocamlbuild_where.ml b/ocamlbuild/ocamlbuild_where.ml index 14fcde5d7..d65b41edc 100644 --- a/ocamlbuild/ocamlbuild_where.ml +++ b/ocamlbuild/ocamlbuild_where.ml @@ -1,3 +1,14 @@ +(***********************************************************************) +(* ocamlbuild *) +(* *) +(* Nicolas Pouillard, Berke Durak, projet Gallium, INRIA Rocquencourt *) +(* *) +(* Copyright 2007 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed *) +(* under the terms of the Q Public License version 1.0. *) +(* *) +(***********************************************************************) + let bindir = ref Ocamlbuild_Myocamlbuild_config.bindir;; let libdir = ref begin Filename.concat diff --git a/ocamlbuild/start.sh b/ocamlbuild/start.sh index 20b7b7656..7386cbd3e 100755 --- a/ocamlbuild/start.sh +++ b/ocamlbuild/start.sh @@ -2,7 +2,7 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Nicolas Pouillard, projet Gallium, INRIA Rocquencourt # # # diff --git a/ocamldoc/Makefile b/ocamldoc/Makefile index 64b85a8a3..0c4f61ecf 100644 --- a/ocamldoc/Makefile +++ b/ocamldoc/Makefile @@ -1,5 +1,5 @@ #(***********************************************************************) -#(* OCamldoc *) +#(* OCamldoc *) #(* *) #(* Maxence Guesdon, projet Cristal, INRIA Rocquencourt *) #(* *) @@ -355,6 +355,7 @@ clean:: dummy @rm -f odoc_lexer.ml odoc_text_lexer.ml odoc_see_lexer.ml odoc_ocamlhtml.ml @rm -f odoc_parser.ml odoc_parser.mli odoc_text_parser.ml odoc_text_parser.mli @rm -rf stdlib_man + @rm -f generators/*.cm[aiox] generators/*.[ao] generators/*.cmx[as] depend:: $(OCAMLYACC) odoc_text_parser.mly diff --git a/ocamldoc/Makefile.nt b/ocamldoc/Makefile.nt index 387aec928..bdc230d2f 100644 --- a/ocamldoc/Makefile.nt +++ b/ocamldoc/Makefile.nt @@ -1,5 +1,5 @@ #(***********************************************************************) -#(* OCamldoc *) +#(* OCamldoc *) #(* *) #(* Maxence Guesdon, projet Cristal, INRIA Rocquencourt *) #(* *) diff --git a/ocamldoc/odoc_dep.ml b/ocamldoc/odoc_dep.ml index 86a0f247c..8878e723e 100644 --- a/ocamldoc/odoc_dep.ml +++ b/ocamldoc/odoc_dep.ml @@ -1,5 +1,5 @@ (***********************************************************************) -(* OCamldoc *) +(* OCamldoc *) (* *) (* Maxence Guesdon, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/ocamldoc/odoc_dot.ml b/ocamldoc/odoc_dot.ml index 8d4fa2f3c..a0d5ee222 100644 --- a/ocamldoc/odoc_dot.ml +++ b/ocamldoc/odoc_dot.ml @@ -1,5 +1,5 @@ (***********************************************************************) -(* Ocamldoc *) +(* OCamldoc *) (* *) (* Maxence Guesdon, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/ocamldoc/odoc_gen.ml b/ocamldoc/odoc_gen.ml index 260aed4df..b77b186d4 100644 --- a/ocamldoc/odoc_gen.ml +++ b/ocamldoc/odoc_gen.ml @@ -1,3 +1,14 @@ +(***********************************************************************) +(* OCamldoc *) +(* *) +(* Maxence Guesdon, projet Gallium, INRIA Rocquencourt *) +(* *) +(* Copyright 2010 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed *) +(* under the terms of the Q Public License version 1.0. *) +(* *) +(***********************************************************************) + (** *) class type doc_generator = @@ -35,4 +46,4 @@ let get_minimal_generator = function | Other m -> let module M = (val m : Base) in new M.generator - ;; \ No newline at end of file + ;; diff --git a/ocamldoc/odoc_gen.mli b/ocamldoc/odoc_gen.mli index 1200a7c42..4649c9504 100644 --- a/ocamldoc/odoc_gen.mli +++ b/ocamldoc/odoc_gen.mli @@ -1,3 +1,14 @@ +(***********************************************************************) +(* OCamldoc *) +(* *) +(* Maxence Guesdon, projet Gallium, INRIA Rocquencourt *) +(* *) +(* Copyright 2010 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed *) +(* under the terms of the Q Public License version 1.0. *) +(* *) +(***********************************************************************) + (** The types of generators. *) (** The minimal class type of documentation generators. *) @@ -19,4 +30,4 @@ type generator = | Other of (module Base) ;; -val get_minimal_generator : generator -> doc_generator \ No newline at end of file +val get_minimal_generator : generator -> doc_generator diff --git a/ocamldoc/odoc_global.ml b/ocamldoc/odoc_global.ml index 0b2ab6a2b..b2d7bf872 100644 --- a/ocamldoc/odoc_global.ml +++ b/ocamldoc/odoc_global.ml @@ -1,5 +1,5 @@ (***********************************************************************) -(* OCamldoc *) +(* OCamldoc *) (* *) (* Maxence Guesdon, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/ocamldoc/odoc_global.mli b/ocamldoc/odoc_global.mli index 454bb8535..d3d17ebe3 100644 --- a/ocamldoc/odoc_global.mli +++ b/ocamldoc/odoc_global.mli @@ -1,5 +1,5 @@ (***********************************************************************) -(* Ocamldoc *) +(* OCamldoc *) (* *) (* Maxence Guesdon, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/ocamldoc/odoc_texi.ml b/ocamldoc/odoc_texi.ml index c3ed148ff..55cb972fa 100644 --- a/ocamldoc/odoc_texi.ml +++ b/ocamldoc/odoc_texi.ml @@ -1,11 +1,12 @@ (***********************************************************************) -(* OCamldoc *) +(* OCamldoc *) (* *) (* Olivier Andrieu, base sur du code de Maxence Guesdon *) (* *) (* Copyright 2001 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) (* under the terms of the Q Public License version 1.0. *) +(* *) (***********************************************************************) (* $Id$ *) diff --git a/ocamldoc/remove_DEBUG b/ocamldoc/remove_DEBUG index 78b11e612..b8550e252 100755 --- a/ocamldoc/remove_DEBUG +++ b/ocamldoc/remove_DEBUG @@ -1,7 +1,7 @@ #!/bin/sh #(***********************************************************************) -#(* OCamldoc *) +#(* OCamldoc *) #(* *) #(* Damien Doligez, projet Moscova, INRIA Rocquencourt *) #(* *) diff --git a/ocamldoc/runocamldoc b/ocamldoc/runocamldoc index a71d705cc..3aba71923 100644 --- a/ocamldoc/runocamldoc +++ b/ocamldoc/runocamldoc @@ -1,4 +1,17 @@ #!/bin/sh + +####################################################################### +# # +# OCaml # +# # +# Xavier Leroy, projet Cristal, INRIA Rocquencourt # +# # +# Copyright 2002 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the Q Public License version 1.0. # +# # +####################################################################### + # $Id$ case "$1" in diff --git a/otherlibs/Makefile b/otherlibs/Makefile index c5db1981c..fba032df8 100644 --- a/otherlibs/Makefile +++ b/otherlibs/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/Makefile.nt b/otherlibs/Makefile.nt index 32aca21c0..ceab7f0c5 100644 --- a/otherlibs/Makefile.nt +++ b/otherlibs/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/Makefile.shared b/otherlibs/Makefile.shared index 7e6780b3e..08e9abb1d 100644 --- a/otherlibs/Makefile.shared +++ b/otherlibs/Makefile.shared @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/bigarray/Makefile b/otherlibs/bigarray/Makefile index 38914ff35..83b315258 100644 --- a/otherlibs/bigarray/Makefile +++ b/otherlibs/bigarray/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/bigarray/Makefile.nt b/otherlibs/bigarray/Makefile.nt index 78f3fc6b6..e845ad62e 100644 --- a/otherlibs/bigarray/Makefile.nt +++ b/otherlibs/bigarray/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/bigarray/bigarray.h b/otherlibs/bigarray/bigarray.h index 407a53776..695306544 100644 --- a/otherlibs/bigarray/bigarray.h +++ b/otherlibs/bigarray/bigarray.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Manuel Serrano and Xavier Leroy, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/bigarray/bigarray.ml b/otherlibs/bigarray/bigarray.ml index 09ae8bd13..1d3dbcf97 100644 --- a/otherlibs/bigarray/bigarray.ml +++ b/otherlibs/bigarray/bigarray.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Manuel Serrano et Xavier Leroy, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/bigarray/bigarray.mli b/otherlibs/bigarray/bigarray.mli index a49923ae2..a66e1eebb 100644 --- a/otherlibs/bigarray/bigarray.mli +++ b/otherlibs/bigarray/bigarray.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Manuel Serrano and Xavier Leroy, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/bigarray/bigarray_stubs.c b/otherlibs/bigarray/bigarray_stubs.c index e7bee339b..7c751b7cf 100644 --- a/otherlibs/bigarray/bigarray_stubs.c +++ b/otherlibs/bigarray/bigarray_stubs.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Manuel Serrano and Xavier Leroy, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/bigarray/mmap_unix.c b/otherlibs/bigarray/mmap_unix.c index 6af039302..4d77c2e54 100644 --- a/otherlibs/bigarray/mmap_unix.c +++ b/otherlibs/bigarray/mmap_unix.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Manuel Serrano and Xavier Leroy, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/bigarray/mmap_win32.c b/otherlibs/bigarray/mmap_win32.c index 9be9e18e0..067e3284a 100644 --- a/otherlibs/bigarray/mmap_win32.c +++ b/otherlibs/bigarray/mmap_win32.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Manuel Serrano and Xavier Leroy, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/dbm/Makefile b/otherlibs/dbm/Makefile index 099327d69..dcd068ade 100644 --- a/otherlibs/dbm/Makefile +++ b/otherlibs/dbm/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/dbm/cldbm.c b/otherlibs/dbm/cldbm.c index 0d6cb362d..6c9954a34 100644 --- a/otherlibs/dbm/cldbm.c +++ b/otherlibs/dbm/cldbm.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Francois Rouaix, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/dbm/dbm.ml b/otherlibs/dbm/dbm.ml index f31d29934..26fbb80a5 100644 --- a/otherlibs/dbm/dbm.ml +++ b/otherlibs/dbm/dbm.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Francois Rouaix, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/dbm/dbm.mli b/otherlibs/dbm/dbm.mli index f9924427a..9a0c49212 100644 --- a/otherlibs/dbm/dbm.mli +++ b/otherlibs/dbm/dbm.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Francois Rouaix, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/dynlink/Makefile b/otherlibs/dynlink/Makefile index 3da485f47..c44451c0e 100644 --- a/otherlibs/dynlink/Makefile +++ b/otherlibs/dynlink/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/dynlink/Makefile.nt b/otherlibs/dynlink/Makefile.nt index 3d8b84b77..31ee136d6 100644 --- a/otherlibs/dynlink/Makefile.nt +++ b/otherlibs/dynlink/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/dynlink/dynlink.ml b/otherlibs/dynlink/dynlink.ml index 0d324a854..603535d65 100644 --- a/otherlibs/dynlink/dynlink.ml +++ b/otherlibs/dynlink/dynlink.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/dynlink/dynlink.mli b/otherlibs/dynlink/dynlink.mli index 7cca68c5a..849f1e148 100644 --- a/otherlibs/dynlink/dynlink.mli +++ b/otherlibs/dynlink/dynlink.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) @@ -98,7 +98,7 @@ val add_available_units : (string * Digest.t) list -> unit for each unit. This way, the [.cmi] interface files need not be available at run-time. The digests can be extracted from [.cmi] files using the [extract_crc] program installed in the - Objective Caml standard library directory. *) + OCaml standard library directory. *) val clear_available_units : unit -> unit (** Empty the list of compilation units accessible to dynamically-linked diff --git a/otherlibs/dynlink/extract_crc.ml b/otherlibs/dynlink/extract_crc.ml index e7d9139be..672ca6ea9 100644 --- a/otherlibs/dynlink/extract_crc.ml +++ b/otherlibs/dynlink/extract_crc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/dynlink/natdynlink.ml b/otherlibs/dynlink/natdynlink.ml index 6ab9b9850..d980a7b90 100644 --- a/otherlibs/dynlink/natdynlink.ml +++ b/otherlibs/dynlink/natdynlink.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Gallium, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/graph/Makefile b/otherlibs/graph/Makefile index 2be984465..19c4612ed 100644 --- a/otherlibs/graph/Makefile +++ b/otherlibs/graph/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/graph/color.c b/otherlibs/graph/color.c index 0dc296707..bdd8b5e28 100644 --- a/otherlibs/graph/color.c +++ b/otherlibs/graph/color.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/graph/draw.c b/otherlibs/graph/draw.c index 35a4ae175..0419c6270 100644 --- a/otherlibs/graph/draw.c +++ b/otherlibs/graph/draw.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/graph/dump_img.c b/otherlibs/graph/dump_img.c index 8c82c21bf..66185d875 100644 --- a/otherlibs/graph/dump_img.c +++ b/otherlibs/graph/dump_img.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/graph/events.c b/otherlibs/graph/events.c index d9563a397..508931055 100644 --- a/otherlibs/graph/events.c +++ b/otherlibs/graph/events.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/graph/fill.c b/otherlibs/graph/fill.c index 0430c14a6..bb1a60e78 100644 --- a/otherlibs/graph/fill.c +++ b/otherlibs/graph/fill.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/graph/graphics.ml b/otherlibs/graph/graphics.ml index 96a247161..a9dd51140 100644 --- a/otherlibs/graph/graphics.ml +++ b/otherlibs/graph/graphics.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/graph/graphics.mli b/otherlibs/graph/graphics.mli index 23d61a39a..10074cb7a 100644 --- a/otherlibs/graph/graphics.mli +++ b/otherlibs/graph/graphics.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/graph/graphicsX11.ml b/otherlibs/graph/graphicsX11.ml index 85f5a4360..4b70d29bd 100644 --- a/otherlibs/graph/graphicsX11.ml +++ b/otherlibs/graph/graphicsX11.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Pierre Weis and Jun Furuse, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/graph/graphicsX11.mli b/otherlibs/graph/graphicsX11.mli index 111825371..f35f5a664 100644 --- a/otherlibs/graph/graphicsX11.mli +++ b/otherlibs/graph/graphicsX11.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Pierre Weis and Jun Furuse, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/graph/image.c b/otherlibs/graph/image.c index a337de348..c610d96b6 100644 --- a/otherlibs/graph/image.c +++ b/otherlibs/graph/image.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/graph/image.h b/otherlibs/graph/image.h index 539cf9f8c..76d319e0a 100644 --- a/otherlibs/graph/image.h +++ b/otherlibs/graph/image.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/graph/libgraph.h b/otherlibs/graph/libgraph.h index d2df1c1ae..db3fd71d8 100644 --- a/otherlibs/graph/libgraph.h +++ b/otherlibs/graph/libgraph.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/graph/make_img.c b/otherlibs/graph/make_img.c index 325e6698d..08628804f 100644 --- a/otherlibs/graph/make_img.c +++ b/otherlibs/graph/make_img.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/graph/open.c b/otherlibs/graph/open.c index 82a4c0fb3..1f7da5ba4 100644 --- a/otherlibs/graph/open.c +++ b/otherlibs/graph/open.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/graph/point_col.c b/otherlibs/graph/point_col.c index 473dae7d0..2149aa8eb 100644 --- a/otherlibs/graph/point_col.c +++ b/otherlibs/graph/point_col.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/graph/sound.c b/otherlibs/graph/sound.c index dc75b7ed0..cba7a909b 100644 --- a/otherlibs/graph/sound.c +++ b/otherlibs/graph/sound.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/graph/subwindow.c b/otherlibs/graph/subwindow.c index 642e28c40..08882569e 100644 --- a/otherlibs/graph/subwindow.c +++ b/otherlibs/graph/subwindow.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Jun Furuse, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/graph/text.c b/otherlibs/graph/text.c index f4d980aed..6743e8640 100644 --- a/otherlibs/graph/text.c +++ b/otherlibs/graph/text.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/labltk/Makefile b/otherlibs/labltk/Makefile index 8c3b823c5..8b7209b10 100644 --- a/otherlibs/labltk/Makefile +++ b/otherlibs/labltk/Makefile @@ -1,3 +1,19 @@ +####################################################################### +# # +# MLTk, Tcl/Tk interface of OCaml # +# # +# Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis # +# projet Cristal, INRIA Rocquencourt # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 1999 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file LICENSE found in the OCaml source tree. # +# # +####################################################################### + # Top Makefile for mlTk SUBDIRS=compiler support lib jpf frx examples_labltk \ diff --git a/otherlibs/labltk/Makefile.nt b/otherlibs/labltk/Makefile.nt index f1fd56ed9..651540f34 100644 --- a/otherlibs/labltk/Makefile.nt +++ b/otherlibs/labltk/Makefile.nt @@ -1,3 +1,19 @@ +####################################################################### +# # +# MLTk, Tcl/Tk interface of OCaml # +# # +# Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis # +# projet Cristal, INRIA Rocquencourt # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 2000 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file LICENSE found in the OCaml source tree. # +# # +####################################################################### + # Top Makefile for LablTk include ../../config/Makefile diff --git a/otherlibs/labltk/README b/otherlibs/labltk/README index b556d2b3e..5d3e9d314 100644 --- a/otherlibs/labltk/README +++ b/otherlibs/labltk/README @@ -1,6 +1,6 @@ INTRODUCTION ============ -mlTk is a library for interfacing Objective Caml with the scripting +mlTk is a library for interfacing OCaml with the scripting language Tcl/Tk (all versions since 8.0.3, but no betas). In addition to the basic interface with Tcl/Tk, this package contains @@ -31,7 +31,7 @@ just with little fixes. REQUIREMENTS ============ You must have already installed - * Objective Caml source, version 3.04+8 or later + * OCaml source, version 3.04+8 or later * Tcl/Tk 8.0.3 or later http://www.scriptics.com/ or various mirrors diff --git a/otherlibs/labltk/Widgets.src b/otherlibs/labltk/Widgets.src index abf015a27..e66268278 100644 --- a/otherlibs/labltk/Widgets.src +++ b/otherlibs/labltk/Widgets.src @@ -1,3 +1,19 @@ +%(***********************************************************************) +%(* *) +%(* MLTk, Tcl/Tk interface of OCaml *) +%(* *) +%(* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) +%(* projet Cristal, INRIA Rocquencourt *) +%(* Jacques Garrigue, Kyoto University RIMS *) +%(* *) +%(* Copyright 2002 Institut National de Recherche en Informatique et *) +%(* en Automatique and Kyoto University. All rights reserved. *) +%(* This file is distributed under the terms of the GNU Library *) +%(* General Public License, with the special exception on linking *) +%(* described in file LICENSE found in the OCaml source tree. *) +%(* *) +%(***********************************************************************) + %%%%%%%%%%%%%% Standard Tk8.0.3 Widgets and functions %%%%%%%%%%%%%% type Widget external diff --git a/otherlibs/labltk/browser/Makefile b/otherlibs/labltk/browser/Makefile index 5caed2bf6..a21973e7c 100644 --- a/otherlibs/labltk/browser/Makefile +++ b/otherlibs/labltk/browser/Makefile @@ -1,3 +1,17 @@ +######################################################################### +# # +# OCaml LablTk library # +# # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 1999 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file ../../../LICENSE. # +# # +######################################################################### + # $Id$ OTHERSLIB=-I $(OTHERS)/unix -I $(OTHERS)/str diff --git a/otherlibs/labltk/browser/Makefile.nt b/otherlibs/labltk/browser/Makefile.nt index 405f47e74..289b0924c 100644 --- a/otherlibs/labltk/browser/Makefile.nt +++ b/otherlibs/labltk/browser/Makefile.nt @@ -1,3 +1,17 @@ +######################################################################### +# # +# OCaml LablTk library # +# # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 2000 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file ../../../LICENSE. # +# # +######################################################################### + # $Id$ OTHERSLIB=-I $(OTHERS)/win32unix -I $(OTHERS)/str -I $(OTHERS)/systhreads diff --git a/otherlibs/labltk/browser/Makefile.shared b/otherlibs/labltk/browser/Makefile.shared index b80967086..b6be2fc33 100644 --- a/otherlibs/labltk/browser/Makefile.shared +++ b/otherlibs/labltk/browser/Makefile.shared @@ -1,5 +1,19 @@ include ../support/Makefile.common +######################################################################### +# # +# OCaml LablTk library # +# # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 1999 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file ../../../LICENSE. # +# # +######################################################################### + LABLTKLIB=-I ../labltk -I ../lib -I ../support OCAMLTOPLIB=-I $(TOPDIR)/parsing -I $(TOPDIR)/utils -I $(TOPDIR)/typing INCLUDES=$(OTHERSLIB) $(LABLTKLIB) $(OCAMLTOPLIB) @@ -52,7 +66,7 @@ install: cp ocamlbrowser$(EXE) $(BINDIR); fi clean: - rm -f *.cm? ocamlbrowser$(EXE) dummy.mli *~ *.orig *.$(O) + rm -f *.cm? ocamlbrowser$(EXE) dummy.mli *~ *.orig *.$(O) help.ml depend: $(CAMLDEP) *.ml *.mli > .depend diff --git a/otherlibs/labltk/browser/dummyUnix.mli b/otherlibs/labltk/browser/dummyUnix.mli index 227241923..137368118 100644 --- a/otherlibs/labltk/browser/dummyUnix.mli +++ b/otherlibs/labltk/browser/dummyUnix.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/dummyWin.mli b/otherlibs/labltk/browser/dummyWin.mli index a4b75ee37..3f8c26e63 100644 --- a/otherlibs/labltk/browser/dummyWin.mli +++ b/otherlibs/labltk/browser/dummyWin.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/editor.ml b/otherlibs/labltk/browser/editor.ml index 617cdfa85..a9f7e6eac 100644 --- a/otherlibs/labltk/browser/editor.ml +++ b/otherlibs/labltk/browser/editor.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/editor.mli b/otherlibs/labltk/browser/editor.mli index 665ee813f..2d5e90492 100644 --- a/otherlibs/labltk/browser/editor.mli +++ b/otherlibs/labltk/browser/editor.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/fileselect.ml b/otherlibs/labltk/browser/fileselect.ml index 22052b423..d62b8ba3c 100644 --- a/otherlibs/labltk/browser/fileselect.ml +++ b/otherlibs/labltk/browser/fileselect.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/fileselect.mli b/otherlibs/labltk/browser/fileselect.mli index b723c626d..ed10eaf68 100644 --- a/otherlibs/labltk/browser/fileselect.mli +++ b/otherlibs/labltk/browser/fileselect.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_bind.ml b/otherlibs/labltk/browser/jg_bind.ml index 2e3ec9870..3fb854b09 100644 --- a/otherlibs/labltk/browser/jg_bind.ml +++ b/otherlibs/labltk/browser/jg_bind.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_bind.mli b/otherlibs/labltk/browser/jg_bind.mli index e09c2ba46..70e323bee 100644 --- a/otherlibs/labltk/browser/jg_bind.mli +++ b/otherlibs/labltk/browser/jg_bind.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_box.ml b/otherlibs/labltk/browser/jg_box.ml index 3675f4bfa..bc865f6d5 100644 --- a/otherlibs/labltk/browser/jg_box.ml +++ b/otherlibs/labltk/browser/jg_box.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_button.ml b/otherlibs/labltk/browser/jg_button.ml index 11abd68ab..de8d3582b 100644 --- a/otherlibs/labltk/browser/jg_button.ml +++ b/otherlibs/labltk/browser/jg_button.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_completion.ml b/otherlibs/labltk/browser/jg_completion.ml index c93b099b3..a5457a65b 100644 --- a/otherlibs/labltk/browser/jg_completion.ml +++ b/otherlibs/labltk/browser/jg_completion.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_completion.mli b/otherlibs/labltk/browser/jg_completion.mli index 69c7a134c..40c2db3ce 100644 --- a/otherlibs/labltk/browser/jg_completion.mli +++ b/otherlibs/labltk/browser/jg_completion.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_config.ml b/otherlibs/labltk/browser/jg_config.ml index bce0e50e7..fbbd2ef1b 100644 --- a/otherlibs/labltk/browser/jg_config.ml +++ b/otherlibs/labltk/browser/jg_config.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_config.mli b/otherlibs/labltk/browser/jg_config.mli index 511e2b3a6..fdaab3fe1 100644 --- a/otherlibs/labltk/browser/jg_config.mli +++ b/otherlibs/labltk/browser/jg_config.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_entry.ml b/otherlibs/labltk/browser/jg_entry.ml index c09a273e8..1f7aab751 100644 --- a/otherlibs/labltk/browser/jg_entry.ml +++ b/otherlibs/labltk/browser/jg_entry.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_memo.ml b/otherlibs/labltk/browser/jg_memo.ml index e238929a0..fb1c05efa 100644 --- a/otherlibs/labltk/browser/jg_memo.ml +++ b/otherlibs/labltk/browser/jg_memo.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_memo.mli b/otherlibs/labltk/browser/jg_memo.mli index 5491dee32..14443ad16 100644 --- a/otherlibs/labltk/browser/jg_memo.mli +++ b/otherlibs/labltk/browser/jg_memo.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_menu.ml b/otherlibs/labltk/browser/jg_menu.ml index b399d10d8..880ca775e 100644 --- a/otherlibs/labltk/browser/jg_menu.ml +++ b/otherlibs/labltk/browser/jg_menu.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_message.ml b/otherlibs/labltk/browser/jg_message.ml index 3c18f193c..d4d3ebbd2 100644 --- a/otherlibs/labltk/browser/jg_message.ml +++ b/otherlibs/labltk/browser/jg_message.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_message.mli b/otherlibs/labltk/browser/jg_message.mli index 0a83a594f..0e123ac2c 100644 --- a/otherlibs/labltk/browser/jg_message.mli +++ b/otherlibs/labltk/browser/jg_message.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_multibox.ml b/otherlibs/labltk/browser/jg_multibox.ml index febec8e5d..39082e329 100644 --- a/otherlibs/labltk/browser/jg_multibox.ml +++ b/otherlibs/labltk/browser/jg_multibox.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_multibox.mli b/otherlibs/labltk/browser/jg_multibox.mli index 6dfe7d8fb..bccca5062 100644 --- a/otherlibs/labltk/browser/jg_multibox.mli +++ b/otherlibs/labltk/browser/jg_multibox.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_text.ml b/otherlibs/labltk/browser/jg_text.ml index 067b9dac5..76eeb92a7 100644 --- a/otherlibs/labltk/browser/jg_text.ml +++ b/otherlibs/labltk/browser/jg_text.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_text.mli b/otherlibs/labltk/browser/jg_text.mli index e8646dd9d..44cba0232 100644 --- a/otherlibs/labltk/browser/jg_text.mli +++ b/otherlibs/labltk/browser/jg_text.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_tk.ml b/otherlibs/labltk/browser/jg_tk.ml index 7fc77f096..16106eebf 100644 --- a/otherlibs/labltk/browser/jg_tk.ml +++ b/otherlibs/labltk/browser/jg_tk.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/jg_toplevel.ml b/otherlibs/labltk/browser/jg_toplevel.ml index 64b6f54d7..d77845df5 100644 --- a/otherlibs/labltk/browser/jg_toplevel.ml +++ b/otherlibs/labltk/browser/jg_toplevel.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/lexical.ml b/otherlibs/labltk/browser/lexical.ml index 72f1957ec..a700f7286 100644 --- a/otherlibs/labltk/browser/lexical.ml +++ b/otherlibs/labltk/browser/lexical.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/lexical.mli b/otherlibs/labltk/browser/lexical.mli index 3be04d324..52d09e35f 100644 --- a/otherlibs/labltk/browser/lexical.mli +++ b/otherlibs/labltk/browser/lexical.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/list2.ml b/otherlibs/labltk/browser/list2.ml index 87b88f496..4439e7410 100644 --- a/otherlibs/labltk/browser/list2.ml +++ b/otherlibs/labltk/browser/list2.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/main.ml b/otherlibs/labltk/browser/main.ml index 181506960..1d79daa54 100644 --- a/otherlibs/labltk/browser/main.ml +++ b/otherlibs/labltk/browser/main.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) @@ -49,7 +49,7 @@ let check ~spec argv = open Printf let print_version () = - printf "The Objective Caml browser, version %s\n" Sys.ocaml_version; + printf "The OCaml browser, version %s\n" Sys.ocaml_version; exit 0; ;; @@ -106,7 +106,7 @@ let _ = (Printf.sprintf "%s\nPlease check that %s %s\nCurrent value is `%s'" "Couldn't initialize environment." (if is_win32 then "%OCAMLLIB%" else "$OCAMLLIB") - "points to the Objective Caml library." + "points to the OCaml library." Config.standard_library) end; diff --git a/otherlibs/labltk/browser/mytypes.mli b/otherlibs/labltk/browser/mytypes.mli index 6db120adc..b4deead23 100644 --- a/otherlibs/labltk/browser/mytypes.mli +++ b/otherlibs/labltk/browser/mytypes.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/searchid.ml b/otherlibs/labltk/browser/searchid.ml index 6742039c1..47d7dd39a 100644 --- a/otherlibs/labltk/browser/searchid.ml +++ b/otherlibs/labltk/browser/searchid.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/searchid.mli b/otherlibs/labltk/browser/searchid.mli index 980c141d0..9e0c8ad98 100644 --- a/otherlibs/labltk/browser/searchid.mli +++ b/otherlibs/labltk/browser/searchid.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/searchpos.ml b/otherlibs/labltk/browser/searchpos.ml index 8cae99593..9d9f8d10c 100644 --- a/otherlibs/labltk/browser/searchpos.ml +++ b/otherlibs/labltk/browser/searchpos.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/searchpos.mli b/otherlibs/labltk/browser/searchpos.mli index b2f89cd81..a2d5dfd95 100644 --- a/otherlibs/labltk/browser/searchpos.mli +++ b/otherlibs/labltk/browser/searchpos.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/setpath.ml b/otherlibs/labltk/browser/setpath.ml index 1a41b573b..018657610 100644 --- a/otherlibs/labltk/browser/setpath.ml +++ b/otherlibs/labltk/browser/setpath.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/setpath.mli b/otherlibs/labltk/browser/setpath.mli index 22bf5dc58..6191b70c6 100644 --- a/otherlibs/labltk/browser/setpath.mli +++ b/otherlibs/labltk/browser/setpath.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/shell.ml b/otherlibs/labltk/browser/shell.ml index 1f1492de9..93525f881 100644 --- a/otherlibs/labltk/browser/shell.ml +++ b/otherlibs/labltk/browser/shell.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/shell.mli b/otherlibs/labltk/browser/shell.mli index ac94f43d7..5bb1ff5a3 100644 --- a/otherlibs/labltk/browser/shell.mli +++ b/otherlibs/labltk/browser/shell.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/typecheck.ml b/otherlibs/labltk/browser/typecheck.ml index d5347ef53..bcfa42d0c 100644 --- a/otherlibs/labltk/browser/typecheck.ml +++ b/otherlibs/labltk/browser/typecheck.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/typecheck.mli b/otherlibs/labltk/browser/typecheck.mli index d61fce62e..08a16dd20 100644 --- a/otherlibs/labltk/browser/typecheck.mli +++ b/otherlibs/labltk/browser/typecheck.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/useunix.ml b/otherlibs/labltk/browser/useunix.ml index 666f866f0..86554d488 100644 --- a/otherlibs/labltk/browser/useunix.ml +++ b/otherlibs/labltk/browser/useunix.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/useunix.mli b/otherlibs/labltk/browser/useunix.mli index 2850c0d2d..47d7a26aa 100644 --- a/otherlibs/labltk/browser/useunix.mli +++ b/otherlibs/labltk/browser/useunix.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/viewer.ml b/otherlibs/labltk/browser/viewer.ml index fef3cbe10..6c0c9351f 100644 --- a/otherlibs/labltk/browser/viewer.ml +++ b/otherlibs/labltk/browser/viewer.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/viewer.mli b/otherlibs/labltk/browser/viewer.mli index d8bec671d..c56c5e415 100644 --- a/otherlibs/labltk/browser/viewer.mli +++ b/otherlibs/labltk/browser/viewer.mli @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/labltk/browser/winmain.c b/otherlibs/labltk/browser/winmain.c index dd9146fcc..4dd064416 100644 --- a/otherlibs/labltk/browser/winmain.c +++ b/otherlibs/labltk/browser/winmain.c @@ -1,3 +1,17 @@ +/*************************************************************************/ +/* */ +/* OCaml LablTk library */ +/* */ +/* Jacques Garrigue, Kyoto University RIMS */ +/* */ +/* Copyright 2001 Institut National de Recherche en Informatique et */ +/* en Automatique and Kyoto University. All rights reserved. */ +/* This file is distributed under the terms of the GNU Library */ +/* General Public License, with the special exception on linking */ +/* described in file ../../../LICENSE. */ +/* */ +/*************************************************************************/ + /* $Id$ */ #include diff --git a/otherlibs/labltk/builtin/LICENSE b/otherlibs/labltk/builtin/LICENSE index c006f51d5..dbad5f1c0 100644 --- a/otherlibs/labltk/builtin/LICENSE +++ b/otherlibs/labltk/builtin/LICENSE @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml LablTk library *) +(* OCaml LablTk library *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse *) (* projet Cristal, INRIA Rocquencourt *) @@ -16,4 +16,4 @@ (* $Id$ *) -All the files in this directory are subject to the above copyright notice. \ No newline at end of file +All the files in this directory are subject to the above copyright notice. diff --git a/otherlibs/labltk/camltk/Makefile b/otherlibs/labltk/camltk/Makefile index 19300ead4..62c22d3af 100644 --- a/otherlibs/labltk/camltk/Makefile +++ b/otherlibs/labltk/camltk/Makefile @@ -1,3 +1,19 @@ +####################################################################### +# # +# MLTk, Tcl/Tk interface of OCaml # +# # +# Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis # +# projet Cristal, INRIA Rocquencourt # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 2002 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file LICENSE found in the OCaml source tree. # +# # +####################################################################### + include ../support/Makefile.common COMPFLAGS= -I ../support -I $(OTHERS)/win32unix -I $(OTHERS)/unix diff --git a/otherlibs/labltk/camltk/Makefile.gen b/otherlibs/labltk/camltk/Makefile.gen index f25e1f761..9ec1972c0 100644 --- a/otherlibs/labltk/camltk/Makefile.gen +++ b/otherlibs/labltk/camltk/Makefile.gen @@ -1,3 +1,19 @@ +####################################################################### +# # +# MLTk, Tcl/Tk interface of OCaml # +# # +# Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis # +# projet Cristal, INRIA Rocquencourt # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 2002 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file LICENSE found in the OCaml source tree. # +# # +####################################################################### + include ../support/Makefile.common all: cTk.ml camltk.ml .depend diff --git a/otherlibs/labltk/compiler/Makefile b/otherlibs/labltk/compiler/Makefile index b7db380f6..f6e584546 100644 --- a/otherlibs/labltk/compiler/Makefile +++ b/otherlibs/labltk/compiler/Makefile @@ -1,3 +1,19 @@ +####################################################################### +# # +# MLTk, Tcl/Tk interface of OCaml # +# # +# Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis # +# projet Cristal, INRIA Rocquencourt # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 1999 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file LICENSE found in the OCaml source tree. # +# # +####################################################################### + include ../support/Makefile.common OBJS= ../support/support.cmo flags.cmo copyright.cmo \ diff --git a/otherlibs/labltk/compiler/code.mli b/otherlibs/labltk/compiler/code.mli index 6f3e29213..bde9c4455 100644 --- a/otherlibs/labltk/compiler/code.mli +++ b/otherlibs/labltk/compiler/code.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/compiler/compile.ml b/otherlibs/labltk/compiler/compile.ml index fd74bc173..2735deb87 100644 --- a/otherlibs/labltk/compiler/compile.ml +++ b/otherlibs/labltk/compiler/compile.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/compiler/copyright b/otherlibs/labltk/compiler/copyright index 23dff46dc..87ab0d30b 100644 --- a/otherlibs/labltk/compiler/copyright +++ b/otherlibs/labltk/compiler/copyright @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,6 +10,6 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/compiler/flags.ml b/otherlibs/labltk/compiler/flags.ml index 009d5e725..d832b4947 100644 --- a/otherlibs/labltk/compiler/flags.ml +++ b/otherlibs/labltk/compiler/flags.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/compiler/intf.ml b/otherlibs/labltk/compiler/intf.ml index 59608b381..42ad1b38d 100644 --- a/otherlibs/labltk/compiler/intf.ml +++ b/otherlibs/labltk/compiler/intf.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/compiler/lexer.mll b/otherlibs/labltk/compiler/lexer.mll index f51f0c01f..2fc2376e2 100644 --- a/otherlibs/labltk/compiler/lexer.mll +++ b/otherlibs/labltk/compiler/lexer.mll @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) diff --git a/otherlibs/labltk/compiler/maincompile.ml b/otherlibs/labltk/compiler/maincompile.ml index d8c72a312..91b6bcdff 100644 --- a/otherlibs/labltk/compiler/maincompile.ml +++ b/otherlibs/labltk/compiler/maincompile.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/compiler/parser.mly b/otherlibs/labltk/compiler/parser.mly index 15ced65f8..6dc7aff32 100644 --- a/otherlibs/labltk/compiler/parser.mly +++ b/otherlibs/labltk/compiler/parser.mly @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ +/* MLTk, Tcl/Tk interface of OCaml */ /* */ /* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ /* projet Cristal, INRIA Rocquencourt */ @@ -10,7 +10,7 @@ /* en Automatique and Kyoto University. All rights reserved. */ /* This file is distributed under the terms of the GNU Library */ /* General Public License, with the special exception on linking */ -/* described in file ../LICENSE. */ +/* described in file ../../../LICENSE. */ /* */ /***********************************************************************/ diff --git a/otherlibs/labltk/compiler/pp.ml b/otherlibs/labltk/compiler/pp.ml index 5c46766af..c6d4f7987 100644 --- a/otherlibs/labltk/compiler/pp.ml +++ b/otherlibs/labltk/compiler/pp.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/compiler/ppexec.ml b/otherlibs/labltk/compiler/ppexec.ml index 71118b960..dd66928c7 100644 --- a/otherlibs/labltk/compiler/ppexec.ml +++ b/otherlibs/labltk/compiler/ppexec.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/compiler/pplex.mli b/otherlibs/labltk/compiler/pplex.mli index 4eaa183b2..0502fc901 100644 --- a/otherlibs/labltk/compiler/pplex.mli +++ b/otherlibs/labltk/compiler/pplex.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/compiler/pplex.mll b/otherlibs/labltk/compiler/pplex.mll index 313d1f2dd..6559d8e94 100644 --- a/otherlibs/labltk/compiler/pplex.mll +++ b/otherlibs/labltk/compiler/pplex.mll @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file ../LICENSE. *) +(* described in file ../../../LICENSE. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/compiler/ppparse.ml b/otherlibs/labltk/compiler/ppparse.ml index 630d675de..2b0fdbf8c 100644 --- a/otherlibs/labltk/compiler/ppparse.ml +++ b/otherlibs/labltk/compiler/ppparse.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/compiler/ppyac.mly b/otherlibs/labltk/compiler/ppyac.mly index da7ee681f..f92ef9664 100644 --- a/otherlibs/labltk/compiler/ppyac.mly +++ b/otherlibs/labltk/compiler/ppyac.mly @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ +/* MLTk, Tcl/Tk interface of OCaml */ /* */ /* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ /* projet Cristal, INRIA Rocquencourt */ @@ -10,7 +10,7 @@ /* en Automatique and Kyoto University. All rights reserved. */ /* This file is distributed under the terms of the GNU Library */ /* General Public License, with the special exception on linking */ -/* described in file ../LICENSE. */ +/* described in file ../../../LICENSE. */ /* */ /***********************************************************************/ diff --git a/otherlibs/labltk/compiler/printer.ml b/otherlibs/labltk/compiler/printer.ml index be70612aa..fe33ada36 100644 --- a/otherlibs/labltk/compiler/printer.ml +++ b/otherlibs/labltk/compiler/printer.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/compiler/tables.ml b/otherlibs/labltk/compiler/tables.ml index 0663dfaad..a86b4af50 100644 --- a/otherlibs/labltk/compiler/tables.ml +++ b/otherlibs/labltk/compiler/tables.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/compiler/tsort.ml b/otherlibs/labltk/compiler/tsort.ml index 6496eaae2..6768d0d7f 100644 --- a/otherlibs/labltk/compiler/tsort.ml +++ b/otherlibs/labltk/compiler/tsort.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/examples_camltk/addition.ml b/otherlibs/labltk/examples_camltk/addition.ml index d4b333dcd..44988370c 100644 --- a/otherlibs/labltk/examples_camltk/addition.ml +++ b/otherlibs/labltk/examples_camltk/addition.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/examples_camltk/eyes.ml b/otherlibs/labltk/examples_camltk/eyes.ml index c93146231..ba88af343 100644 --- a/otherlibs/labltk/examples_camltk/eyes.ml +++ b/otherlibs/labltk/examples_camltk/eyes.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/examples_camltk/fileinput.ml b/otherlibs/labltk/examples_camltk/fileinput.ml index c6190bdd4..70bc675bf 100644 --- a/otherlibs/labltk/examples_camltk/fileinput.ml +++ b/otherlibs/labltk/examples_camltk/fileinput.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk ;; diff --git a/otherlibs/labltk/examples_camltk/fileopen.ml b/otherlibs/labltk/examples_camltk/fileopen.ml index 927c24851..d0829bd2b 100644 --- a/otherlibs/labltk/examples_camltk/fileopen.ml +++ b/otherlibs/labltk/examples_camltk/fileopen.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk;; diff --git a/otherlibs/labltk/examples_camltk/helloworld.ml b/otherlibs/labltk/examples_camltk/helloworld.ml index bb99d9dd5..9829fca84 100644 --- a/otherlibs/labltk/examples_camltk/helloworld.ml +++ b/otherlibs/labltk/examples_camltk/helloworld.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk;; (* Make interface functions available *) diff --git a/otherlibs/labltk/examples_camltk/jptest.ml b/otherlibs/labltk/examples_camltk/jptest.ml index 38d9694c3..9ec06acaa 100644 --- a/otherlibs/labltk/examples_camltk/jptest.ml +++ b/otherlibs/labltk/examples_camltk/jptest.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Tk diff --git a/otherlibs/labltk/examples_camltk/mytext.ml b/otherlibs/labltk/examples_camltk/mytext.ml index d4c0d00b0..f3aadfbbe 100644 --- a/otherlibs/labltk/examples_camltk/mytext.ml +++ b/otherlibs/labltk/examples_camltk/mytext.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/examples_camltk/socketinput.ml b/otherlibs/labltk/examples_camltk/socketinput.ml index 492fdc926..485c25864 100644 --- a/otherlibs/labltk/examples_camltk/socketinput.ml +++ b/otherlibs/labltk/examples_camltk/socketinput.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/examples_camltk/taddition.ml b/otherlibs/labltk/examples_camltk/taddition.ml index 990812d73..c18673030 100644 --- a/otherlibs/labltk/examples_camltk/taddition.ml +++ b/otherlibs/labltk/examples_camltk/taddition.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Tk diff --git a/otherlibs/labltk/examples_camltk/tetris.ml b/otherlibs/labltk/examples_camltk/tetris.ml index 835343475..14a9b648f 100644 --- a/otherlibs/labltk/examples_camltk/tetris.ml +++ b/otherlibs/labltk/examples_camltk/tetris.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/examples_camltk/text.ml b/otherlibs/labltk/examples_camltk/text.ml index 35273377b..0f876337f 100644 --- a/otherlibs/labltk/examples_camltk/text.ml +++ b/otherlibs/labltk/examples_camltk/text.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Tk diff --git a/otherlibs/labltk/examples_camltk/winskel.ml b/otherlibs/labltk/examples_camltk/winskel.ml index cf68178ae..c83e64368 100644 --- a/otherlibs/labltk/examples_camltk/winskel.ml +++ b/otherlibs/labltk/examples_camltk/winskel.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) (* This examples is based on Ousterhout's book (fig 16.15) *) diff --git a/otherlibs/labltk/examples_labltk/calc.ml b/otherlibs/labltk/examples_labltk/calc.ml index 088bf192f..17a410c8d 100644 --- a/otherlibs/labltk/examples_labltk/calc.ml +++ b/otherlibs/labltk/examples_labltk/calc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/examples_labltk/clock.ml b/otherlibs/labltk/examples_labltk/clock.ml index 57a59b825..6903acb21 100644 --- a/otherlibs/labltk/examples_labltk/clock.ml +++ b/otherlibs/labltk/examples_labltk/clock.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/examples_labltk/demo.ml b/otherlibs/labltk/examples_labltk/demo.ml index bd36f3f38..9524c1c7e 100644 --- a/otherlibs/labltk/examples_labltk/demo.ml +++ b/otherlibs/labltk/examples_labltk/demo.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/examples_labltk/eyes.ml b/otherlibs/labltk/examples_labltk/eyes.ml index 81f6aa4a2..a96e08260 100644 --- a/otherlibs/labltk/examples_labltk/eyes.ml +++ b/otherlibs/labltk/examples_labltk/eyes.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/examples_labltk/hello.ml b/otherlibs/labltk/examples_labltk/hello.ml index 3f39d546d..838b50ffc 100644 --- a/otherlibs/labltk/examples_labltk/hello.ml +++ b/otherlibs/labltk/examples_labltk/hello.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/examples_labltk/lang.ml b/otherlibs/labltk/examples_labltk/lang.ml index cde363991..0d6ba8c9c 100644 --- a/otherlibs/labltk/examples_labltk/lang.ml +++ b/otherlibs/labltk/examples_labltk/lang.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/examples_labltk/taquin.ml b/otherlibs/labltk/examples_labltk/taquin.ml index 280993518..616f38cb4 100644 --- a/otherlibs/labltk/examples_labltk/taquin.ml +++ b/otherlibs/labltk/examples_labltk/taquin.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/examples_labltk/tetris.ml b/otherlibs/labltk/examples_labltk/tetris.ml index 4f401e592..8260fc205 100644 --- a/otherlibs/labltk/examples_labltk/tetris.ml +++ b/otherlibs/labltk/examples_labltk/tetris.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/frx/Makefile b/otherlibs/labltk/frx/Makefile index 192034cf5..581200b07 100644 --- a/otherlibs/labltk/frx/Makefile +++ b/otherlibs/labltk/frx/Makefile @@ -1,3 +1,19 @@ +####################################################################### +# # +# MLTk, Tcl/Tk interface of OCaml # +# # +# Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis # +# projet Cristal, INRIA Rocquencourt # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 2002 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file LICENSE found in the OCaml source tree. # +# # +####################################################################### + include ../support/Makefile.common COMPFLAGS=-I ../camltk -I ../support diff --git a/otherlibs/labltk/frx/frx_after.ml b/otherlibs/labltk/frx/frx_after.ml index 7fe6a4f2a..1b7dfef8b 100644 --- a/otherlibs/labltk/frx/frx_after.ml +++ b/otherlibs/labltk/frx/frx_after.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Protocol diff --git a/otherlibs/labltk/frx/frx_after.mli b/otherlibs/labltk/frx/frx_after.mli index 73c07f7bb..45e30456c 100644 --- a/otherlibs/labltk/frx/frx_after.mli +++ b/otherlibs/labltk/frx/frx_after.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) val idle : (unit -> unit) -> unit diff --git a/otherlibs/labltk/frx/frx_color.ml b/otherlibs/labltk/frx/frx_color.ml index 140e13879..e3e616a98 100644 --- a/otherlibs/labltk/frx/frx_color.ml +++ b/otherlibs/labltk/frx/frx_color.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_color.mli b/otherlibs/labltk/frx/frx_color.mli index 513cb0839..b2791655a 100644 --- a/otherlibs/labltk/frx/frx_color.mli +++ b/otherlibs/labltk/frx/frx_color.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) val check : string -> bool diff --git a/otherlibs/labltk/frx/frx_ctext.ml b/otherlibs/labltk/frx/frx_ctext.ml index 7d3cbb15a..498fe8ec7 100644 --- a/otherlibs/labltk/frx/frx_ctext.ml +++ b/otherlibs/labltk/frx/frx_ctext.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) (* A trick by Steve Ball to do pixel scrolling on text widgets *) diff --git a/otherlibs/labltk/frx/frx_ctext.mli b/otherlibs/labltk/frx/frx_ctext.mli index e539f5a8b..2f696abea 100644 --- a/otherlibs/labltk/frx/frx_ctext.mli +++ b/otherlibs/labltk/frx/frx_ctext.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_dialog.ml b/otherlibs/labltk/frx/frx_dialog.ml index 12289de63..096812dbc 100644 --- a/otherlibs/labltk/frx/frx_dialog.ml +++ b/otherlibs/labltk/frx/frx_dialog.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_dialog.mli b/otherlibs/labltk/frx/frx_dialog.mli index cd256acb3..fd816d34c 100644 --- a/otherlibs/labltk/frx/frx_dialog.mli +++ b/otherlibs/labltk/frx/frx_dialog.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_entry.ml b/otherlibs/labltk/frx/frx_entry.ml index ec8422186..0b7c339a0 100644 --- a/otherlibs/labltk/frx/frx_entry.ml +++ b/otherlibs/labltk/frx/frx_entry.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_entry.mli b/otherlibs/labltk/frx/frx_entry.mli index 2f34a7e64..0b09f16d3 100644 --- a/otherlibs/labltk/frx/frx_entry.mli +++ b/otherlibs/labltk/frx/frx_entry.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_fileinput.ml b/otherlibs/labltk/frx/frx_fileinput.ml index de1368670..dfba7a0f8 100644 --- a/otherlibs/labltk/frx/frx_fileinput.ml +++ b/otherlibs/labltk/frx/frx_fileinput.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_fillbox.ml b/otherlibs/labltk/frx/frx_fillbox.ml index 611b55a5d..143bea4a2 100644 --- a/otherlibs/labltk/frx/frx_fillbox.ml +++ b/otherlibs/labltk/frx/frx_fillbox.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_fillbox.mli b/otherlibs/labltk/frx/frx_fillbox.mli index a825524cd..9cfc9e780 100644 --- a/otherlibs/labltk/frx/frx_fillbox.mli +++ b/otherlibs/labltk/frx/frx_fillbox.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_fit.ml b/otherlibs/labltk/frx/frx_fit.ml index c03d6997a..bcfd457a2 100644 --- a/otherlibs/labltk/frx/frx_fit.ml +++ b/otherlibs/labltk/frx/frx_fit.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_fit.mli b/otherlibs/labltk/frx/frx_fit.mli index 29479d801..e61496455 100644 --- a/otherlibs/labltk/frx/frx_fit.mli +++ b/otherlibs/labltk/frx/frx_fit.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_focus.ml b/otherlibs/labltk/frx/frx_focus.ml index ce855e201..29eba574d 100644 --- a/otherlibs/labltk/frx/frx_focus.ml +++ b/otherlibs/labltk/frx/frx_focus.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_focus.mli b/otherlibs/labltk/frx/frx_focus.mli index 919f70475..dcb9317f8 100644 --- a/otherlibs/labltk/frx/frx_focus.mli +++ b/otherlibs/labltk/frx/frx_focus.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_font.ml b/otherlibs/labltk/frx/frx_font.ml index 3b739a650..4acb59979 100644 --- a/otherlibs/labltk/frx/frx_font.ml +++ b/otherlibs/labltk/frx/frx_font.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_font.mli b/otherlibs/labltk/frx/frx_font.mli index 8dd999737..4ed235f4c 100644 --- a/otherlibs/labltk/frx/frx_font.mli +++ b/otherlibs/labltk/frx/frx_font.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) val find : string -> string -> string -> int -> string diff --git a/otherlibs/labltk/frx/frx_group.ml b/otherlibs/labltk/frx/frx_group.ml index 17c8a0310..1adc2d880 100644 --- a/otherlibs/labltk/frx/frx_group.ml +++ b/otherlibs/labltk/frx/frx_group.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_lbutton.ml b/otherlibs/labltk/frx/frx_lbutton.ml index c4d51f7b5..82ea8a8cc 100644 --- a/otherlibs/labltk/frx/frx_lbutton.ml +++ b/otherlibs/labltk/frx/frx_lbutton.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_lbutton.mli b/otherlibs/labltk/frx/frx_lbutton.mli index 60c26a5b5..5522e5c24 100644 --- a/otherlibs/labltk/frx/frx_lbutton.mli +++ b/otherlibs/labltk/frx/frx_lbutton.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Widget diff --git a/otherlibs/labltk/frx/frx_listbox.ml b/otherlibs/labltk/frx/frx_listbox.ml index 17d6a3f9a..6d04262b6 100644 --- a/otherlibs/labltk/frx/frx_listbox.ml +++ b/otherlibs/labltk/frx/frx_listbox.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_listbox.mli b/otherlibs/labltk/frx/frx_listbox.mli index b44b6ee9d..54e7ec6a7 100644 --- a/otherlibs/labltk/frx/frx_listbox.mli +++ b/otherlibs/labltk/frx/frx_listbox.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_mem.ml b/otherlibs/labltk/frx/frx_mem.ml index 37af20830..6df0da75f 100644 --- a/otherlibs/labltk/frx/frx_mem.ml +++ b/otherlibs/labltk/frx/frx_mem.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) (* Memory gauge *) diff --git a/otherlibs/labltk/frx/frx_mem.mli b/otherlibs/labltk/frx/frx_mem.mli index f3069ec28..4f17fa79d 100644 --- a/otherlibs/labltk/frx/frx_mem.mli +++ b/otherlibs/labltk/frx/frx_mem.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) (* A Garbage Collector Gauge for Caml *) diff --git a/otherlibs/labltk/frx/frx_misc.ml b/otherlibs/labltk/frx/frx_misc.ml index 75c8a3e4d..e45c5f0f0 100644 --- a/otherlibs/labltk/frx/frx_misc.ml +++ b/otherlibs/labltk/frx/frx_misc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) (* Delayed global, a.k.a cache&carry *) diff --git a/otherlibs/labltk/frx/frx_misc.mli b/otherlibs/labltk/frx/frx_misc.mli index 2df8ce3d2..cd3d589fa 100644 --- a/otherlibs/labltk/frx/frx_misc.mli +++ b/otherlibs/labltk/frx/frx_misc.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_req.ml b/otherlibs/labltk/frx/frx_req.ml index ab7308fa3..41590c145 100644 --- a/otherlibs/labltk/frx/frx_req.ml +++ b/otherlibs/labltk/frx/frx_req.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_req.mli b/otherlibs/labltk/frx/frx_req.mli index 41de7df35..62985b9f9 100644 --- a/otherlibs/labltk/frx/frx_req.mli +++ b/otherlibs/labltk/frx/frx_req.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) (* Various dialog boxes *) diff --git a/otherlibs/labltk/frx/frx_rpc.ml b/otherlibs/labltk/frx/frx_rpc.ml index 5f29cbce5..5de7a15de 100644 --- a/otherlibs/labltk/frx/frx_rpc.ml +++ b/otherlibs/labltk/frx/frx_rpc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) (* Some notion of RPC *) diff --git a/otherlibs/labltk/frx/frx_rpc.mli b/otherlibs/labltk/frx/frx_rpc.mli index 808fe87c7..20811738a 100644 --- a/otherlibs/labltk/frx/frx_rpc.mli +++ b/otherlibs/labltk/frx/frx_rpc.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) (* Some notion of RPC *) diff --git a/otherlibs/labltk/frx/frx_selection.ml b/otherlibs/labltk/frx/frx_selection.ml index 7ef64ce86..ad037ce2d 100644 --- a/otherlibs/labltk/frx/frx_selection.ml +++ b/otherlibs/labltk/frx/frx_selection.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) (* A selection handler *) diff --git a/otherlibs/labltk/frx/frx_selection.mli b/otherlibs/labltk/frx/frx_selection.mli index dfb27ee24..b15265834 100644 --- a/otherlibs/labltk/frx/frx_selection.mli +++ b/otherlibs/labltk/frx/frx_selection.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) val set : string -> unit diff --git a/otherlibs/labltk/frx/frx_synth.ml b/otherlibs/labltk/frx/frx_synth.ml index 76b83b640..21bd7fa86 100644 --- a/otherlibs/labltk/frx/frx_synth.ml +++ b/otherlibs/labltk/frx/frx_synth.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) (* Some notion of synthetic events *) diff --git a/otherlibs/labltk/frx/frx_synth.mli b/otherlibs/labltk/frx/frx_synth.mli index 0b8d85d85..e5a96aa85 100644 --- a/otherlibs/labltk/frx/frx_synth.mli +++ b/otherlibs/labltk/frx/frx_synth.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) (* Synthetic events *) diff --git a/otherlibs/labltk/frx/frx_text.ml b/otherlibs/labltk/frx/frx_text.ml index 18d9961ff..a9ca17a37 100644 --- a/otherlibs/labltk/frx/frx_text.ml +++ b/otherlibs/labltk/frx/frx_text.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_text.mli b/otherlibs/labltk/frx/frx_text.mli index ac0384432..97783fa96 100644 --- a/otherlibs/labltk/frx/frx_text.mli +++ b/otherlibs/labltk/frx/frx_text.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_toplevel.mli b/otherlibs/labltk/frx/frx_toplevel.mli index 3608e1e57..628cde207 100644 --- a/otherlibs/labltk/frx/frx_toplevel.mli +++ b/otherlibs/labltk/frx/frx_toplevel.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Widget diff --git a/otherlibs/labltk/frx/frx_widget.ml b/otherlibs/labltk/frx/frx_widget.ml index a81c768f0..904513436 100644 --- a/otherlibs/labltk/frx/frx_widget.ml +++ b/otherlibs/labltk/frx/frx_widget.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/frx/frx_widget.mli b/otherlibs/labltk/frx/frx_widget.mli index ff26749ca..f856664cf 100644 --- a/otherlibs/labltk/frx/frx_widget.mli +++ b/otherlibs/labltk/frx/frx_widget.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Camltk diff --git a/otherlibs/labltk/jpf/Makefile b/otherlibs/labltk/jpf/Makefile index a79b3d568..a768b1390 100644 --- a/otherlibs/labltk/jpf/Makefile +++ b/otherlibs/labltk/jpf/Makefile @@ -1,3 +1,19 @@ +####################################################################### +# # +# MLTk, Tcl/Tk interface of OCaml # +# # +# Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis # +# projet Cristal, INRIA Rocquencourt # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 1999 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file LICENSE found in the OCaml source tree. # +# # +####################################################################### + include ../support/Makefile.common COMPFLAGS=-I ../labltk -I ../support -I $(OTHERS)/win32unix -I $(OTHERS)/unix -I $(OTHERS)/str diff --git a/otherlibs/labltk/jpf/balloon.ml b/otherlibs/labltk/jpf/balloon.ml index 739a8d9ec..e880f2777 100644 --- a/otherlibs/labltk/jpf/balloon.ml +++ b/otherlibs/labltk/jpf/balloon.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/jpf/balloon.mli b/otherlibs/labltk/jpf/balloon.mli index 633796ce6..f3e65269d 100644 --- a/otherlibs/labltk/jpf/balloon.mli +++ b/otherlibs/labltk/jpf/balloon.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/jpf/balloontest.ml b/otherlibs/labltk/jpf/balloontest.ml index 60e3aded3..236f6174b 100644 --- a/otherlibs/labltk/jpf/balloontest.ml +++ b/otherlibs/labltk/jpf/balloontest.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/jpf/fileselect.ml b/otherlibs/labltk/jpf/fileselect.ml index 3d42ac2dc..23aaeb6d2 100644 --- a/otherlibs/labltk/jpf/fileselect.ml +++ b/otherlibs/labltk/jpf/fileselect.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/jpf/fileselect.mli b/otherlibs/labltk/jpf/fileselect.mli index 4412a4187..42f7d34fa 100644 --- a/otherlibs/labltk/jpf/fileselect.mli +++ b/otherlibs/labltk/jpf/fileselect.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/jpf/jpf_font.ml b/otherlibs/labltk/jpf/jpf_font.ml index 24b87b7c0..b036d421a 100644 --- a/otherlibs/labltk/jpf/jpf_font.ml +++ b/otherlibs/labltk/jpf/jpf_font.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) (* find font information *) diff --git a/otherlibs/labltk/jpf/jpf_font.mli b/otherlibs/labltk/jpf/jpf_font.mli index 03f705f52..f3045a9c8 100644 --- a/otherlibs/labltk/jpf/jpf_font.mli +++ b/otherlibs/labltk/jpf/jpf_font.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) val debug : bool ref diff --git a/otherlibs/labltk/jpf/shell.ml b/otherlibs/labltk/jpf/shell.ml index 8b00a8f2c..0d566e050 100644 --- a/otherlibs/labltk/jpf/shell.ml +++ b/otherlibs/labltk/jpf/shell.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) open Unix diff --git a/otherlibs/labltk/jpf/shell.mli b/otherlibs/labltk/jpf/shell.mli index c3fec3a2e..7c7dd8e1a 100644 --- a/otherlibs/labltk/jpf/shell.mli +++ b/otherlibs/labltk/jpf/shell.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) val subshell : string -> string list diff --git a/otherlibs/labltk/labltk/Makefile b/otherlibs/labltk/labltk/Makefile index f678954e0..1510de8f8 100644 --- a/otherlibs/labltk/labltk/Makefile +++ b/otherlibs/labltk/labltk/Makefile @@ -1,3 +1,19 @@ +####################################################################### +# # +# MLTk, Tcl/Tk interface of OCaml # +# # +# Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis # +# projet Cristal, INRIA Rocquencourt # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 2002 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file LICENSE found in the OCaml source tree. # +# # +####################################################################### + include ../support/Makefile.common COMPFLAGS= -I ../support -I $(OTHERS)/win32unix -I $(OTHERS)/unix diff --git a/otherlibs/labltk/labltk/Makefile.gen b/otherlibs/labltk/labltk/Makefile.gen index 592ea4462..2e1fc274e 100644 --- a/otherlibs/labltk/labltk/Makefile.gen +++ b/otherlibs/labltk/labltk/Makefile.gen @@ -1,3 +1,19 @@ +####################################################################### +# # +# MLTk, Tcl/Tk interface of OCaml # +# # +# Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis # +# projet Cristal, INRIA Rocquencourt # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 2002 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file LICENSE found in the OCaml source tree. # +# # +####################################################################### + include ../support/Makefile.common all: tk.ml labltk.ml .depend diff --git a/otherlibs/labltk/lib/Makefile b/otherlibs/labltk/lib/Makefile index b82bcddfa..6be9af056 100644 --- a/otherlibs/labltk/lib/Makefile +++ b/otherlibs/labltk/lib/Makefile @@ -1,3 +1,19 @@ +####################################################################### +# # +# MLTk, Tcl/Tk interface of OCaml # +# # +# Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis # +# projet Cristal, INRIA Rocquencourt # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 1999 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file LICENSE found in the OCaml source tree. # +# # +####################################################################### + include ../support/Makefile.common all: $(LIBNAME).cma $(LIBNAME)top$(EXE) $(LIBNAME) diff --git a/otherlibs/labltk/support/Makefile b/otherlibs/labltk/support/Makefile index dd037a2b4..382f12c66 100644 --- a/otherlibs/labltk/support/Makefile +++ b/otherlibs/labltk/support/Makefile @@ -1,3 +1,19 @@ +####################################################################### +# # +# MLTk, Tcl/Tk interface of OCaml # +# # +# Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis # +# projet Cristal, INRIA Rocquencourt # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 1999 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file LICENSE found in the OCaml source tree. # +# # +####################################################################### + include Makefile.common all: support.cmo rawwidget.cmo widget.cmo protocol.cmo \ diff --git a/otherlibs/labltk/support/Makefile.common b/otherlibs/labltk/support/Makefile.common index 56f6fd137..f0aa930d3 100644 --- a/otherlibs/labltk/support/Makefile.common +++ b/otherlibs/labltk/support/Makefile.common @@ -1,5 +1,21 @@ +####################################################################### +# # +# MLTk, Tcl/Tk interface of OCaml # +# # +# Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis # +# projet Cristal, INRIA Rocquencourt # +# Jacques Garrigue, Kyoto University RIMS # +# # +# Copyright 1999 Institut National de Recherche en Informatique et # +# en Automatique and Kyoto University. All rights reserved. # +# This file is distributed under the terms of the GNU Library # +# General Public License, with the special exception on linking # +# described in file LICENSE found in the OCaml source tree. # +# # +####################################################################### + ## Paths are relative to subdirectories -## Where you compiled Objective Caml +## Where you compiled OCaml TOPDIR=../../.. ## Path to the otherlibs subdirectory OTHERS=$(TOPDIR)/otherlibs @@ -10,7 +26,7 @@ include $(TOPDIR)/config/Makefile INSTALLDIR=$(LIBDIR)/$(LIBNAME) -## Tools from the Objective Caml distribution +## Tools from the OCaml distribution CAMLRUN=$(TOPDIR)/boot/ocamlrun CAMLC=$(TOPDIR)/ocamlcomp.sh diff --git a/otherlibs/labltk/support/camltk.h b/otherlibs/labltk/support/camltk.h index 5be206faa..54671a075 100644 --- a/otherlibs/labltk/support/camltk.h +++ b/otherlibs/labltk/support/camltk.h @@ -1,6 +1,6 @@ /*************************************************************************/ /* */ -/* Objective Caml LablTk library */ +/* OCaml LablTk library */ /* */ /* Francois Rouaix, Francois Pessaux and Jun Furuse */ /* projet Cristal, INRIA Rocquencourt */ diff --git a/otherlibs/labltk/support/camltkwrap.ml b/otherlibs/labltk/support/camltkwrap.ml index 5b49b19f0..635349a31 100644 --- a/otherlibs/labltk/support/camltkwrap.ml +++ b/otherlibs/labltk/support/camltkwrap.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) module Widget = struct diff --git a/otherlibs/labltk/support/camltkwrap.mli b/otherlibs/labltk/support/camltkwrap.mli index 1af566d2c..4fc7e3c15 100644 --- a/otherlibs/labltk/support/camltkwrap.mli +++ b/otherlibs/labltk/support/camltkwrap.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) module Widget : sig diff --git a/otherlibs/labltk/support/cltkCaml.c b/otherlibs/labltk/support/cltkCaml.c index c9bcc80dc..f0372f14b 100644 --- a/otherlibs/labltk/support/cltkCaml.c +++ b/otherlibs/labltk/support/cltkCaml.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ +/* MLTk, Tcl/Tk interface of OCaml */ /* */ /* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ /* projet Cristal, INRIA Rocquencourt */ @@ -10,7 +10,7 @@ /* en Automatique and Kyoto University. All rights reserved. */ /* This file is distributed under the terms of the GNU Library */ /* General Public License, with the special exception on linking */ -/* described in file LICENSE found in the Objective Caml source tree. */ +/* described in file LICENSE found in the OCaml source tree. */ /* */ /***********************************************************************/ diff --git a/otherlibs/labltk/support/cltkDMain.c b/otherlibs/labltk/support/cltkDMain.c index 3d9a4c2df..7edb92a98 100644 --- a/otherlibs/labltk/support/cltkDMain.c +++ b/otherlibs/labltk/support/cltkDMain.c @@ -1,6 +1,6 @@ /*************************************************************************/ /* */ -/* Objective Caml LablTk library */ +/* OCaml LablTk library */ /* */ /* Francois Rouaix, Francois Pessaux and Jun Furuse */ /* projet Cristal, INRIA Rocquencourt */ diff --git a/otherlibs/labltk/support/cltkEval.c b/otherlibs/labltk/support/cltkEval.c index cdd16a914..282d2f44c 100644 --- a/otherlibs/labltk/support/cltkEval.c +++ b/otherlibs/labltk/support/cltkEval.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ +/* MLTk, Tcl/Tk interface of OCaml */ /* */ /* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ /* projet Cristal, INRIA Rocquencourt */ @@ -10,7 +10,7 @@ /* en Automatique and Kyoto University. All rights reserved. */ /* This file is distributed under the terms of the GNU Library */ /* General Public License, with the special exception on linking */ -/* described in file LICENSE found in the Objective Caml source tree. */ +/* described in file LICENSE found in the OCaml source tree. */ /* */ /***********************************************************************/ diff --git a/otherlibs/labltk/support/cltkEvent.c b/otherlibs/labltk/support/cltkEvent.c index ad9b4d9ed..4507cf694 100644 --- a/otherlibs/labltk/support/cltkEvent.c +++ b/otherlibs/labltk/support/cltkEvent.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ +/* MLTk, Tcl/Tk interface of OCaml */ /* */ /* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ /* projet Cristal, INRIA Rocquencourt */ @@ -10,7 +10,7 @@ /* en Automatique and Kyoto University. All rights reserved. */ /* This file is distributed under the terms of the GNU Library */ /* General Public License, with the special exception on linking */ -/* described in file LICENSE found in the Objective Caml source tree. */ +/* described in file LICENSE found in the OCaml source tree. */ /* */ /***********************************************************************/ diff --git a/otherlibs/labltk/support/cltkFile.c b/otherlibs/labltk/support/cltkFile.c index 4fbf9868e..b4ebca614 100644 --- a/otherlibs/labltk/support/cltkFile.c +++ b/otherlibs/labltk/support/cltkFile.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ +/* MLTk, Tcl/Tk interface of OCaml */ /* */ /* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ /* projet Cristal, INRIA Rocquencourt */ @@ -10,7 +10,7 @@ /* en Automatique and Kyoto University. All rights reserved. */ /* This file is distributed under the terms of the GNU Library */ /* General Public License, with the special exception on linking */ -/* described in file LICENSE found in the Objective Caml source tree. */ +/* described in file LICENSE found in the OCaml source tree. */ /* */ /***********************************************************************/ diff --git a/otherlibs/labltk/support/cltkImg.c b/otherlibs/labltk/support/cltkImg.c index d8d5dd3d0..7f47760df 100644 --- a/otherlibs/labltk/support/cltkImg.c +++ b/otherlibs/labltk/support/cltkImg.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ +/* MLTk, Tcl/Tk interface of OCaml */ /* */ /* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ /* projet Cristal, INRIA Rocquencourt */ @@ -10,7 +10,7 @@ /* en Automatique and Kyoto University. All rights reserved. */ /* This file is distributed under the terms of the GNU Library */ /* General Public License, with the special exception on linking */ -/* described in file LICENSE found in the Objective Caml source tree. */ +/* described in file LICENSE found in the OCaml source tree. */ /* */ /***********************************************************************/ #include diff --git a/otherlibs/labltk/support/cltkMain.c b/otherlibs/labltk/support/cltkMain.c index eb4617a45..5886e2cc3 100644 --- a/otherlibs/labltk/support/cltkMain.c +++ b/otherlibs/labltk/support/cltkMain.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ +/* MLTk, Tcl/Tk interface of OCaml */ /* */ /* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ /* projet Cristal, INRIA Rocquencourt */ @@ -10,7 +10,7 @@ /* en Automatique and Kyoto University. All rights reserved. */ /* This file is distributed under the terms of the GNU Library */ /* General Public License, with the special exception on linking */ -/* described in file LICENSE found in the Objective Caml source tree. */ +/* described in file LICENSE found in the OCaml source tree. */ /* */ /***********************************************************************/ diff --git a/otherlibs/labltk/support/cltkMisc.c b/otherlibs/labltk/support/cltkMisc.c index b19713cda..e5360aa20 100644 --- a/otherlibs/labltk/support/cltkMisc.c +++ b/otherlibs/labltk/support/cltkMisc.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ +/* MLTk, Tcl/Tk interface of OCaml */ /* */ /* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ /* projet Cristal, INRIA Rocquencourt */ @@ -10,7 +10,7 @@ /* en Automatique and Kyoto University. All rights reserved. */ /* This file is distributed under the terms of the GNU Library */ /* General Public License, with the special exception on linking */ -/* described in file LICENSE found in the Objective Caml source tree. */ +/* described in file LICENSE found in the OCaml source tree. */ /* */ /***********************************************************************/ diff --git a/otherlibs/labltk/support/cltkTimer.c b/otherlibs/labltk/support/cltkTimer.c index e0635e850..380dde3ed 100644 --- a/otherlibs/labltk/support/cltkTimer.c +++ b/otherlibs/labltk/support/cltkTimer.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ +/* MLTk, Tcl/Tk interface of OCaml */ /* */ /* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ /* projet Cristal, INRIA Rocquencourt */ @@ -10,7 +10,7 @@ /* en Automatique and Kyoto University. All rights reserved. */ /* This file is distributed under the terms of the GNU Library */ /* General Public License, with the special exception on linking */ -/* described in file LICENSE found in the Objective Caml source tree. */ +/* described in file LICENSE found in the OCaml source tree. */ /* */ /***********************************************************************/ diff --git a/otherlibs/labltk/support/cltkUtf.c b/otherlibs/labltk/support/cltkUtf.c index fd01bd15a..448e06a1c 100644 --- a/otherlibs/labltk/support/cltkUtf.c +++ b/otherlibs/labltk/support/cltkUtf.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ +/* MLTk, Tcl/Tk interface of OCaml */ /* */ /* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ /* projet Cristal, INRIA Rocquencourt */ @@ -10,7 +10,7 @@ /* en Automatique and Kyoto University. All rights reserved. */ /* This file is distributed under the terms of the GNU Library */ /* General Public License, with the special exception on linking */ -/* described in file LICENSE found in the Objective Caml source tree. */ +/* described in file LICENSE found in the OCaml source tree. */ /* */ /***********************************************************************/ diff --git a/otherlibs/labltk/support/cltkVar.c b/otherlibs/labltk/support/cltkVar.c index 0411a94cd..96af9d21d 100644 --- a/otherlibs/labltk/support/cltkVar.c +++ b/otherlibs/labltk/support/cltkVar.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ +/* MLTk, Tcl/Tk interface of OCaml */ /* */ /* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ /* projet Cristal, INRIA Rocquencourt */ @@ -10,7 +10,7 @@ /* en Automatique and Kyoto University. All rights reserved. */ /* This file is distributed under the terms of the GNU Library */ /* General Public License, with the special exception on linking */ -/* described in file LICENSE found in the Objective Caml source tree. */ +/* described in file LICENSE found in the OCaml source tree. */ /* */ /***********************************************************************/ diff --git a/otherlibs/labltk/support/cltkWait.c b/otherlibs/labltk/support/cltkWait.c index 4c126b5d2..a46860b85 100644 --- a/otherlibs/labltk/support/cltkWait.c +++ b/otherlibs/labltk/support/cltkWait.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* MLTk, Tcl/Tk interface of Objective Caml */ +/* MLTk, Tcl/Tk interface of OCaml */ /* */ /* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis */ /* projet Cristal, INRIA Rocquencourt */ @@ -10,7 +10,7 @@ /* en Automatique and Kyoto University. All rights reserved. */ /* This file is distributed under the terms of the GNU Library */ /* General Public License, with the special exception on linking */ -/* described in file LICENSE found in the Objective Caml source tree. */ +/* described in file LICENSE found in the OCaml source tree. */ /* */ /***********************************************************************/ diff --git a/otherlibs/labltk/support/fileevent.ml b/otherlibs/labltk/support/fileevent.ml index 846a7519b..ae1cc261a 100644 --- a/otherlibs/labltk/support/fileevent.ml +++ b/otherlibs/labltk/support/fileevent.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/fileevent.mli b/otherlibs/labltk/support/fileevent.mli index 34760f0c7..f5468ca59 100644 --- a/otherlibs/labltk/support/fileevent.mli +++ b/otherlibs/labltk/support/fileevent.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/protocol.ml b/otherlibs/labltk/support/protocol.ml index 26b97c0bd..28cb4737d 100644 --- a/otherlibs/labltk/support/protocol.ml +++ b/otherlibs/labltk/support/protocol.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/protocol.mli b/otherlibs/labltk/support/protocol.mli index 9b5ae3936..1ce6718a8 100644 --- a/otherlibs/labltk/support/protocol.mli +++ b/otherlibs/labltk/support/protocol.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/rawwidget.ml b/otherlibs/labltk/support/rawwidget.ml index 99b1dce1a..f216df726 100644 --- a/otherlibs/labltk/support/rawwidget.ml +++ b/otherlibs/labltk/support/rawwidget.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/rawwidget.mli b/otherlibs/labltk/support/rawwidget.mli index 4eda7311c..e9f82ef2c 100644 --- a/otherlibs/labltk/support/rawwidget.mli +++ b/otherlibs/labltk/support/rawwidget.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/slave.ml b/otherlibs/labltk/support/slave.ml index 51eae853b..44349c05c 100644 --- a/otherlibs/labltk/support/slave.ml +++ b/otherlibs/labltk/support/slave.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/support.ml b/otherlibs/labltk/support/support.ml index fa650e8a9..7d019967c 100644 --- a/otherlibs/labltk/support/support.ml +++ b/otherlibs/labltk/support/support.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/support.mli b/otherlibs/labltk/support/support.mli index 95a2255cb..fe30208ac 100644 --- a/otherlibs/labltk/support/support.mli +++ b/otherlibs/labltk/support/support.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/textvariable.ml b/otherlibs/labltk/support/textvariable.ml index ad9033d45..4e17a008a 100644 --- a/otherlibs/labltk/support/textvariable.ml +++ b/otherlibs/labltk/support/textvariable.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/textvariable.mli b/otherlibs/labltk/support/textvariable.mli index dfa511a29..f18f6cc86 100644 --- a/otherlibs/labltk/support/textvariable.mli +++ b/otherlibs/labltk/support/textvariable.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/timer.ml b/otherlibs/labltk/support/timer.ml index a6ef8c299..d5bd176aa 100644 --- a/otherlibs/labltk/support/timer.ml +++ b/otherlibs/labltk/support/timer.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/timer.mli b/otherlibs/labltk/support/timer.mli index a45e1c9d2..4b31668c9 100644 --- a/otherlibs/labltk/support/timer.mli +++ b/otherlibs/labltk/support/timer.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/tkthread.ml b/otherlibs/labltk/support/tkthread.ml index ecdf61460..4ae36685c 100644 --- a/otherlibs/labltk/support/tkthread.ml +++ b/otherlibs/labltk/support/tkthread.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* LablTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Jacques Garrigue, Nagoya University Mathematics Dept. *) (* *) @@ -8,7 +8,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/tkthread.mli b/otherlibs/labltk/support/tkthread.mli index 4f20e6140..2bc104da2 100644 --- a/otherlibs/labltk/support/tkthread.mli +++ b/otherlibs/labltk/support/tkthread.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* LablTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Jacques Garrigue, Nagoya University Mathematics Dept. *) (* *) @@ -8,7 +8,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/tkwait.ml b/otherlibs/labltk/support/tkwait.ml index 97a0b0eb8..34f6908de 100644 --- a/otherlibs/labltk/support/tkwait.ml +++ b/otherlibs/labltk/support/tkwait.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/widget.ml b/otherlibs/labltk/support/widget.ml index 65e0d26a9..083e4b96c 100644 --- a/otherlibs/labltk/support/widget.ml +++ b/otherlibs/labltk/support/widget.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/labltk/support/widget.mli b/otherlibs/labltk/support/widget.mli index f9c832783..7761f2f2c 100644 --- a/otherlibs/labltk/support/widget.mli +++ b/otherlibs/labltk/support/widget.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* MLTk, Tcl/Tk interface of Objective Caml *) +(* MLTk, Tcl/Tk interface of OCaml *) (* *) (* Francois Rouaix, Francois Pessaux, Jun Furuse and Pierre Weis *) (* projet Cristal, INRIA Rocquencourt *) @@ -10,7 +10,7 @@ (* en Automatique and Kyoto University. All rights reserved. *) (* This file is distributed under the terms of the GNU Library *) (* General Public License, with the special exception on linking *) -(* described in file LICENSE found in the Objective Caml source tree. *) +(* described in file LICENSE found in the OCaml source tree. *) (* *) (***********************************************************************) diff --git a/otherlibs/num/Makefile b/otherlibs/num/Makefile index 0a4349e80..756aec2b4 100644 --- a/otherlibs/num/Makefile +++ b/otherlibs/num/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/num/Makefile.nt b/otherlibs/num/Makefile.nt index 16103b2b0..9d831657a 100644 --- a/otherlibs/num/Makefile.nt +++ b/otherlibs/num/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/num/arith_flags.ml b/otherlibs/num/arith_flags.ml index 00e2813e6..048d4f8db 100644 --- a/otherlibs/num/arith_flags.ml +++ b/otherlibs/num/arith_flags.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/num/arith_flags.mli b/otherlibs/num/arith_flags.mli index 36160edb2..653942431 100644 --- a/otherlibs/num/arith_flags.mli +++ b/otherlibs/num/arith_flags.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/num/arith_status.ml b/otherlibs/num/arith_status.ml index 8b6fa9f72..0f9deb363 100644 --- a/otherlibs/num/arith_status.ml +++ b/otherlibs/num/arith_status.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/num/arith_status.mli b/otherlibs/num/arith_status.mli index 121b4d575..170e8cd4c 100644 --- a/otherlibs/num/arith_status.mli +++ b/otherlibs/num/arith_status.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/num/big_int.ml b/otherlibs/num/big_int.ml index b96b8e1f4..34de4b127 100644 --- a/otherlibs/num/big_int.ml +++ b/otherlibs/num/big_int.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/num/big_int.mli b/otherlibs/num/big_int.mli index 2ac7b7eb6..46621f941 100644 --- a/otherlibs/num/big_int.mli +++ b/otherlibs/num/big_int.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/num/bng.c b/otherlibs/num/bng.c index 745024700..5bbedb0b4 100644 --- a/otherlibs/num/bng.c +++ b/otherlibs/num/bng.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/num/bng.h b/otherlibs/num/bng.h index 6d12c87cb..19f2e2b9c 100644 --- a/otherlibs/num/bng.h +++ b/otherlibs/num/bng.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/num/bng_alpha.c b/otherlibs/num/bng_alpha.c index 5bf964b58..b888df4c0 100644 --- a/otherlibs/num/bng_alpha.c +++ b/otherlibs/num/bng_alpha.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/num/bng_amd64.c b/otherlibs/num/bng_amd64.c index e829eef23..ecf9f2535 100644 --- a/otherlibs/num/bng_amd64.c +++ b/otherlibs/num/bng_amd64.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/num/bng_digit.c b/otherlibs/num/bng_digit.c index 168b44ad3..e429197c2 100644 --- a/otherlibs/num/bng_digit.c +++ b/otherlibs/num/bng_digit.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/num/bng_ia32.c b/otherlibs/num/bng_ia32.c index bbca8e9dc..b4981cd48 100644 --- a/otherlibs/num/bng_ia32.c +++ b/otherlibs/num/bng_ia32.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/num/bng_mips.c b/otherlibs/num/bng_mips.c index f246843cb..92ec2c03e 100644 --- a/otherlibs/num/bng_mips.c +++ b/otherlibs/num/bng_mips.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/num/bng_ppc.c b/otherlibs/num/bng_ppc.c index 32d573cd0..6bbf108e9 100644 --- a/otherlibs/num/bng_ppc.c +++ b/otherlibs/num/bng_ppc.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ @@ -91,4 +91,4 @@ "mulhwu %1, %2, %3" \ : "=&r" (resl), "=r" (resh) \ : "r" (arg1), "r" (arg2)) -#endif \ No newline at end of file +#endif diff --git a/otherlibs/num/bng_sparc.c b/otherlibs/num/bng_sparc.c index 934c0b2f7..4e46a316a 100644 --- a/otherlibs/num/bng_sparc.c +++ b/otherlibs/num/bng_sparc.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/num/int_misc.ml b/otherlibs/num/int_misc.ml index b7eb4c67d..99713b916 100644 --- a/otherlibs/num/int_misc.ml +++ b/otherlibs/num/int_misc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/num/int_misc.mli b/otherlibs/num/int_misc.mli index 28bb335b8..7f465c5ad 100644 --- a/otherlibs/num/int_misc.mli +++ b/otherlibs/num/int_misc.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/num/nat.h b/otherlibs/num/nat.h index 7f67b916a..62c7ac988 100644 --- a/otherlibs/num/nat.h +++ b/otherlibs/num/nat.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/num/nat.ml b/otherlibs/num/nat.ml index cda80d5d4..44742a213 100644 --- a/otherlibs/num/nat.ml +++ b/otherlibs/num/nat.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/num/nat.mli b/otherlibs/num/nat.mli index 3b32ac8dc..39f1c5908 100644 --- a/otherlibs/num/nat.mli +++ b/otherlibs/num/nat.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/num/nat_stubs.c b/otherlibs/num/nat_stubs.c index d56ee2ddb..521585165 100644 --- a/otherlibs/num/nat_stubs.c +++ b/otherlibs/num/nat_stubs.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/num/num.ml b/otherlibs/num/num.ml index 52fe8cc0e..4ede5ee49 100644 --- a/otherlibs/num/num.ml +++ b/otherlibs/num/num.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/num/num.mli b/otherlibs/num/num.mli index 8bf3d4e6e..1d421ff29 100644 --- a/otherlibs/num/num.mli +++ b/otherlibs/num/num.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/num/ratio.ml b/otherlibs/num/ratio.ml index 7885df15d..fe0170f29 100644 --- a/otherlibs/num/ratio.ml +++ b/otherlibs/num/ratio.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/num/ratio.mli b/otherlibs/num/ratio.mli index 12621f08a..60c0f66db 100644 --- a/otherlibs/num/ratio.mli +++ b/otherlibs/num/ratio.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Valerie Menissier-Morain, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/str/Makefile b/otherlibs/str/Makefile index b6c16a076..e36000e4a 100644 --- a/otherlibs/str/Makefile +++ b/otherlibs/str/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/str/Makefile.nt b/otherlibs/str/Makefile.nt index 5aeff80b2..b0420b39b 100644 --- a/otherlibs/str/Makefile.nt +++ b/otherlibs/str/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/str/str.ml b/otherlibs/str/str.ml index f3f760acb..5d53168fd 100644 --- a/otherlibs/str/str.ml +++ b/otherlibs/str/str.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/str/str.mli b/otherlibs/str/str.mli index b63faf845..a4d65b6ae 100644 --- a/otherlibs/str/str.mli +++ b/otherlibs/str/str.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/str/strstubs.c b/otherlibs/str/strstubs.c index b8d53ff8f..fc2f46f8e 100644 --- a/otherlibs/str/strstubs.c +++ b/otherlibs/str/strstubs.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/systhreads/Makefile b/otherlibs/systhreads/Makefile index f5c80c0e2..fbdd89946 100644 --- a/otherlibs/systhreads/Makefile +++ b/otherlibs/systhreads/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/systhreads/Makefile.nt b/otherlibs/systhreads/Makefile.nt index 8c559e0b6..8cc9dd264 100644 --- a/otherlibs/systhreads/Makefile.nt +++ b/otherlibs/systhreads/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/systhreads/condition.ml b/otherlibs/systhreads/condition.ml index 6549c642d..6bdac6a36 100644 --- a/otherlibs/systhreads/condition.ml +++ b/otherlibs/systhreads/condition.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Caml Special Light *) +(* OCaml *) (* *) (* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/systhreads/condition.mli b/otherlibs/systhreads/condition.mli index 5bc9d6740..d13b30d86 100644 --- a/otherlibs/systhreads/condition.mli +++ b/otherlibs/systhreads/condition.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy and Damien Doligez, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/systhreads/event.ml b/otherlibs/systhreads/event.ml index 74f457b06..ff137e981 100644 --- a/otherlibs/systhreads/event.ml +++ b/otherlibs/systhreads/event.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* David Nowak and Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/systhreads/event.mli b/otherlibs/systhreads/event.mli index 08d6b0bf6..11842e5ad 100644 --- a/otherlibs/systhreads/event.mli +++ b/otherlibs/systhreads/event.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* David Nowak and Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/systhreads/mutex.ml b/otherlibs/systhreads/mutex.ml index 4e108f4a9..5e9cc886c 100644 --- a/otherlibs/systhreads/mutex.ml +++ b/otherlibs/systhreads/mutex.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Caml Special Light *) +(* OCaml *) (* *) (* Xavier Leroy and Pascal Cuoq, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/systhreads/mutex.mli b/otherlibs/systhreads/mutex.mli index b1fe14135..844d4e5d4 100644 --- a/otherlibs/systhreads/mutex.mli +++ b/otherlibs/systhreads/mutex.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy and Damien Doligez, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/systhreads/st_posix.h b/otherlibs/systhreads/st_posix.h index 165d8a367..68ac00ddf 100644 --- a/otherlibs/systhreads/st_posix.h +++ b/otherlibs/systhreads/st_posix.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/systhreads/st_stubs.c b/otherlibs/systhreads/st_stubs.c index 54cbb4e8c..6435aebf3 100644 --- a/otherlibs/systhreads/st_stubs.c +++ b/otherlibs/systhreads/st_stubs.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/systhreads/st_win32.h b/otherlibs/systhreads/st_win32.h index e3e37c8c2..4b5755ec3 100644 --- a/otherlibs/systhreads/st_win32.h +++ b/otherlibs/systhreads/st_win32.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/systhreads/thread.ml b/otherlibs/systhreads/thread.ml index 18cc819bb..f66396e85 100644 --- a/otherlibs/systhreads/thread.ml +++ b/otherlibs/systhreads/thread.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/systhreads/thread.mli b/otherlibs/systhreads/thread.mli index 3c2fc01b5..42d18e635 100644 --- a/otherlibs/systhreads/thread.mli +++ b/otherlibs/systhreads/thread.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/systhreads/threadUnix.ml b/otherlibs/systhreads/threadUnix.ml index 71855ec69..d4b6fd59f 100644 --- a/otherlibs/systhreads/threadUnix.ml +++ b/otherlibs/systhreads/threadUnix.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/systhreads/threadUnix.mli b/otherlibs/systhreads/threadUnix.mli index c05346fef..9c7e76e56 100644 --- a/otherlibs/systhreads/threadUnix.mli +++ b/otherlibs/systhreads/threadUnix.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/systhreads/threads.h b/otherlibs/systhreads/threads.h index 746624256..a0a407835 100644 --- a/otherlibs/systhreads/threads.h +++ b/otherlibs/systhreads/threads.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Damien Doligez, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/threads/Makefile b/otherlibs/threads/Makefile index 0e6ef86ff..3354a275b 100644 --- a/otherlibs/threads/Makefile +++ b/otherlibs/threads/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/threads/condition.ml b/otherlibs/threads/condition.ml index e012a86e3..ee687a85b 100644 --- a/otherlibs/threads/condition.ml +++ b/otherlibs/threads/condition.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy and Damien Doligez, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/threads/condition.mli b/otherlibs/threads/condition.mli index 5bc9d6740..d13b30d86 100644 --- a/otherlibs/threads/condition.mli +++ b/otherlibs/threads/condition.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy and Damien Doligez, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/threads/event.ml b/otherlibs/threads/event.ml index 74f457b06..ff137e981 100644 --- a/otherlibs/threads/event.ml +++ b/otherlibs/threads/event.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* David Nowak and Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/threads/event.mli b/otherlibs/threads/event.mli index 08d6b0bf6..11842e5ad 100644 --- a/otherlibs/threads/event.mli +++ b/otherlibs/threads/event.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* David Nowak and Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/threads/marshal.ml b/otherlibs/threads/marshal.ml index d31a667df..6f2bcfed7 100644 --- a/otherlibs/threads/marshal.ml +++ b/otherlibs/threads/marshal.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/threads/mutex.ml b/otherlibs/threads/mutex.ml index f0f6845b2..12e3f534d 100644 --- a/otherlibs/threads/mutex.ml +++ b/otherlibs/threads/mutex.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy and Damien Doligez, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/threads/mutex.mli b/otherlibs/threads/mutex.mli index b1fe14135..844d4e5d4 100644 --- a/otherlibs/threads/mutex.mli +++ b/otherlibs/threads/mutex.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy and Damien Doligez, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/threads/pervasives.ml b/otherlibs/threads/pervasives.ml index 748e96796..f83a1cf0d 100644 --- a/otherlibs/threads/pervasives.ml +++ b/otherlibs/threads/pervasives.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/threads/scheduler.c b/otherlibs/threads/scheduler.c index c73ac67e8..3f5197903 100644 --- a/otherlibs/threads/scheduler.c +++ b/otherlibs/threads/scheduler.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/threads/thread.ml b/otherlibs/threads/thread.ml index 723669a39..f4bbd8a5a 100644 --- a/otherlibs/threads/thread.ml +++ b/otherlibs/threads/thread.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/threads/thread.mli b/otherlibs/threads/thread.mli index 9577a54eb..e97e55ab1 100644 --- a/otherlibs/threads/thread.mli +++ b/otherlibs/threads/thread.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/threads/threadUnix.ml b/otherlibs/threads/threadUnix.ml index 66a3704c1..bd4181b99 100644 --- a/otherlibs/threads/threadUnix.ml +++ b/otherlibs/threads/threadUnix.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/threads/threadUnix.mli b/otherlibs/threads/threadUnix.mli index 1b4dde29b..22ed9330e 100644 --- a/otherlibs/threads/threadUnix.mli +++ b/otherlibs/threads/threadUnix.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/threads/unix.ml b/otherlibs/threads/unix.ml index 5a8bb697d..230617072 100644 --- a/otherlibs/threads/unix.ml +++ b/otherlibs/threads/unix.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/unix/Makefile b/otherlibs/unix/Makefile index be7234969..5a11b5c2c 100644 --- a/otherlibs/unix/Makefile +++ b/otherlibs/unix/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/unix/accept.c b/otherlibs/unix/accept.c index a6e80f064..7b2688f03 100644 --- a/otherlibs/unix/accept.c +++ b/otherlibs/unix/accept.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/access.c b/otherlibs/unix/access.c index 0c0c5fc1a..813c0634a 100644 --- a/otherlibs/unix/access.c +++ b/otherlibs/unix/access.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/addrofstr.c b/otherlibs/unix/addrofstr.c index 6947d66f1..217397b50 100644 --- a/otherlibs/unix/addrofstr.c +++ b/otherlibs/unix/addrofstr.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/alarm.c b/otherlibs/unix/alarm.c index 55e4d6cf8..6275e2556 100644 --- a/otherlibs/unix/alarm.c +++ b/otherlibs/unix/alarm.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/bind.c b/otherlibs/unix/bind.c index 85cf1d28a..a6999a9f4 100644 --- a/otherlibs/unix/bind.c +++ b/otherlibs/unix/bind.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/chdir.c b/otherlibs/unix/chdir.c index 7901eca0e..2788c5054 100644 --- a/otherlibs/unix/chdir.c +++ b/otherlibs/unix/chdir.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/chmod.c b/otherlibs/unix/chmod.c index dff837223..f01d7e85b 100644 --- a/otherlibs/unix/chmod.c +++ b/otherlibs/unix/chmod.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/chown.c b/otherlibs/unix/chown.c index bfd164008..72002e936 100644 --- a/otherlibs/unix/chown.c +++ b/otherlibs/unix/chown.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/chroot.c b/otherlibs/unix/chroot.c index 24f49877d..879d0662f 100644 --- a/otherlibs/unix/chroot.c +++ b/otherlibs/unix/chroot.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/close.c b/otherlibs/unix/close.c index 27e1937df..0aaf74bd9 100644 --- a/otherlibs/unix/close.c +++ b/otherlibs/unix/close.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/closedir.c b/otherlibs/unix/closedir.c index b2fd51357..a6440efa4 100644 --- a/otherlibs/unix/closedir.c +++ b/otherlibs/unix/closedir.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/connect.c b/otherlibs/unix/connect.c index 669c347f3..a17a89ffc 100644 --- a/otherlibs/unix/connect.c +++ b/otherlibs/unix/connect.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/cst2constr.c b/otherlibs/unix/cst2constr.c index 9035160dc..8ce4d3f0d 100644 --- a/otherlibs/unix/cst2constr.c +++ b/otherlibs/unix/cst2constr.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/cst2constr.h b/otherlibs/unix/cst2constr.h index 3cb1c1182..e1c61a0c5 100644 --- a/otherlibs/unix/cst2constr.h +++ b/otherlibs/unix/cst2constr.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/cstringv.c b/otherlibs/unix/cstringv.c index 0e37914d8..5c83b59e4 100644 --- a/otherlibs/unix/cstringv.c +++ b/otherlibs/unix/cstringv.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/dup.c b/otherlibs/unix/dup.c index 5935d0b44..f78d9369d 100644 --- a/otherlibs/unix/dup.c +++ b/otherlibs/unix/dup.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/dup2.c b/otherlibs/unix/dup2.c index beb987133..412315891 100644 --- a/otherlibs/unix/dup2.c +++ b/otherlibs/unix/dup2.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/envir.c b/otherlibs/unix/envir.c index 1df842c59..020edf0cf 100644 --- a/otherlibs/unix/envir.c +++ b/otherlibs/unix/envir.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/errmsg.c b/otherlibs/unix/errmsg.c index ae8793e19..6cf82d633 100644 --- a/otherlibs/unix/errmsg.c +++ b/otherlibs/unix/errmsg.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/execv.c b/otherlibs/unix/execv.c index bc0330b35..51eabc712 100644 --- a/otherlibs/unix/execv.c +++ b/otherlibs/unix/execv.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/execve.c b/otherlibs/unix/execve.c index 4d29fb55b..00ab6af4c 100644 --- a/otherlibs/unix/execve.c +++ b/otherlibs/unix/execve.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/execvp.c b/otherlibs/unix/execvp.c index 6d03a29ea..db77d4134 100644 --- a/otherlibs/unix/execvp.c +++ b/otherlibs/unix/execvp.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/exit.c b/otherlibs/unix/exit.c index 8f1df6d53..88fc01254 100644 --- a/otherlibs/unix/exit.c +++ b/otherlibs/unix/exit.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/fchmod.c b/otherlibs/unix/fchmod.c index a90de6ef1..b2d49dcd4 100644 --- a/otherlibs/unix/fchmod.c +++ b/otherlibs/unix/fchmod.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/fchown.c b/otherlibs/unix/fchown.c index 29683a5c7..e2c934ae0 100644 --- a/otherlibs/unix/fchown.c +++ b/otherlibs/unix/fchown.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/fcntl.c b/otherlibs/unix/fcntl.c index a0891b2c3..58f7df756 100644 --- a/otherlibs/unix/fcntl.c +++ b/otherlibs/unix/fcntl.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/fork.c b/otherlibs/unix/fork.c index 74ec6294d..80b443551 100644 --- a/otherlibs/unix/fork.c +++ b/otherlibs/unix/fork.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/ftruncate.c b/otherlibs/unix/ftruncate.c index 661640e35..5eaa166fb 100644 --- a/otherlibs/unix/ftruncate.c +++ b/otherlibs/unix/ftruncate.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getaddrinfo.c b/otherlibs/unix/getaddrinfo.c index adc54998a..34cf8280c 100644 --- a/otherlibs/unix/getaddrinfo.c +++ b/otherlibs/unix/getaddrinfo.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getcwd.c b/otherlibs/unix/getcwd.c index 7c735b68d..f3ff97114 100644 --- a/otherlibs/unix/getcwd.c +++ b/otherlibs/unix/getcwd.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getegid.c b/otherlibs/unix/getegid.c index 02beaf124..9c6097ef5 100644 --- a/otherlibs/unix/getegid.c +++ b/otherlibs/unix/getegid.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/geteuid.c b/otherlibs/unix/geteuid.c index 7c9f660af..55e076380 100644 --- a/otherlibs/unix/geteuid.c +++ b/otherlibs/unix/geteuid.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getgid.c b/otherlibs/unix/getgid.c index d0ed4bff7..a3039d56c 100644 --- a/otherlibs/unix/getgid.c +++ b/otherlibs/unix/getgid.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getgr.c b/otherlibs/unix/getgr.c index eefaa5979..7b212bd27 100644 --- a/otherlibs/unix/getgr.c +++ b/otherlibs/unix/getgr.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getgroups.c b/otherlibs/unix/getgroups.c index 4d34d5be9..485fabc45 100644 --- a/otherlibs/unix/getgroups.c +++ b/otherlibs/unix/getgroups.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/gethost.c b/otherlibs/unix/gethost.c index 36fdfd8ef..b0b29d9e0 100644 --- a/otherlibs/unix/gethost.c +++ b/otherlibs/unix/gethost.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/gethostname.c b/otherlibs/unix/gethostname.c index f84f8f5b5..cf334e9b8 100644 --- a/otherlibs/unix/gethostname.c +++ b/otherlibs/unix/gethostname.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getlogin.c b/otherlibs/unix/getlogin.c index 132ed443a..60197a07b 100644 --- a/otherlibs/unix/getlogin.c +++ b/otherlibs/unix/getlogin.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getnameinfo.c b/otherlibs/unix/getnameinfo.c index c88785699..eea15c59c 100644 --- a/otherlibs/unix/getnameinfo.c +++ b/otherlibs/unix/getnameinfo.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getpeername.c b/otherlibs/unix/getpeername.c index 20a837ca1..3c4da5567 100644 --- a/otherlibs/unix/getpeername.c +++ b/otherlibs/unix/getpeername.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getpid.c b/otherlibs/unix/getpid.c index cb522749d..5cc4f3a68 100644 --- a/otherlibs/unix/getpid.c +++ b/otherlibs/unix/getpid.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getppid.c b/otherlibs/unix/getppid.c index 0d69aafb4..2d1cd3949 100644 --- a/otherlibs/unix/getppid.c +++ b/otherlibs/unix/getppid.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getproto.c b/otherlibs/unix/getproto.c index c9ca1a5c9..0213e8795 100644 --- a/otherlibs/unix/getproto.c +++ b/otherlibs/unix/getproto.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getpw.c b/otherlibs/unix/getpw.c index eba9d6c3c..4317dc202 100644 --- a/otherlibs/unix/getpw.c +++ b/otherlibs/unix/getpw.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getserv.c b/otherlibs/unix/getserv.c index e252aacb7..626f63b8a 100644 --- a/otherlibs/unix/getserv.c +++ b/otherlibs/unix/getserv.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getsockname.c b/otherlibs/unix/getsockname.c index 6f0b64dcd..8ab6debb0 100644 --- a/otherlibs/unix/getsockname.c +++ b/otherlibs/unix/getsockname.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/gettimeofday.c b/otherlibs/unix/gettimeofday.c index e095326e6..3e203d54e 100644 --- a/otherlibs/unix/gettimeofday.c +++ b/otherlibs/unix/gettimeofday.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/getuid.c b/otherlibs/unix/getuid.c index 780a8d8ec..db3fab130 100644 --- a/otherlibs/unix/getuid.c +++ b/otherlibs/unix/getuid.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/gmtime.c b/otherlibs/unix/gmtime.c index 2ffeb3927..b55d70f4d 100644 --- a/otherlibs/unix/gmtime.c +++ b/otherlibs/unix/gmtime.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/initgroups.c b/otherlibs/unix/initgroups.c index df358dae1..d5b3dc568 100644 --- a/otherlibs/unix/initgroups.c +++ b/otherlibs/unix/initgroups.c @@ -1,6 +1,8 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ +/* */ +/* Contributed by Stephane Glondu */ /* */ /* Copyright 2009 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ @@ -9,8 +11,6 @@ /* */ /***********************************************************************/ -/* Contributed by Stephane Glondu */ - /* $Id$ */ #include diff --git a/otherlibs/unix/isatty.c b/otherlibs/unix/isatty.c index f534dd773..c2bdaad1c 100644 --- a/otherlibs/unix/isatty.c +++ b/otherlibs/unix/isatty.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Gallium, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/itimer.c b/otherlibs/unix/itimer.c index 14bac626a..7c32783a9 100644 --- a/otherlibs/unix/itimer.c +++ b/otherlibs/unix/itimer.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/kill.c b/otherlibs/unix/kill.c index 8d8a47340..715060ee7 100644 --- a/otherlibs/unix/kill.c +++ b/otherlibs/unix/kill.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/link.c b/otherlibs/unix/link.c index 181e9c180..e28f649ea 100644 --- a/otherlibs/unix/link.c +++ b/otherlibs/unix/link.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/listen.c b/otherlibs/unix/listen.c index 2f40cfbaf..503cf6a6a 100644 --- a/otherlibs/unix/listen.c +++ b/otherlibs/unix/listen.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/lockf.c b/otherlibs/unix/lockf.c index 6e6ce5c17..70359cf76 100644 --- a/otherlibs/unix/lockf.c +++ b/otherlibs/unix/lockf.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/lseek.c b/otherlibs/unix/lseek.c index d8180eaea..65d7d50e4 100644 --- a/otherlibs/unix/lseek.c +++ b/otherlibs/unix/lseek.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/mkdir.c b/otherlibs/unix/mkdir.c index 1b8fd6242..fd935ae67 100644 --- a/otherlibs/unix/mkdir.c +++ b/otherlibs/unix/mkdir.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/mkfifo.c b/otherlibs/unix/mkfifo.c index 3e2cf3ddb..30f247d90 100644 --- a/otherlibs/unix/mkfifo.c +++ b/otherlibs/unix/mkfifo.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/nice.c b/otherlibs/unix/nice.c index 77def267c..a0902f230 100644 --- a/otherlibs/unix/nice.c +++ b/otherlibs/unix/nice.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/open.c b/otherlibs/unix/open.c index 421218308..39c7328f9 100644 --- a/otherlibs/unix/open.c +++ b/otherlibs/unix/open.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/opendir.c b/otherlibs/unix/opendir.c index 0497ef1f4..bb4825812 100644 --- a/otherlibs/unix/opendir.c +++ b/otherlibs/unix/opendir.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/pipe.c b/otherlibs/unix/pipe.c index b68705e9f..81baeaf4e 100644 --- a/otherlibs/unix/pipe.c +++ b/otherlibs/unix/pipe.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/putenv.c b/otherlibs/unix/putenv.c index e403d2966..0fc5534f5 100644 --- a/otherlibs/unix/putenv.c +++ b/otherlibs/unix/putenv.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/read.c b/otherlibs/unix/read.c index 03a9e6aaa..cd1eab8cf 100644 --- a/otherlibs/unix/read.c +++ b/otherlibs/unix/read.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/readdir.c b/otherlibs/unix/readdir.c index fb8a67b20..1d508ac6e 100644 --- a/otherlibs/unix/readdir.c +++ b/otherlibs/unix/readdir.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/readlink.c b/otherlibs/unix/readlink.c index d2b9c4e12..29d28d3d4 100644 --- a/otherlibs/unix/readlink.c +++ b/otherlibs/unix/readlink.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/rename.c b/otherlibs/unix/rename.c index 65f33c8b5..d121037f2 100644 --- a/otherlibs/unix/rename.c +++ b/otherlibs/unix/rename.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/rewinddir.c b/otherlibs/unix/rewinddir.c index d14c526d9..7c7b4a3c8 100644 --- a/otherlibs/unix/rewinddir.c +++ b/otherlibs/unix/rewinddir.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/rmdir.c b/otherlibs/unix/rmdir.c index 8de223464..887496712 100644 --- a/otherlibs/unix/rmdir.c +++ b/otherlibs/unix/rmdir.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/select.c b/otherlibs/unix/select.c index 612d59701..049383986 100644 --- a/otherlibs/unix/select.c +++ b/otherlibs/unix/select.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/sendrecv.c b/otherlibs/unix/sendrecv.c index bb3989af7..1f884aa87 100644 --- a/otherlibs/unix/sendrecv.c +++ b/otherlibs/unix/sendrecv.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/setgid.c b/otherlibs/unix/setgid.c index bd8810f81..a1096f26b 100644 --- a/otherlibs/unix/setgid.c +++ b/otherlibs/unix/setgid.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/setgroups.c b/otherlibs/unix/setgroups.c index dd4592ad0..e681c9764 100644 --- a/otherlibs/unix/setgroups.c +++ b/otherlibs/unix/setgroups.c @@ -1,6 +1,8 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ +/* */ +/* Contributed by Stephane Glondu */ /* */ /* Copyright 2009 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ @@ -9,8 +11,6 @@ /* */ /***********************************************************************/ -/* Contributed by Stephane Glondu */ - /* $Id$ */ #include diff --git a/otherlibs/unix/setsid.c b/otherlibs/unix/setsid.c index bfa9dac0b..9cc89e642 100644 --- a/otherlibs/unix/setsid.c +++ b/otherlibs/unix/setsid.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/setuid.c b/otherlibs/unix/setuid.c index c867f4c68..4af0d781c 100644 --- a/otherlibs/unix/setuid.c +++ b/otherlibs/unix/setuid.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/shutdown.c b/otherlibs/unix/shutdown.c index d51b1a3de..abd8c0734 100644 --- a/otherlibs/unix/shutdown.c +++ b/otherlibs/unix/shutdown.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/signals.c b/otherlibs/unix/signals.c index c388b1393..fb3acf00b 100644 --- a/otherlibs/unix/signals.c +++ b/otherlibs/unix/signals.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/sleep.c b/otherlibs/unix/sleep.c index ec14e39d0..aca1003c5 100644 --- a/otherlibs/unix/sleep.c +++ b/otherlibs/unix/sleep.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/socket.c b/otherlibs/unix/socket.c index 82f6329c0..7243b8f15 100644 --- a/otherlibs/unix/socket.c +++ b/otherlibs/unix/socket.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/socketaddr.c b/otherlibs/unix/socketaddr.c index f285d15a7..caf83b785 100644 --- a/otherlibs/unix/socketaddr.c +++ b/otherlibs/unix/socketaddr.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/socketaddr.h b/otherlibs/unix/socketaddr.h index 79bc80fa7..43d7e91b4 100644 --- a/otherlibs/unix/socketaddr.h +++ b/otherlibs/unix/socketaddr.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/socketpair.c b/otherlibs/unix/socketpair.c index df4dcff03..8a52dbb81 100644 --- a/otherlibs/unix/socketpair.c +++ b/otherlibs/unix/socketpair.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/sockopt.c b/otherlibs/unix/sockopt.c index 31c95c1f5..6b3bfa4a4 100644 --- a/otherlibs/unix/sockopt.c +++ b/otherlibs/unix/sockopt.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/stat.c b/otherlibs/unix/stat.c index 9cd000063..17ae53c0b 100644 --- a/otherlibs/unix/stat.c +++ b/otherlibs/unix/stat.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/strofaddr.c b/otherlibs/unix/strofaddr.c index ad9ea1911..a2c8cdc73 100644 --- a/otherlibs/unix/strofaddr.c +++ b/otherlibs/unix/strofaddr.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/symlink.c b/otherlibs/unix/symlink.c index 6085fd516..b66c76bda 100644 --- a/otherlibs/unix/symlink.c +++ b/otherlibs/unix/symlink.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/termios.c b/otherlibs/unix/termios.c index ce49d77e0..99cca2b64 100644 --- a/otherlibs/unix/termios.c +++ b/otherlibs/unix/termios.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/time.c b/otherlibs/unix/time.c index 2fdf4978e..63eac84eb 100644 --- a/otherlibs/unix/time.c +++ b/otherlibs/unix/time.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/times.c b/otherlibs/unix/times.c index aa32f10db..94abde8a6 100644 --- a/otherlibs/unix/times.c +++ b/otherlibs/unix/times.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/truncate.c b/otherlibs/unix/truncate.c index c23eb47b5..dfc350a32 100644 --- a/otherlibs/unix/truncate.c +++ b/otherlibs/unix/truncate.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/umask.c b/otherlibs/unix/umask.c index 6f5d14fd0..cf5eaa7c0 100644 --- a/otherlibs/unix/umask.c +++ b/otherlibs/unix/umask.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/unix.ml b/otherlibs/unix/unix.ml index 8de827b0c..eda85de0f 100644 --- a/otherlibs/unix/unix.ml +++ b/otherlibs/unix/unix.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/unix/unix.mli b/otherlibs/unix/unix.mli index 614c206f2..38d1b9659 100644 --- a/otherlibs/unix/unix.mli +++ b/otherlibs/unix/unix.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/unix/unixLabels.ml b/otherlibs/unix/unixLabels.ml index 683f15ec6..424fcc6e6 100644 --- a/otherlibs/unix/unixLabels.ml +++ b/otherlibs/unix/unixLabels.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/otherlibs/unix/unixLabels.mli b/otherlibs/unix/unixLabels.mli index 7126d23e7..702a656a4 100644 --- a/otherlibs/unix/unixLabels.mli +++ b/otherlibs/unix/unixLabels.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/unix/unixsupport.c b/otherlibs/unix/unixsupport.c index c6eaf706c..3138115a6 100644 --- a/otherlibs/unix/unixsupport.c +++ b/otherlibs/unix/unixsupport.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/unixsupport.h b/otherlibs/unix/unixsupport.h index 84179f43f..a90bb2dcf 100644 --- a/otherlibs/unix/unixsupport.h +++ b/otherlibs/unix/unixsupport.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/unlink.c b/otherlibs/unix/unlink.c index 1d956758b..3fb5151be 100644 --- a/otherlibs/unix/unlink.c +++ b/otherlibs/unix/unlink.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/utimes.c b/otherlibs/unix/utimes.c index da2913570..a6a2f5ebc 100644 --- a/otherlibs/unix/utimes.c +++ b/otherlibs/unix/utimes.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/wait.c b/otherlibs/unix/wait.c index 486d06af7..fc12e5ad5 100644 --- a/otherlibs/unix/wait.c +++ b/otherlibs/unix/wait.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/unix/write.c b/otherlibs/unix/write.c index 9ddf74e3d..ca42d1e75 100644 --- a/otherlibs/unix/write.c +++ b/otherlibs/unix/write.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32graph/Makefile.nt b/otherlibs/win32graph/Makefile.nt index 12e3d2392..453d9f3c8 100644 --- a/otherlibs/win32graph/Makefile.nt +++ b/otherlibs/win32graph/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/win32graph/dib.c b/otherlibs/win32graph/dib.c index cbf4725a4..8acba6f13 100644 --- a/otherlibs/win32graph/dib.c +++ b/otherlibs/win32graph/dib.c @@ -1,8 +1,9 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Developed by Jacob Navia */ +/* */ /* Copyright 2001 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ /* under the terms of the GNU Library General Public License, with */ diff --git a/otherlibs/win32graph/draw.c b/otherlibs/win32graph/draw.c index 4bd60812a..f089a01a3 100644 --- a/otherlibs/win32graph/draw.c +++ b/otherlibs/win32graph/draw.c @@ -1,8 +1,9 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Developed by Jacob Navia, based on code by J-M Geffroy and X Leroy */ +/* */ /* Copyright 2001 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ /* under the terms of the GNU Library General Public License, with */ diff --git a/otherlibs/win32graph/events.c b/otherlibs/win32graph/events.c index 9e0791c38..29def467f 100755 --- a/otherlibs/win32graph/events.c +++ b/otherlibs/win32graph/events.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32graph/libgraph.h b/otherlibs/win32graph/libgraph.h index 6c32f15df..96ac954e7 100644 --- a/otherlibs/win32graph/libgraph.h +++ b/otherlibs/win32graph/libgraph.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Jacob Navia, after Xavier Leroy */ /* */ diff --git a/otherlibs/win32graph/open.c b/otherlibs/win32graph/open.c index 2797bc669..8ffe259e5 100644 --- a/otherlibs/win32graph/open.c +++ b/otherlibs/win32graph/open.c @@ -1,8 +1,9 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Developed by Jacob Navia, based on code by J-M Geffroy and X Leroy */ +/* */ /* Copyright 2001 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ /* under the terms of the GNU Library General Public License, with */ diff --git a/otherlibs/win32unix/Makefile.nt b/otherlibs/win32unix/Makefile.nt index 0d98b3169..80fcbf35b 100644 --- a/otherlibs/win32unix/Makefile.nt +++ b/otherlibs/win32unix/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/otherlibs/win32unix/accept.c b/otherlibs/win32unix/accept.c index 1d54b89b3..48d028790 100644 --- a/otherlibs/win32unix/accept.c +++ b/otherlibs/win32unix/accept.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/bind.c b/otherlibs/win32unix/bind.c index fca969489..84d07570c 100644 --- a/otherlibs/win32unix/bind.c +++ b/otherlibs/win32unix/bind.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/channels.c b/otherlibs/win32unix/channels.c index 56a19c7dc..2a3774d90 100644 --- a/otherlibs/win32unix/channels.c +++ b/otherlibs/win32unix/channels.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/close.c b/otherlibs/win32unix/close.c index 21254ef1e..f7463690b 100644 --- a/otherlibs/win32unix/close.c +++ b/otherlibs/win32unix/close.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/close_on.c b/otherlibs/win32unix/close_on.c index 5b2c4ece3..b64dd44dd 100644 --- a/otherlibs/win32unix/close_on.c +++ b/otherlibs/win32unix/close_on.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/connect.c b/otherlibs/win32unix/connect.c index 198d02e2d..bd342a2ea 100644 --- a/otherlibs/win32unix/connect.c +++ b/otherlibs/win32unix/connect.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/createprocess.c b/otherlibs/win32unix/createprocess.c index 042eaef9e..714513cac 100644 --- a/otherlibs/win32unix/createprocess.c +++ b/otherlibs/win32unix/createprocess.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/dup.c b/otherlibs/win32unix/dup.c index 2668e75bf..a86211bbb 100644 --- a/otherlibs/win32unix/dup.c +++ b/otherlibs/win32unix/dup.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/dup2.c b/otherlibs/win32unix/dup2.c index 3f6d37e76..f224fc54e 100644 --- a/otherlibs/win32unix/dup2.c +++ b/otherlibs/win32unix/dup2.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/errmsg.c b/otherlibs/win32unix/errmsg.c index 9ce9dddb2..1f07e514f 100644 --- a/otherlibs/win32unix/errmsg.c +++ b/otherlibs/win32unix/errmsg.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/getpeername.c b/otherlibs/win32unix/getpeername.c index 9aeb4c21b..8517f5467 100644 --- a/otherlibs/win32unix/getpeername.c +++ b/otherlibs/win32unix/getpeername.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/getpid.c b/otherlibs/win32unix/getpid.c index 0892f8f95..677acdc55 100644 --- a/otherlibs/win32unix/getpid.c +++ b/otherlibs/win32unix/getpid.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/getsockname.c b/otherlibs/win32unix/getsockname.c index 88487a43b..3af6c3412 100644 --- a/otherlibs/win32unix/getsockname.c +++ b/otherlibs/win32unix/getsockname.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/gettimeofday.c b/otherlibs/win32unix/gettimeofday.c index f1313f061..b68eeb1ad 100644 --- a/otherlibs/win32unix/gettimeofday.c +++ b/otherlibs/win32unix/gettimeofday.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/link.c b/otherlibs/win32unix/link.c index 892143423..05320491e 100644 --- a/otherlibs/win32unix/link.c +++ b/otherlibs/win32unix/link.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* File contributed by Lionel Fourquaux */ /* */ diff --git a/otherlibs/win32unix/listen.c b/otherlibs/win32unix/listen.c index 20789e1a4..402247fd0 100644 --- a/otherlibs/win32unix/listen.c +++ b/otherlibs/win32unix/listen.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/lockf.c b/otherlibs/win32unix/lockf.c index 524f9516b..1a47824dc 100644 --- a/otherlibs/win32unix/lockf.c +++ b/otherlibs/win32unix/lockf.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Contributed by Tracy Camp, PolyServe Inc., */ /* Further improvements by Reed Wilson */ diff --git a/otherlibs/win32unix/lseek.c b/otherlibs/win32unix/lseek.c index 9619fcc92..86ea537dc 100644 --- a/otherlibs/win32unix/lseek.c +++ b/otherlibs/win32unix/lseek.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/mkdir.c b/otherlibs/win32unix/mkdir.c index aae54783b..d47d7a28b 100644 --- a/otherlibs/win32unix/mkdir.c +++ b/otherlibs/win32unix/mkdir.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/nonblock.c b/otherlibs/win32unix/nonblock.c index 1bf80bfc7..8df1048d5 100755 --- a/otherlibs/win32unix/nonblock.c +++ b/otherlibs/win32unix/nonblock.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/open.c b/otherlibs/win32unix/open.c index f2f334bbb..4f90ed761 100644 --- a/otherlibs/win32unix/open.c +++ b/otherlibs/win32unix/open.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/pipe.c b/otherlibs/win32unix/pipe.c index afacd3e17..ca0df3699 100644 --- a/otherlibs/win32unix/pipe.c +++ b/otherlibs/win32unix/pipe.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/read.c b/otherlibs/win32unix/read.c index 67882eb77..c885857bf 100644 --- a/otherlibs/win32unix/read.c +++ b/otherlibs/win32unix/read.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/rename.c b/otherlibs/win32unix/rename.c index 9ab43fca8..6b750eba3 100644 --- a/otherlibs/win32unix/rename.c +++ b/otherlibs/win32unix/rename.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Contributed by Tracy Camp, PolyServe Inc., */ /* */ diff --git a/otherlibs/win32unix/select.c b/otherlibs/win32unix/select.c index b82c423cc..d96c3d9d2 100644 --- a/otherlibs/win32unix/select.c +++ b/otherlibs/win32unix/select.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Contributed by Sylvain Le Gall for Lexifi */ /* */ diff --git a/otherlibs/win32unix/sendrecv.c b/otherlibs/win32unix/sendrecv.c index 855957bd4..8837c9994 100644 --- a/otherlibs/win32unix/sendrecv.c +++ b/otherlibs/win32unix/sendrecv.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/shutdown.c b/otherlibs/win32unix/shutdown.c index f3d2c6e03..dd4e7ed34 100644 --- a/otherlibs/win32unix/shutdown.c +++ b/otherlibs/win32unix/shutdown.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/sleep.c b/otherlibs/win32unix/sleep.c index 421e5f902..682096728 100644 --- a/otherlibs/win32unix/sleep.c +++ b/otherlibs/win32unix/sleep.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/socket.c b/otherlibs/win32unix/socket.c index 3cd55ec29..abdab25f3 100644 --- a/otherlibs/win32unix/socket.c +++ b/otherlibs/win32unix/socket.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/socketaddr.h b/otherlibs/win32unix/socketaddr.h index 8abc63b47..3d2c66754 100644 --- a/otherlibs/win32unix/socketaddr.h +++ b/otherlibs/win32unix/socketaddr.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/sockopt.c b/otherlibs/win32unix/sockopt.c index f82d810e6..94a6c0402 100644 --- a/otherlibs/win32unix/sockopt.c +++ b/otherlibs/win32unix/sockopt.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/startup.c b/otherlibs/win32unix/startup.c index 8417e1366..8d4def6cb 100644 --- a/otherlibs/win32unix/startup.c +++ b/otherlibs/win32unix/startup.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/stat.c b/otherlibs/win32unix/stat.c index 79fc3b2eb..08ad397ca 100644 --- a/otherlibs/win32unix/stat.c +++ b/otherlibs/win32unix/stat.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/system.c b/otherlibs/win32unix/system.c index 51dc9bfb7..8abfa6f88 100644 --- a/otherlibs/win32unix/system.c +++ b/otherlibs/win32unix/system.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/unix.ml b/otherlibs/win32unix/unix.ml index c8396d7fd..c513ee4da 100644 --- a/otherlibs/win32unix/unix.ml +++ b/otherlibs/win32unix/unix.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/otherlibs/win32unix/unixsupport.c b/otherlibs/win32unix/unixsupport.c index 45d689ff6..2a45684a6 100644 --- a/otherlibs/win32unix/unixsupport.c +++ b/otherlibs/win32unix/unixsupport.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/unixsupport.h b/otherlibs/win32unix/unixsupport.h index d56158304..f50d40c09 100644 --- a/otherlibs/win32unix/unixsupport.h +++ b/otherlibs/win32unix/unixsupport.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/windbug.c b/otherlibs/win32unix/windbug.c index e3a2772db..0370d2de7 100644 --- a/otherlibs/win32unix/windbug.c +++ b/otherlibs/win32unix/windbug.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Contributed by Sylvain Le Gall for Lexifi */ /* */ diff --git a/otherlibs/win32unix/windbug.h b/otherlibs/win32unix/windbug.h index 69cbd3b6e..3e2341361 100644 --- a/otherlibs/win32unix/windbug.h +++ b/otherlibs/win32unix/windbug.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Contributed by Sylvain Le Gall for Lexifi */ /* */ diff --git a/otherlibs/win32unix/windir.c b/otherlibs/win32unix/windir.c index 8b96589ec..240b863b2 100644 --- a/otherlibs/win32unix/windir.c +++ b/otherlibs/win32unix/windir.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Pascal Cuoq and Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/winlist.c b/otherlibs/win32unix/winlist.c index 318a0addf..bbb2e7cff 100644 --- a/otherlibs/win32unix/winlist.c +++ b/otherlibs/win32unix/winlist.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Contributed by Sylvain Le Gall for Lexifi */ /* */ diff --git a/otherlibs/win32unix/winlist.h b/otherlibs/win32unix/winlist.h index be388a4ca..1f0a8435a 100644 --- a/otherlibs/win32unix/winlist.h +++ b/otherlibs/win32unix/winlist.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Contributed by Sylvain Le Gall for Lexifi */ /* */ diff --git a/otherlibs/win32unix/winwait.c b/otherlibs/win32unix/winwait.c index 895a6926b..db13231ae 100644 --- a/otherlibs/win32unix/winwait.c +++ b/otherlibs/win32unix/winwait.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Pascal Cuoq and Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/otherlibs/win32unix/winworker.c b/otherlibs/win32unix/winworker.c index 57f95a9ae..01c7dc400 100644 --- a/otherlibs/win32unix/winworker.c +++ b/otherlibs/win32unix/winworker.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Contributed by Sylvain Le Gall for Lexifi */ /* */ diff --git a/otherlibs/win32unix/winworker.h b/otherlibs/win32unix/winworker.h index 06450a4ec..caf9067a6 100644 --- a/otherlibs/win32unix/winworker.h +++ b/otherlibs/win32unix/winworker.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Contributed by Sylvain Le Gall for Lexifi */ /* */ diff --git a/otherlibs/win32unix/write.c b/otherlibs/win32unix/write.c index 190d90253..46d75ccba 100644 --- a/otherlibs/win32unix/write.c +++ b/otherlibs/win32unix/write.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/parsing/asttypes.mli b/parsing/asttypes.mli index 2530b44c6..d23a87fb7 100644 --- a/parsing/asttypes.mli +++ b/parsing/asttypes.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/parsing/lexer.mli b/parsing/lexer.mli index 3ddb5dde7..175eedc90 100644 --- a/parsing/lexer.mli +++ b/parsing/lexer.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/parsing/lexer.mll b/parsing/lexer.mll index 5da264ec0..20af0fb31 100644 --- a/parsing/lexer.mll +++ b/parsing/lexer.mll @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/parsing/linenum.mli b/parsing/linenum.mli index 50cc57e8e..e63694761 100644 --- a/parsing/linenum.mli +++ b/parsing/linenum.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/parsing/linenum.mll b/parsing/linenum.mll index 91e71e972..1844d361f 100644 --- a/parsing/linenum.mll +++ b/parsing/linenum.mll @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/parsing/location.ml b/parsing/location.ml index 15b074acd..e9a988245 100644 --- a/parsing/location.ml +++ b/parsing/location.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/parsing/location.mli b/parsing/location.mli index a496a3550..2215d9864 100644 --- a/parsing/location.mli +++ b/parsing/location.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/parsing/longident.ml b/parsing/longident.ml index 1b459ca3f..1114a2ef5 100644 --- a/parsing/longident.ml +++ b/parsing/longident.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/parsing/longident.mli b/parsing/longident.mli index 4568bc953..a802049b9 100644 --- a/parsing/longident.mli +++ b/parsing/longident.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/parsing/parse.ml b/parsing/parse.ml index 7f3e4cdc0..edeed48f2 100644 --- a/parsing/parse.ml +++ b/parsing/parse.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/parsing/parse.mli b/parsing/parse.mli index 87a09f0e2..85e08bc48 100644 --- a/parsing/parse.mli +++ b/parsing/parse.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/parsing/parser.mly b/parsing/parser.mly index 9bba8768c..30a96d672 100644 --- a/parsing/parser.mly +++ b/parsing/parser.mly @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/parsing/parsetree.mli b/parsing/parsetree.mli index 976283ff1..0f03141f1 100644 --- a/parsing/parsetree.mli +++ b/parsing/parsetree.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/parsing/printast.ml b/parsing/printast.ml index 2b236ae82..2ca0c8d94 100644 --- a/parsing/printast.ml +++ b/parsing/printast.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/parsing/printast.mli b/parsing/printast.mli index 7ea148678..096f46172 100644 --- a/parsing/printast.mli +++ b/parsing/printast.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/parsing/syntaxerr.ml b/parsing/syntaxerr.ml index edaabda12..00e06bba0 100644 --- a/parsing/syntaxerr.ml +++ b/parsing/syntaxerr.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/parsing/syntaxerr.mli b/parsing/syntaxerr.mli index 4e9679926..10a07d14c 100644 --- a/parsing/syntaxerr.mli +++ b/parsing/syntaxerr.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/Compflags b/stdlib/Compflags index 8578751c9..6ab038f44 100755 --- a/stdlib/Compflags +++ b/stdlib/Compflags @@ -1,7 +1,7 @@ #!/bin/sh ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/stdlib/Makefile b/stdlib/Makefile index 59a2e18fb..2c8e06706 100644 --- a/stdlib/Makefile +++ b/stdlib/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/stdlib/Makefile.nt b/stdlib/Makefile.nt index b21f0a375..579391a77 100644 --- a/stdlib/Makefile.nt +++ b/stdlib/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/stdlib/Makefile.shared b/stdlib/Makefile.shared index d1b181278..0752a1b5f 100755 --- a/stdlib/Makefile.shared +++ b/stdlib/Makefile.shared @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/stdlib/StdlibModules b/stdlib/StdlibModules index 4f689f8c4..926e2cb51 100644 --- a/stdlib/StdlibModules +++ b/stdlib/StdlibModules @@ -1,7 +1,23 @@ -# This file lists all standard library modules. -*- Makefile -*- -# It is used in particular to know what to expunge in toplevels. +# -*- Makefile -*- + +######################################################################### +# # +# OCaml # +# # +# Xavier Leroy, projet Cristal, INRIA Rocquencourt # +# # +# Copyright 2002 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the GNU Library General Public License, with # +# the special exception on linking described in file ../LICENSE. # +# # +######################################################################### + # $Id$ +# This file lists all standard library modules. +# It is used in particular to know what to expunge in toplevels. + STDLIB_MODULES=\ arg \ array \ diff --git a/stdlib/arg.ml b/stdlib/arg.ml index ac552d38e..d5d1bdf74 100644 --- a/stdlib/arg.ml +++ b/stdlib/arg.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/stdlib/arg.mli b/stdlib/arg.mli index 887256615..1fff78f19 100644 --- a/stdlib/arg.mli +++ b/stdlib/arg.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/stdlib/array.ml b/stdlib/array.ml index d1cbd6557..e29b2fe83 100644 --- a/stdlib/array.ml +++ b/stdlib/array.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/array.mli b/stdlib/array.mli index 9fb74b06e..df5b1c41c 100644 --- a/stdlib/array.mli +++ b/stdlib/array.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/arrayLabels.ml b/stdlib/arrayLabels.ml index fed0ad1c2..652f4cac4 100644 --- a/stdlib/arrayLabels.ml +++ b/stdlib/arrayLabels.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/stdlib/arrayLabels.mli b/stdlib/arrayLabels.mli index f45f70c6d..d4833e026 100644 --- a/stdlib/arrayLabels.mli +++ b/stdlib/arrayLabels.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/buffer.ml b/stdlib/buffer.ml index 9327aaefb..541717ade 100644 --- a/stdlib/buffer.ml +++ b/stdlib/buffer.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Pierre Weis and Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/buffer.mli b/stdlib/buffer.mli index efe2e9ea2..ce70c983e 100644 --- a/stdlib/buffer.mli +++ b/stdlib/buffer.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Pierre Weis and Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/callback.ml b/stdlib/callback.ml index 819f9d3f4..a8a490c46 100644 --- a/stdlib/callback.ml +++ b/stdlib/callback.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/callback.mli b/stdlib/callback.mli index ba2ab7ecb..dfb31617a 100644 --- a/stdlib/callback.mli +++ b/stdlib/callback.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/camlinternalLazy.ml b/stdlib/camlinternalLazy.ml index 46cf42788..042a377c9 100644 --- a/stdlib/camlinternalLazy.ml +++ b/stdlib/camlinternalLazy.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/stdlib/camlinternalLazy.mli b/stdlib/camlinternalLazy.mli index 37b707d4f..99de7ed84 100644 --- a/stdlib/camlinternalLazy.mli +++ b/stdlib/camlinternalLazy.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/stdlib/camlinternalMod.ml b/stdlib/camlinternalMod.ml index 12a77cc8f..36d73bdcf 100644 --- a/stdlib/camlinternalMod.ml +++ b/stdlib/camlinternalMod.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/camlinternalMod.mli b/stdlib/camlinternalMod.mli index 74bf28db2..dc8c61ca0 100644 --- a/stdlib/camlinternalMod.mli +++ b/stdlib/camlinternalMod.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/camlinternalOO.ml b/stdlib/camlinternalOO.ml index 2ffa71c0a..db3aef73d 100644 --- a/stdlib/camlinternalOO.ml +++ b/stdlib/camlinternalOO.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/camlinternalOO.mli b/stdlib/camlinternalOO.mli index d2aeea319..f02b02036 100644 --- a/stdlib/camlinternalOO.mli +++ b/stdlib/camlinternalOO.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/char.ml b/stdlib/char.ml index 28a1bcc46..6dafbad2b 100644 --- a/stdlib/char.ml +++ b/stdlib/char.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/char.mli b/stdlib/char.mli index 8ab72bd9a..34bd6c23d 100644 --- a/stdlib/char.mli +++ b/stdlib/char.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) @@ -26,7 +26,7 @@ val chr : int -> char val escaped : char -> string (** Return a string representing the given character, with special characters escaped following the lexical conventions - of Objective Caml. *) + of OCaml. *) val lowercase : char -> char (** Convert the given character to its equivalent lowercase character. *) diff --git a/stdlib/complex.ml b/stdlib/complex.ml index 3c28a58b7..c52e647cc 100644 --- a/stdlib/complex.ml +++ b/stdlib/complex.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/complex.mli b/stdlib/complex.mli index 3c3b361d2..1bfa8b7bc 100644 --- a/stdlib/complex.mli +++ b/stdlib/complex.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/digest.ml b/stdlib/digest.ml index 78a45d54e..7d6914156 100644 --- a/stdlib/digest.ml +++ b/stdlib/digest.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/digest.mli b/stdlib/digest.mli index 981bd02fc..14f27e263 100644 --- a/stdlib/digest.mli +++ b/stdlib/digest.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/filename.ml b/stdlib/filename.ml index e11f1e330..92bd21718 100644 --- a/stdlib/filename.ml +++ b/stdlib/filename.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy and Damien Doligez, INRIA Rocquencourt *) (* *) diff --git a/stdlib/filename.mli b/stdlib/filename.mli index efbdcd98d..7e447585c 100644 --- a/stdlib/filename.mli +++ b/stdlib/filename.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/format.ml b/stdlib/format.ml index 56648dd6a..9cb9a1afd 100644 --- a/stdlib/format.ml +++ b/stdlib/format.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Pierre Weis, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/format.mli b/stdlib/format.mli index 9b49c53f4..8ddc0f519 100644 --- a/stdlib/format.mli +++ b/stdlib/format.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Pierre Weis, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/gc.ml b/stdlib/gc.ml index 6482ebb78..16a354a35 100644 --- a/stdlib/gc.ml +++ b/stdlib/gc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/stdlib/gc.mli b/stdlib/gc.mli index 142a38af2..ec6cc17c3 100644 --- a/stdlib/gc.mli +++ b/stdlib/gc.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/stdlib/genlex.ml b/stdlib/genlex.ml index 6ecc2805a..1c6276c9f 100644 --- a/stdlib/genlex.ml +++ b/stdlib/genlex.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/genlex.mli b/stdlib/genlex.mli index 93bc5f55e..d7cecc781 100644 --- a/stdlib/genlex.mli +++ b/stdlib/genlex.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/hashtbl.ml b/stdlib/hashtbl.ml index 0c6b1324d..b91b8e512 100644 --- a/stdlib/hashtbl.ml +++ b/stdlib/hashtbl.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/hashtbl.mli b/stdlib/hashtbl.mli index 774443f9f..6fb3c1029 100644 --- a/stdlib/hashtbl.mli +++ b/stdlib/hashtbl.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/header.c b/stdlib/header.c index eda76325a..c82c7bc7f 100644 --- a/stdlib/header.c +++ b/stdlib/header.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/stdlib/headernt.c b/stdlib/headernt.c index 77f368afd..9972d5d5c 100644 --- a/stdlib/headernt.c +++ b/stdlib/headernt.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/stdlib/int32.ml b/stdlib/int32.ml index 64d525e88..15237d7f4 100644 --- a/stdlib/int32.ml +++ b/stdlib/int32.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/int32.mli b/stdlib/int32.mli index eeafb1a2f..8bc7384ff 100644 --- a/stdlib/int32.mli +++ b/stdlib/int32.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/int64.ml b/stdlib/int64.ml index e916fa4e0..d8b1c3ca3 100644 --- a/stdlib/int64.ml +++ b/stdlib/int64.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/int64.mli b/stdlib/int64.mli index 3b641338e..1f28f5c49 100644 --- a/stdlib/int64.mli +++ b/stdlib/int64.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/lazy.ml b/stdlib/lazy.ml index b1a9cbbda..359fcaa63 100644 --- a/stdlib/lazy.ml +++ b/stdlib/lazy.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) @@ -18,7 +18,7 @@ (* WARNING: some purple magic is going on here. Do not take this file - as an example of how to program in Objective Caml. + as an example of how to program in OCaml. *) diff --git a/stdlib/lazy.mli b/stdlib/lazy.mli index 3b85717f1..4a3b5df0f 100644 --- a/stdlib/lazy.mli +++ b/stdlib/lazy.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/stdlib/lexing.ml b/stdlib/lexing.ml index 9e0141526..4d03ec088 100644 --- a/stdlib/lexing.ml +++ b/stdlib/lexing.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/lexing.mli b/stdlib/lexing.mli index 2edb6c5df..6008e127b 100644 --- a/stdlib/lexing.mli +++ b/stdlib/lexing.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/list.ml b/stdlib/list.ml index c6b161884..aea05b4bf 100644 --- a/stdlib/list.ml +++ b/stdlib/list.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/list.mli b/stdlib/list.mli index 547fb1328..996436ef5 100644 --- a/stdlib/list.mli +++ b/stdlib/list.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/listLabels.ml b/stdlib/listLabels.ml index be7bddea3..62b6e3768 100644 --- a/stdlib/listLabels.ml +++ b/stdlib/listLabels.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/stdlib/listLabels.mli b/stdlib/listLabels.mli index 94c875a6c..324df1394 100644 --- a/stdlib/listLabels.mli +++ b/stdlib/listLabels.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/map.ml b/stdlib/map.ml index 3d9597aa0..8f658b212 100644 --- a/stdlib/map.ml +++ b/stdlib/map.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/map.mli b/stdlib/map.mli index b025b8c0a..a6374dbdf 100644 --- a/stdlib/map.mli +++ b/stdlib/map.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/marshal.ml b/stdlib/marshal.ml index 0410a23e9..c42851504 100644 --- a/stdlib/marshal.ml +++ b/stdlib/marshal.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/marshal.mli b/stdlib/marshal.mli index ac0775bb1..800f061e3 100644 --- a/stdlib/marshal.mli +++ b/stdlib/marshal.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) @@ -20,7 +20,7 @@ sent over a pipe or network connection. The bytes can then be read back later, possibly in another process, and decoded back into a data structure. The format for the byte sequences - is compatible across all machines for a given version of Objective Caml. + is compatible across all machines for a given version of OCaml. Warning: marshaling is currently not type-safe. The type of marshaled data is not transmitted along the value of the data, diff --git a/stdlib/moreLabels.ml b/stdlib/moreLabels.ml index f6cfddabc..3fda7a5b3 100644 --- a/stdlib/moreLabels.ml +++ b/stdlib/moreLabels.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/stdlib/moreLabels.mli b/stdlib/moreLabels.mli index 21b60bdd7..accf7f3e8 100644 --- a/stdlib/moreLabels.mli +++ b/stdlib/moreLabels.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) @@ -19,7 +19,7 @@ {!Map} and {!Set} modules. They only differ by their labels. They are provided to help - porting from previous versions of Objective Caml. + porting from previous versions of OCaml. The contents of this module are subject to change. *) diff --git a/stdlib/nativeint.ml b/stdlib/nativeint.ml index 934784361..4bba76d56 100644 --- a/stdlib/nativeint.ml +++ b/stdlib/nativeint.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/nativeint.mli b/stdlib/nativeint.mli index ff499a26f..7de11ea00 100644 --- a/stdlib/nativeint.mli +++ b/stdlib/nativeint.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/obj.ml b/stdlib/obj.ml index c16b51156..96de162f6 100644 --- a/stdlib/obj.ml +++ b/stdlib/obj.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/obj.mli b/stdlib/obj.mli index 57df04917..9b66723b2 100644 --- a/stdlib/obj.mli +++ b/stdlib/obj.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/oo.ml b/stdlib/oo.ml index c9ec64ae4..40c8ae6e4 100644 --- a/stdlib/oo.ml +++ b/stdlib/oo.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/oo.mli b/stdlib/oo.mli index b3111ce85..cd83151bb 100644 --- a/stdlib/oo.mli +++ b/stdlib/oo.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jerome Vouillon, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/parsing.ml b/stdlib/parsing.ml index 5d53c7413..55a8f53aa 100644 --- a/stdlib/parsing.ml +++ b/stdlib/parsing.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/parsing.mli b/stdlib/parsing.mli index 03721ba30..0d053b899 100644 --- a/stdlib/parsing.mli +++ b/stdlib/parsing.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/pervasives.ml b/stdlib/pervasives.ml index b4277953c..5148f228f 100644 --- a/stdlib/pervasives.ml +++ b/stdlib/pervasives.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/pervasives.mli b/stdlib/pervasives.mli index 2062f8fdb..e5b21d110 100644 --- a/stdlib/pervasives.mli +++ b/stdlib/pervasives.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) @@ -655,7 +655,7 @@ val output_binary_int : out_channel -> int -> unit The given integer is taken modulo 2{^32}. The only reliable way to read it back is through the {!Pervasives.input_binary_int} function. The format is compatible across - all machines for a given version of Objective Caml. *) + all machines for a given version of OCaml. *) val output_value : out_channel -> 'a -> unit (** Write the representation of a structured value of any type @@ -868,8 +868,7 @@ external decr : int ref -> unit = "%decr" (** Format strings have a general and highly polymorphic type [('a, 'b, 'c, 'd, 'e, 'f) format6]. Type [format6] is built in. The two simplified types, [format] and [format4] below are - included for backward compatibility with earlier releases of Objective - Caml. + included for backward compatibility with earlier releases of OCaml. ['a] is the type of the parameters of the format, ['b] is the type of the first argument given to [%a] and [%t] printing functions, diff --git a/stdlib/printexc.ml b/stdlib/printexc.ml index 9e435c590..6f71b497f 100644 --- a/stdlib/printexc.ml +++ b/stdlib/printexc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/printexc.mli b/stdlib/printexc.mli index 319ba52c4..93ee5d6d1 100644 --- a/stdlib/printexc.mli +++ b/stdlib/printexc.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/printf.ml b/stdlib/printf.ml index dc88335f6..afca2034e 100644 --- a/stdlib/printf.ml +++ b/stdlib/printf.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy and Pierre Weis, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/printf.mli b/stdlib/printf.mli index e122decec..797a354dd 100644 --- a/stdlib/printf.mli +++ b/stdlib/printf.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy and Pierre Weis, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/queue.ml b/stdlib/queue.ml index 9e21686a1..605a89204 100644 --- a/stdlib/queue.ml +++ b/stdlib/queue.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* François Pottier, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/queue.mli b/stdlib/queue.mli index 085cfb003..5dea9244b 100644 --- a/stdlib/queue.mli +++ b/stdlib/queue.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/random.ml b/stdlib/random.ml index bd3979914..44b830150 100644 --- a/stdlib/random.ml +++ b/stdlib/random.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/stdlib/random.mli b/stdlib/random.mli index 88387d191..389ef8d21 100644 --- a/stdlib/random.mli +++ b/stdlib/random.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/stdlib/scanf.ml b/stdlib/scanf.ml index aa6e65621..a11613c20 100644 --- a/stdlib/scanf.ml +++ b/stdlib/scanf.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Pierre Weis, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/scanf.mli b/stdlib/scanf.mli index 373c9ae31..38cbad865 100644 --- a/stdlib/scanf.mli +++ b/stdlib/scanf.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Pierre Weis, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/set.ml b/stdlib/set.ml index 375fc5d0e..63e965fa4 100644 --- a/stdlib/set.ml +++ b/stdlib/set.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/set.mli b/stdlib/set.mli index 851a9ef51..0f1a3b7c9 100644 --- a/stdlib/set.mli +++ b/stdlib/set.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/sort.ml b/stdlib/sort.ml index 7c53ab777..66546b12b 100644 --- a/stdlib/sort.ml +++ b/stdlib/sort.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/sort.mli b/stdlib/sort.mli index 7069052eb..4f2a961aa 100644 --- a/stdlib/sort.mli +++ b/stdlib/sort.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/stack.ml b/stdlib/stack.ml index 03277d079..599b10c8b 100644 --- a/stdlib/stack.ml +++ b/stdlib/stack.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/stack.mli b/stdlib/stack.mli index bf33d01ab..2d7a90066 100644 --- a/stdlib/stack.mli +++ b/stdlib/stack.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/stdLabels.ml b/stdlib/stdLabels.ml index bd6a5841d..468dd5176 100644 --- a/stdlib/stdLabels.ml +++ b/stdlib/stdLabels.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/stdlib/stdLabels.mli b/stdlib/stdLabels.mli index 73f72dc68..cb1ba01a4 100644 --- a/stdlib/stdLabels.mli +++ b/stdlib/stdLabels.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/stdlib/std_exit.ml b/stdlib/std_exit.ml index 6f5ff301a..c56153738 100644 --- a/stdlib/std_exit.ml +++ b/stdlib/std_exit.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/stream.ml b/stdlib/stream.ml index aa6a2a2ab..fc66acb3e 100644 --- a/stdlib/stream.ml +++ b/stdlib/stream.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Ocaml *) +(* OCaml *) (* *) (* Daniel de Rauglaudre, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/stream.mli b/stdlib/stream.mli index 28cfd3a1c..2859e65e0 100644 --- a/stdlib/stream.mli +++ b/stdlib/stream.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Ocaml *) +(* OCaml *) (* *) (* Daniel de Rauglaudre, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/string.ml b/stdlib/string.ml index 72f9494cc..7eafec02f 100644 --- a/stdlib/string.ml +++ b/stdlib/string.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/string.mli b/stdlib/string.mli index 8c0889803..3a7976bd2 100644 --- a/stdlib/string.mli +++ b/stdlib/string.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) @@ -104,7 +104,7 @@ val iteri : (int -> char -> unit) -> string -> unit val escaped : string -> string (** Return a copy of the argument, with special characters represented by escape sequences, following the lexical - conventions of Objective Caml. If there is no special + conventions of OCaml. If there is no special character in the argument, return the original string itself, not a copy. *) diff --git a/stdlib/stringLabels.ml b/stdlib/stringLabels.ml index 87d23d86f..2345d4992 100644 --- a/stdlib/stringLabels.ml +++ b/stdlib/stringLabels.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Jacques Garrigue, Kyoto University RIMS *) (* *) diff --git a/stdlib/stringLabels.mli b/stdlib/stringLabels.mli index d1a3966f5..5a17c67da 100644 --- a/stdlib/stringLabels.mli +++ b/stdlib/stringLabels.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) @@ -94,7 +94,7 @@ val iteri : f:(int -> char -> unit) -> string -> unit val escaped : string -> string (** Return a copy of the argument, with special characters represented by escape sequences, following the lexical - conventions of Objective Caml. If there is no special + conventions of OCaml. If there is no special character in the argument, return the original string itself, not a copy. *) diff --git a/stdlib/sys.mli b/stdlib/sys.mli index 713038aa7..ee5021dcc 100644 --- a/stdlib/sys.mli +++ b/stdlib/sys.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) @@ -199,7 +199,7 @@ val catch_break : bool -> unit val ocaml_version : string;; -(** [ocaml_version] is the version of Objective Caml. +(** [ocaml_version] is the version of OCaml. It is a string of the form ["major.minor[.patchlevel][+additional-info]"], where [major], [minor], and [patchlevel] are integers, and [additional-info] is an arbitrary string. The [[.patchlevel]] and diff --git a/stdlib/sys.mlp b/stdlib/sys.mlp index b58ca0bb3..b83cbb287 100644 --- a/stdlib/sys.mlp +++ b/stdlib/sys.mlp @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/stdlib/weak.ml b/stdlib/weak.ml index 4adacd8e4..bbd3debc4 100644 --- a/stdlib/weak.ml +++ b/stdlib/weak.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/stdlib/weak.mli b/stdlib/weak.mli index 33f4bf1d0..add9b0abb 100644 --- a/stdlib/weak.mli +++ b/stdlib/weak.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/testsuite/interactive/lib-gc/alloc.ml b/testsuite/interactive/lib-gc/alloc.ml index ea103e42a..dbcb3e4fd 100644 --- a/testsuite/interactive/lib-gc/alloc.ml +++ b/testsuite/interactive/lib-gc/alloc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Para, INRIA Rocquencourt *) (* *) diff --git a/testsuite/interactive/lib-graph-2/graph_test.ml b/testsuite/interactive/lib-graph-2/graph_test.ml index 217e2fa56..39b845675 100644 --- a/testsuite/interactive/lib-graph-2/graph_test.ml +++ b/testsuite/interactive/lib-graph-2/graph_test.ml @@ -1,13 +1,12 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Pierre Weis, projet Cristal, INRIA Rocquencourt *) (* *) (* Copyright 2000 Institut National de Recherche en Informatique et *) (* en Automatique. All rights reserved. This file is distributed *) -(* under the terms of the GNU Library General Public License, with *) -(* the special exception on linking described in file ../../LICENSE. *) +(* under the terms of the Q Public License version 1.0. *) (* *) (***********************************************************************) diff --git a/testsuite/lib/testing.ml b/testsuite/lib/testing.ml index 2015aa147..aa8933a78 100644 --- a/testsuite/lib/testing.ml +++ b/testsuite/lib/testing.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Pierre Weis, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/lib/testing.mli b/testsuite/lib/testing.mli index 6f47d2a3e..18b2ea037 100644 --- a/testsuite/lib/testing.mli +++ b/testsuite/lib/testing.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Pierre Weis, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/alpha.S b/testsuite/tests/asmcomp/alpha.S index d8851065c..10e338863 100644 --- a/testsuite/tests/asmcomp/alpha.S +++ b/testsuite/tests/asmcomp/alpha.S @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/testsuite/tests/asmcomp/amd64.S b/testsuite/tests/asmcomp/amd64.S index 8df6e2d20..26db8722a 100644 --- a/testsuite/tests/asmcomp/amd64.S +++ b/testsuite/tests/asmcomp/amd64.S @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/testsuite/tests/asmcomp/arith.cmm b/testsuite/tests/asmcomp/arith.cmm index f4efefdbe..a8bc613c7 100644 --- a/testsuite/tests/asmcomp/arith.cmm +++ b/testsuite/tests/asmcomp/arith.cmm @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/arm.S b/testsuite/tests/asmcomp/arm.S index 186d70614..0fd1a29fe 100644 --- a/testsuite/tests/asmcomp/arm.S +++ b/testsuite/tests/asmcomp/arm.S @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/testsuite/tests/asmcomp/checkbound.cmm b/testsuite/tests/asmcomp/checkbound.cmm index 995b74f8a..c20740c11 100644 --- a/testsuite/tests/asmcomp/checkbound.cmm +++ b/testsuite/tests/asmcomp/checkbound.cmm @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/fib.cmm b/testsuite/tests/asmcomp/fib.cmm index b7e64d302..d21260448 100644 --- a/testsuite/tests/asmcomp/fib.cmm +++ b/testsuite/tests/asmcomp/fib.cmm @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/hppa.S b/testsuite/tests/asmcomp/hppa.S index 2b1ab21c6..02f457dc7 100644 --- a/testsuite/tests/asmcomp/hppa.S +++ b/testsuite/tests/asmcomp/hppa.S @@ -1,6 +1,6 @@ ;********************************************************************* ;* * -;* Objective Caml * +;* OCaml * ;* * ;* Xavier Leroy, projet Cristal, INRIA Rocquencourt * ;* * diff --git a/testsuite/tests/asmcomp/i386.S b/testsuite/tests/asmcomp/i386.S index f4b65e57a..fc75b1f1f 100644 --- a/testsuite/tests/asmcomp/i386.S +++ b/testsuite/tests/asmcomp/i386.S @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/testsuite/tests/asmcomp/i386nt.asm b/testsuite/tests/asmcomp/i386nt.asm index 66550eb8b..75ae8ce73 100644 --- a/testsuite/tests/asmcomp/i386nt.asm +++ b/testsuite/tests/asmcomp/i386nt.asm @@ -1,6 +1,6 @@ ;********************************************************************* ; -; Objective Caml +; OCaml ; ; Xavier Leroy, projet Cristal, INRIA Rocquencourt ; diff --git a/testsuite/tests/asmcomp/ia64.S b/testsuite/tests/asmcomp/ia64.S index 51361690b..68d649b53 100644 --- a/testsuite/tests/asmcomp/ia64.S +++ b/testsuite/tests/asmcomp/ia64.S @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/testsuite/tests/asmcomp/integr.cmm b/testsuite/tests/asmcomp/integr.cmm index 481dd7587..504bb0db5 100644 --- a/testsuite/tests/asmcomp/integr.cmm +++ b/testsuite/tests/asmcomp/integr.cmm @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/lexcmm.mli b/testsuite/tests/asmcomp/lexcmm.mli index a28a57c52..a4998ca12 100644 --- a/testsuite/tests/asmcomp/lexcmm.mli +++ b/testsuite/tests/asmcomp/lexcmm.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/lexcmm.mll b/testsuite/tests/asmcomp/lexcmm.mll index 0e8432e1c..eb2f2c829 100644 --- a/testsuite/tests/asmcomp/lexcmm.mll +++ b/testsuite/tests/asmcomp/lexcmm.mll @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/m68k.S b/testsuite/tests/asmcomp/m68k.S index 436e65e69..f15ddcbb4 100644 --- a/testsuite/tests/asmcomp/m68k.S +++ b/testsuite/tests/asmcomp/m68k.S @@ -1,6 +1,6 @@ |*********************************************************************** |* * -|* Objective Caml * +|* OCaml * |* * |* Xavier Leroy, projet Cristal, INRIA Rocquencourt * |* * diff --git a/testsuite/tests/asmcomp/main.c b/testsuite/tests/asmcomp/main.c index e45c8c27c..33fd8a98a 100644 --- a/testsuite/tests/asmcomp/main.c +++ b/testsuite/tests/asmcomp/main.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/testsuite/tests/asmcomp/main.ml b/testsuite/tests/asmcomp/main.ml index d6207102a..0555daed8 100644 --- a/testsuite/tests/asmcomp/main.ml +++ b/testsuite/tests/asmcomp/main.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/mainarith.c b/testsuite/tests/asmcomp/mainarith.c index 95a923d8b..a71be4961 100644 --- a/testsuite/tests/asmcomp/mainarith.c +++ b/testsuite/tests/asmcomp/mainarith.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/testsuite/tests/asmcomp/mips.s b/testsuite/tests/asmcomp/mips.s index 9fe9f94b6..ec6931bf7 100644 --- a/testsuite/tests/asmcomp/mips.s +++ b/testsuite/tests/asmcomp/mips.s @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/testsuite/tests/asmcomp/parsecmm.mly b/testsuite/tests/asmcomp/parsecmm.mly index 79b278b05..87db7a5fe 100644 --- a/testsuite/tests/asmcomp/parsecmm.mly +++ b/testsuite/tests/asmcomp/parsecmm.mly @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/testsuite/tests/asmcomp/parsecmmaux.ml b/testsuite/tests/asmcomp/parsecmmaux.ml index 8c46888c6..5aa2ea05b 100644 --- a/testsuite/tests/asmcomp/parsecmmaux.ml +++ b/testsuite/tests/asmcomp/parsecmmaux.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/parsecmmaux.mli b/testsuite/tests/asmcomp/parsecmmaux.mli index 558996552..d488db1f5 100644 --- a/testsuite/tests/asmcomp/parsecmmaux.mli +++ b/testsuite/tests/asmcomp/parsecmmaux.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/power-aix.S b/testsuite/tests/asmcomp/power-aix.S index 96ed2b92d..ee8a09698 100644 --- a/testsuite/tests/asmcomp/power-aix.S +++ b/testsuite/tests/asmcomp/power-aix.S @@ -1,6 +1,6 @@ #********************************************************************* #* * -#* Objective Caml * +#* OCaml * #* * #* Xavier Leroy, projet Cristal, INRIA Rocquencourt * #* * diff --git a/testsuite/tests/asmcomp/power-elf.S b/testsuite/tests/asmcomp/power-elf.S index 994a9fa7b..7fee4aa1b 100644 --- a/testsuite/tests/asmcomp/power-elf.S +++ b/testsuite/tests/asmcomp/power-elf.S @@ -1,6 +1,6 @@ /*********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/testsuite/tests/asmcomp/power-rhapsody.S b/testsuite/tests/asmcomp/power-rhapsody.S index b45610586..06788a8c4 100644 --- a/testsuite/tests/asmcomp/power-rhapsody.S +++ b/testsuite/tests/asmcomp/power-rhapsody.S @@ -1,6 +1,6 @@ /*********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/testsuite/tests/asmcomp/quicksort.cmm b/testsuite/tests/asmcomp/quicksort.cmm index 4029da8d1..21b1add57 100644 --- a/testsuite/tests/asmcomp/quicksort.cmm +++ b/testsuite/tests/asmcomp/quicksort.cmm @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/quicksort2.cmm b/testsuite/tests/asmcomp/quicksort2.cmm index eae9809a7..08988573a 100644 --- a/testsuite/tests/asmcomp/quicksort2.cmm +++ b/testsuite/tests/asmcomp/quicksort2.cmm @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/soli.cmm b/testsuite/tests/asmcomp/soli.cmm index 47ce64c0b..af4d39fc6 100644 --- a/testsuite/tests/asmcomp/soli.cmm +++ b/testsuite/tests/asmcomp/soli.cmm @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/sparc.S b/testsuite/tests/asmcomp/sparc.S index 9a829e173..5f83bf0f2 100644 --- a/testsuite/tests/asmcomp/sparc.S +++ b/testsuite/tests/asmcomp/sparc.S @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/testsuite/tests/asmcomp/tagged-fib.cmm b/testsuite/tests/asmcomp/tagged-fib.cmm index e5e45b0fb..5ee234d9f 100644 --- a/testsuite/tests/asmcomp/tagged-fib.cmm +++ b/testsuite/tests/asmcomp/tagged-fib.cmm @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/tagged-integr.cmm b/testsuite/tests/asmcomp/tagged-integr.cmm index df46813eb..6f7562878 100644 --- a/testsuite/tests/asmcomp/tagged-integr.cmm +++ b/testsuite/tests/asmcomp/tagged-integr.cmm @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/tagged-quicksort.cmm b/testsuite/tests/asmcomp/tagged-quicksort.cmm index b519e5cef..73fca1017 100644 --- a/testsuite/tests/asmcomp/tagged-quicksort.cmm +++ b/testsuite/tests/asmcomp/tagged-quicksort.cmm @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/tagged-tak.cmm b/testsuite/tests/asmcomp/tagged-tak.cmm index fe9e6eb02..2bda22385 100644 --- a/testsuite/tests/asmcomp/tagged-tak.cmm +++ b/testsuite/tests/asmcomp/tagged-tak.cmm @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/asmcomp/tak.cmm b/testsuite/tests/asmcomp/tak.cmm index cd61ec89b..26bbd9681 100644 --- a/testsuite/tests/asmcomp/tak.cmm +++ b/testsuite/tests/asmcomp/tak.cmm @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/basic-more/tformat.ml b/testsuite/tests/basic-more/tformat.ml index d02cb2907..77d30ac34 100644 --- a/testsuite/tests/basic-more/tformat.ml +++ b/testsuite/tests/basic-more/tformat.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Pierre Weis, projet Estime, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/basic/maps.ml b/testsuite/tests/basic/maps.ml index c23f2d8c1..ffbaa041c 100644 --- a/testsuite/tests/basic/maps.ml +++ b/testsuite/tests/basic/maps.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/basic/sets.ml b/testsuite/tests/basic/sets.ml index 983145ee4..f2fa158c3 100644 --- a/testsuite/tests/basic/sets.ml +++ b/testsuite/tests/basic/sets.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/lib-bigarray/fftba.ml b/testsuite/tests/lib-bigarray/fftba.ml index 17465df5c..10c22f1db 100644 --- a/testsuite/tests/lib-bigarray/fftba.ml +++ b/testsuite/tests/lib-bigarray/fftba.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/lib-scanf/tscanf.ml b/testsuite/tests/lib-scanf/tscanf.ml index 89b188b46..d929eb747 100644 --- a/testsuite/tests/lib-scanf/tscanf.ml +++ b/testsuite/tests/lib-scanf/tscanf.ml @@ -1,6 +1,6 @@ (*************************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Pierre Weis, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc-kb/equations.ml b/testsuite/tests/misc-kb/equations.ml index a7ea9a03b..5617bc4f9 100644 --- a/testsuite/tests/misc-kb/equations.ml +++ b/testsuite/tests/misc-kb/equations.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc-kb/equations.mli b/testsuite/tests/misc-kb/equations.mli index 45d790260..0db190b85 100644 --- a/testsuite/tests/misc-kb/equations.mli +++ b/testsuite/tests/misc-kb/equations.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc-kb/kb.ml b/testsuite/tests/misc-kb/kb.ml index 590f4cd5d..ff357b3ff 100644 --- a/testsuite/tests/misc-kb/kb.ml +++ b/testsuite/tests/misc-kb/kb.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc-kb/kb.mli b/testsuite/tests/misc-kb/kb.mli index 59b60e4ea..27aa2e986 100644 --- a/testsuite/tests/misc-kb/kb.mli +++ b/testsuite/tests/misc-kb/kb.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc-kb/kbmain.ml b/testsuite/tests/misc-kb/kbmain.ml index 0a5da2fb6..580b71504 100644 --- a/testsuite/tests/misc-kb/kbmain.ml +++ b/testsuite/tests/misc-kb/kbmain.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc-kb/orderings.ml b/testsuite/tests/misc-kb/orderings.ml index 11a776ba7..c81746e30 100644 --- a/testsuite/tests/misc-kb/orderings.ml +++ b/testsuite/tests/misc-kb/orderings.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc-kb/orderings.mli b/testsuite/tests/misc-kb/orderings.mli index d7abfd564..bb44f0832 100644 --- a/testsuite/tests/misc-kb/orderings.mli +++ b/testsuite/tests/misc-kb/orderings.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc-kb/terms.ml b/testsuite/tests/misc-kb/terms.ml index dba700064..86604f9c5 100644 --- a/testsuite/tests/misc-kb/terms.ml +++ b/testsuite/tests/misc-kb/terms.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc-kb/terms.mli b/testsuite/tests/misc-kb/terms.mli index 7d22e9cb0..0f6be4c8e 100644 --- a/testsuite/tests/misc-kb/terms.mli +++ b/testsuite/tests/misc-kb/terms.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc-unsafe/almabench.ml b/testsuite/tests/misc-unsafe/almabench.ml index b21304729..73293e9ad 100644 --- a/testsuite/tests/misc-unsafe/almabench.ml +++ b/testsuite/tests/misc-unsafe/almabench.ml @@ -1,6 +1,6 @@ (* * ALMABENCH 1.0.1 - * Objective Caml version + * OCaml version * * A number-crunching benchmark designed for cross-language and vendor * comparisons. diff --git a/testsuite/tests/misc-unsafe/fft.ml b/testsuite/tests/misc-unsafe/fft.ml index 0907cdee3..f0a2ed328 100644 --- a/testsuite/tests/misc-unsafe/fft.ml +++ b/testsuite/tests/misc-unsafe/fft.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc-unsafe/quicksort.ml b/testsuite/tests/misc-unsafe/quicksort.ml index 7449488d2..d5d8fb4dd 100644 --- a/testsuite/tests/misc-unsafe/quicksort.ml +++ b/testsuite/tests/misc-unsafe/quicksort.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc-unsafe/soli.ml b/testsuite/tests/misc-unsafe/soli.ml index aba79b15b..163939860 100644 --- a/testsuite/tests/misc-unsafe/soli.ml +++ b/testsuite/tests/misc-unsafe/soli.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc/bdd.ml b/testsuite/tests/misc/bdd.ml index 8452b8c64..ddf99a729 100644 --- a/testsuite/tests/misc/bdd.ml +++ b/testsuite/tests/misc/bdd.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc/boyer.ml b/testsuite/tests/misc/boyer.ml index c5e829ff2..4f4e08130 100644 --- a/testsuite/tests/misc/boyer.ml +++ b/testsuite/tests/misc/boyer.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc/fib.ml b/testsuite/tests/misc/fib.ml index 7fad4bfdb..4160004ea 100644 --- a/testsuite/tests/misc/fib.ml +++ b/testsuite/tests/misc/fib.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc/hamming.ml b/testsuite/tests/misc/hamming.ml index 7216ddb0d..872454401 100644 --- a/testsuite/tests/misc/hamming.ml +++ b/testsuite/tests/misc/hamming.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Damien Doligez, projet Moscova, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc/nucleic.ml b/testsuite/tests/misc/nucleic.ml index e3adfd622..b35360a88 100644 --- a/testsuite/tests/misc/nucleic.ml +++ b/testsuite/tests/misc/nucleic.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc/sieve.ml b/testsuite/tests/misc/sieve.ml index 994a4087d..7f0295bb6 100644 --- a/testsuite/tests/misc/sieve.ml +++ b/testsuite/tests/misc/sieve.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc/takc.ml b/testsuite/tests/misc/takc.ml index 8e49f2484..8f9400ebd 100644 --- a/testsuite/tests/misc/takc.ml +++ b/testsuite/tests/misc/takc.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/misc/taku.ml b/testsuite/tests/misc/taku.ml index 555fb01c8..31e617eed 100644 --- a/testsuite/tests/misc/taku.ml +++ b/testsuite/tests/misc/taku.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/tool-lexyacc/gram_aux.ml b/testsuite/tests/tool-lexyacc/gram_aux.ml index b84d8588a..c00fa9bfe 100644 --- a/testsuite/tests/tool-lexyacc/gram_aux.ml +++ b/testsuite/tests/tool-lexyacc/gram_aux.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/tool-lexyacc/grammar.mly b/testsuite/tests/tool-lexyacc/grammar.mly index 8c1e4db94..8d1346f8e 100644 --- a/testsuite/tests/tool-lexyacc/grammar.mly +++ b/testsuite/tests/tool-lexyacc/grammar.mly @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/testsuite/tests/tool-lexyacc/input b/testsuite/tests/tool-lexyacc/input index 6793cb874..b6fdfee8d 100644 --- a/testsuite/tests/tool-lexyacc/input +++ b/testsuite/tests/tool-lexyacc/input @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/tool-lexyacc/lexgen.ml b/testsuite/tests/tool-lexyacc/lexgen.ml index bbd729b0f..d4b6f9a96 100644 --- a/testsuite/tests/tool-lexyacc/lexgen.ml +++ b/testsuite/tests/tool-lexyacc/lexgen.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/tool-lexyacc/main.ml b/testsuite/tests/tool-lexyacc/main.ml index d18a4886d..a9337d4b9 100644 --- a/testsuite/tests/tool-lexyacc/main.ml +++ b/testsuite/tests/tool-lexyacc/main.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/tool-lexyacc/output.ml b/testsuite/tests/tool-lexyacc/output.ml index 09c66b687..141510c44 100644 --- a/testsuite/tests/tool-lexyacc/output.ml +++ b/testsuite/tests/tool-lexyacc/output.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/tool-lexyacc/scan_aux.ml b/testsuite/tests/tool-lexyacc/scan_aux.ml index c449b13a5..7c796f353 100644 --- a/testsuite/tests/tool-lexyacc/scan_aux.ml +++ b/testsuite/tests/tool-lexyacc/scan_aux.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/tool-lexyacc/scanner.mll b/testsuite/tests/tool-lexyacc/scanner.mll index 131272fdd..f791feaf2 100644 --- a/testsuite/tests/tool-lexyacc/scanner.mll +++ b/testsuite/tests/tool-lexyacc/scanner.mll @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/testsuite/tests/tool-lexyacc/syntax.ml b/testsuite/tests/tool-lexyacc/syntax.ml index ff704cd2f..e2ff025ee 100644 --- a/testsuite/tests/tool-lexyacc/syntax.ml +++ b/testsuite/tests/tool-lexyacc/syntax.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/tools/Makefile b/tools/Makefile index bad14c7e5..754af2a04 100644 --- a/tools/Makefile +++ b/tools/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/tools/Makefile.nt b/tools/Makefile.nt index b90c0c4f6..7331ed06e 100644 --- a/tools/Makefile.nt +++ b/tools/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/tools/Makefile.shared b/tools/Makefile.shared index 32049eab1..31cbb6a08 100644 --- a/tools/Makefile.shared +++ b/tools/Makefile.shared @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/tools/addlabels.ml b/tools/addlabels.ml index 6a297b9e8..db8ecdc9a 100644 --- a/tools/addlabels.ml +++ b/tools/addlabels.ml @@ -1,3 +1,16 @@ +(***********************************************************************) +(* *) +(* OCaml *) +(* *) +(* Jacques Garrigue, Kyoto University RIMS *) +(* *) +(* Copyright 2001 Institut National de Recherche en Informatique et *) +(* en Automatique and Kyoto University. All rights reserved. *) +(* This file is distributed under the terms of the Q Public License *) +(* version 1.0. *) +(* *) +(***********************************************************************) + (* $Id$ *) open StdLabels diff --git a/tools/checkstack.c b/tools/checkstack.c index fc760945f..9289c678c 100644 --- a/tools/checkstack.c +++ b/tools/checkstack.c @@ -1,13 +1,12 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Damien Doligez, projet Moscova, INRIA Rocquencourt */ /* */ /* Copyright 2002 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ -/* under the terms of the GNU Library General Public License, with */ -/* the special exception on linking described in file ../../LICENSE. */ +/* under the terms of the Q Public License version 1.0. */ /* */ /***********************************************************************/ diff --git a/tools/cleanup-header b/tools/cleanup-header index 6c320fb39..bc64f2e92 100644 --- a/tools/cleanup-header +++ b/tools/cleanup-header @@ -1,4 +1,17 @@ #!/bin/sed -f + +####################################################################### +# # +# OCaml # +# # +# Xavier Leroy, projet Cristal, INRIA Rocquencourt # +# # +# Copyright 2002 Institut National de Recherche en Informatique et # +# en Automatique. All rights reserved. This file is distributed # +# under the terms of the Q Public License version 1.0. # +# # +####################################################################### + # Remove private parts from runtime include files, before installation # in /usr/local/lib/ocaml/caml diff --git a/tools/cvt_emit.mll b/tools/cvt_emit.mll index 3e28ae972..eabd1baf1 100644 --- a/tools/cvt_emit.mll +++ b/tools/cvt_emit.mll @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/tools/depend.ml b/tools/depend.ml index 4a0da760b..2a8fc21d8 100644 --- a/tools/depend.ml +++ b/tools/depend.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/tools/depend.mli b/tools/depend.mli index a13870610..7c6d0c01d 100644 --- a/tools/depend.mli +++ b/tools/depend.mli @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/tools/dumpobj.ml b/tools/dumpobj.ml index 2a054ee68..18f8bf82e 100644 --- a/tools/dumpobj.ml +++ b/tools/dumpobj.ml @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/tools/lexer299.mll b/tools/lexer299.mll index 9a244721d..38241af0a 100644 --- a/tools/lexer299.mll +++ b/tools/lexer299.mll @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/tools/lexer301.mll b/tools/lexer301.mll index daec549e7..4548de57e 100644 --- a/tools/lexer301.mll +++ b/tools/lexer301.mll @@ -1,6 +1,6 @@ (***********************************************************************) (* *) -(* Objective Caml *) +(* OCaml *) (* *) (* Xavier Leroy, projet Cristal, INRIA Rocquencourt *) (* *) diff --git a/tools/magic b/tools/magic index 7468066e0..089f169a1 100644 --- a/tools/magic +++ b/tools/magic @@ -1,7 +1,7 @@ # Here are some definitions that can be added to the /usr/share/magic # database so that the file(1) command recognizes OCaml compiled files. # Contributed by Sven Luther. -0 string Caml1999 Objective Caml +0 string Caml1999 OCaml >8 string X bytecode executable >8 string I interface data (.cmi) >8 string O bytecode object data (.cmo) diff --git a/tools/make-package-macosx b/tools/make-package-macosx index ebdf0eba2..222df8221 100755 --- a/tools/make-package-macosx +++ b/tools/make-package-macosx @@ -2,7 +2,7 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Damien Doligez, projet Moscova, INRIA Rocquencourt # # # @@ -30,9 +30,9 @@ cat >Description.plist <IFPkgDescriptionDeleteWarning IFPkgDescriptionDescription - The Objective Caml compiler and tools + The OCaml compiler and tools IFPkgDescriptionTitle - Objective Caml + OCaml IFPkgDescriptionVersion ${VERSION} @@ -46,11 +46,11 @@ cat >Info.plist < CFBundleGetInfoString - Objective Caml ${VERSION} + OCaml ${VERSION} CFBundleIdentifier fr.inria.ocaml CFBundleName - Objective Caml + OCaml CFBundleShortVersionString ${VERSION} IFMajorVersion @@ -85,7 +85,7 @@ mkdir -p resources # stop here -> | cat >resources/ReadMe.txt <LineCount < 0) || (edBuf->Lines == NULL)) - { - edBuf->LineCount = 0; - } + // perform edit buffer sanity checks + if((edBuf->LineCount < 0) || (edBuf->Lines == NULL)) + { + edBuf->LineCount = 0; + } - // move to the end of the line list in the edit buffer - if((tail = edBuf->Lines) != NULL) - for( ; tail->Next != NULL; tail = tail->Next); + // move to the end of the line list in the edit buffer + if((tail = edBuf->Lines) != NULL) + for( ; tail->Next != NULL; tail = tail->Next); - // create the new line entry - newline = (LineList*)SafeMalloc(sizeof(LineList)); - newline->Next = NULL; - newline->Prev = tail; - newline->Text = (char*)SafeMalloc(strlen(line)+1); - strncpy(newline->Text, line, strlen(line)+1); - newline->Text[strlen(line)] = '\0'; + // create the new line entry + newline = (LineList*)SafeMalloc(sizeof(LineList)); + newline->Next = NULL; + newline->Prev = tail; + newline->Text = (char*)SafeMalloc(strlen(line)+1); + strncpy(newline->Text, line, strlen(line)+1); + newline->Text[strlen(line)] = '\0'; - // add it to the list as the head or the tail - if(tail != NULL) - { - tail->Next = newline; - } else { - edBuf->Lines = newline; - } + // add it to the list as the head or the tail + if(tail != NULL) + { + tail->Next = newline; + } else { + edBuf->Lines = newline; + } - // update the number of lines in the buffer - edBuf->LineCount++; + // update the number of lines in the buffer + edBuf->LineCount++; - return TRUE; + return TRUE; } /*------------------------------------------------------------------------ Procedure: editbuffer_updateline ID:1 - Author: Chris Watford watford@uiuc.edu + Author: Chris Watford watford@uiuc.edu Purpose: Updates the edit buffer's internal contents for a line - Input: idx - Line index - line - String to add - Output: if the line was updated or not + Input: idx - Line index + line - String to add + Output: if the line was updated or not Errors: ------------------------------------------------------------------------*/ BOOL editbuffer_updateline(EditBuffer* edBuf, int idx, char* line) { - LineList *update = edBuf->Lines; //head of the edit buffer line list - LineList *newline = NULL; - int i; + LineList *update = edBuf->Lines; //head of the edit buffer line list + LineList *newline = NULL; + int i; - // sanity checks - if(edBuf == NULL) - { - return FALSE; - } else if( (edBuf->LineCount == 0) || - (edBuf->Lines == NULL) || - (idx >= edBuf->LineCount) || - (idx < 0) ) { - return FALSE; - } + // sanity checks + if(edBuf == NULL) + { + return FALSE; + } else if( (edBuf->LineCount == 0) || + (edBuf->Lines == NULL) || + (idx >= edBuf->LineCount) || + (idx < 0) ) { + return FALSE; + } - // move to the index in the line list - // i left in update != NULL as a sanity check - for(i = 0; ((update != NULL) && (i != idx)); update = update->Next, i++); + // move to the index in the line list + // i left in update != NULL as a sanity check + for(i = 0; ((update != NULL) && (i != idx)); update = update->Next, i++); - // did things mess up? - if( (update == NULL) || (i != idx) ) - { - return FALSE; - } + // did things mess up? + if( (update == NULL) || (i != idx) ) + { + return FALSE; + } - // get rid of the old line - free(update->Text); + // get rid of the old line + free(update->Text); - // get the new line updated - update->Text = (char*)SafeMalloc(strlen(line)+1); - strncpy(update->Text, line, strlen(line)+1); - update->Text[strlen(line)] = '\0'; + // get the new line updated + update->Text = (char*)SafeMalloc(strlen(line)+1); + strncpy(update->Text, line, strlen(line)+1); + update->Text[strlen(line)] = '\0'; - return TRUE; + return TRUE; } /*------------------------------------------------------------------------ Procedure: editbuffer_updateoraddline ID:1 - Author: Chris Watford watford@uiuc.edu + Author: Chris Watford watford@uiuc.edu Purpose: Updates the edit buffer's internal contents for a line - Input: idx - Line index - line - String to add - Output: if the line was updated or not + Input: idx - Line index + line - String to add + Output: if the line was updated or not Errors: ------------------------------------------------------------------------*/ BOOL editbuffer_updateoraddline(EditBuffer* edBuf, int idx, char* line) { - LineList *update; + LineList *update; - // sanity checks - if(edBuf == NULL) - { - return FALSE; - } else if((idx > edBuf->LineCount) || (idx < 0)) { - return FALSE; - } + // sanity checks + if(edBuf == NULL) + { + return FALSE; + } else if((idx > edBuf->LineCount) || (idx < 0)) { + return FALSE; + } - update = edBuf->Lines; //head of the edit buffer line list + update = edBuf->Lines; //head of the edit buffer line list - // do we update or add? - if((idx < edBuf->LineCount) && (edBuf->Lines != NULL)) - { //interior line, update - return editbuffer_updateline(edBuf, idx, line); - } else { - //fence line, add - return editbuffer_addline(edBuf, line); - } + // do we update or add? + if((idx < edBuf->LineCount) && (edBuf->Lines != NULL)) + { //interior line, update + return editbuffer_updateline(edBuf, idx, line); + } else { + //fence line, add + return editbuffer_addline(edBuf, line); + } } /*------------------------------------------------------------------------ Procedure: editbuffer_removeline ID:1 - Author: Chris Watford watford@uiuc.edu + Author: Chris Watford watford@uiuc.edu Purpose: Removes a line from the edit buffer - Input: idx - Line index to remove - Output: if the line was removed or not + Input: idx - Line index to remove + Output: if the line was removed or not Errors: -------------------------------------------------------------------------- Edit History: - 18 Sept 2003 - Chris Watford watford@uiuc.edu - - Added to allow backspace and delete support - - Corrected doubly linked list issue + 18 Sept 2003 - Chris Watford watford@uiuc.edu + - Added to allow backspace and delete support + - Corrected doubly linked list issue ------------------------------------------------------------------------*/ BOOL editbuffer_removeline(EditBuffer* edBuf, int idx) { - LineList *update = NULL; - int i = 0; + LineList *update = NULL; + int i = 0; - // sanity checks - if(edBuf == NULL) - { - return FALSE; - } else if( (edBuf->LineCount == 0) || - (edBuf->Lines == NULL) || - (idx >= edBuf->LineCount) || - (idx < 0) ) { - return FALSE; - } - - // move to the index in the line list - // i left in update != NULL as a sanity check - for(i = 0, update = edBuf->Lines; ((update != NULL) && (i != idx)); update = update->Next, i++); + // sanity checks + if(edBuf == NULL) + { + return FALSE; + } else if( (edBuf->LineCount == 0) || + (edBuf->Lines == NULL) || + (idx >= edBuf->LineCount) || + (idx < 0) ) { + return FALSE; + } - // remove this line - if(update != NULL) - { - // break links, removing our line - if(update->Prev != NULL) - { - // we're not the first so just break the link - update->Prev->Next = update->Next; - - // fix the prev check - if(update->Next != NULL) - update->Next->Prev = update->Prev; - } else { - // we're the first, attach the next guy to lines - edBuf->Lines = update->Next; - } + // move to the index in the line list + // i left in update != NULL as a sanity check + for(i = 0, update = edBuf->Lines; ((update != NULL) && (i != idx)); update = update->Next, i++); - // one less line to worry about - edBuf->LineCount--; + // remove this line + if(update != NULL) + { + // break links, removing our line + if(update->Prev != NULL) + { + // we're not the first so just break the link + update->Prev->Next = update->Next; - // get rid of the text - if(update->Text != NULL) - free(update->Text); + // fix the prev check + if(update->Next != NULL) + update->Next->Prev = update->Prev; + } else { + // we're the first, attach the next guy to lines + edBuf->Lines = update->Next; + } - // get rid of us - free(update); + // one less line to worry about + edBuf->LineCount--; - return TRUE; - } + // get rid of the text + if(update->Text != NULL) + free(update->Text); - return FALSE; + // get rid of us + free(update); + + return TRUE; + } + + return FALSE; } /*------------------------------------------------------------------------ Procedure: editbuffer_getasline ID:1 - Author: Chris Watford watford@uiuc.edu + Author: Chris Watford watford@uiuc.edu Purpose: Returns the edit buffer as one big line, \n's and \t's - become spaces. + become spaces. Input: Output: Errors: ------------------------------------------------------------------------*/ char* editbuffer_getasline(EditBuffer* edBuf) { - LineList *line = NULL; //head of the edit buffer line list - char* retline = (char*)realloc(NULL, 1); - unsigned int i = 0; + LineList *line = NULL; //head of the edit buffer line list + char* retline = (char*)realloc(NULL, 1); + unsigned int i = 0; - // fix retline bug - retline[0] = '\0'; + // fix retline bug + retline[0] = '\0'; - // sanity checks - if(edBuf == NULL) - { - return NULL; - } else if (edBuf->LineCount == 0 || edBuf->Lines == NULL) { - // fix any possible errors that may come from this - edBuf->LineCount = 0; - edBuf->Lines = NULL; - return NULL; - } + // sanity checks + if(edBuf == NULL) + { + return NULL; + } else if (edBuf->LineCount == 0 || edBuf->Lines == NULL) { + // fix any possible errors that may come from this + edBuf->LineCount = 0; + edBuf->Lines = NULL; + return NULL; + } - // get the big line - for(line = edBuf->Lines; line != NULL; line = line->Next) - { - if(line->Text != NULL) - { - retline = (char*)realloc(retline, (strlen(retline) + strlen(line->Text) + (strlen(retline) > 0 ? 2 : 1))); + // get the big line + for(line = edBuf->Lines; line != NULL; line = line->Next) + { + if(line->Text != NULL) + { + retline = (char*)realloc(retline, (strlen(retline) + strlen(line->Text) + (strlen(retline) > 0 ? 2 : 1))); - if(strlen(retline) > 0) - retline = strcat(retline, " "); + if(strlen(retline) > 0) + retline = strcat(retline, " "); - retline = strcat(retline, line->Text); + retline = strcat(retline, line->Text); - //concat in the hoouuusssseee! - } - } + //concat in the hoouuusssseee! + } + } - // now we have the big line, so lets ditch all \n's \t's and \r's - for(i = 0; i < strlen(retline); i++) - { - switch(retline[i]) - { - case '\n': - case '\t': - case '\r': - retline[i] = ' '; - } - } + // now we have the big line, so lets ditch all \n's \t's and \r's + for(i = 0; i < strlen(retline); i++) + { + switch(retline[i]) + { + case '\n': + case '\t': + case '\r': + retline[i] = ' '; + } + } - return retline; + return retline; } /*------------------------------------------------------------------------ Procedure: editbuffer_getasbuffer ID:1 - Author: Chris Watford watford@uiuc.edu + Author: Chris Watford watford@uiuc.edu Purpose: Returns the edit buffer as one big line, \n's and \t's - become spaces. + become spaces. Input: Output: Errors: ------------------------------------------------------------------------*/ char* editbuffer_getasbuffer(EditBuffer* edBuf) { - LineList *line = NULL; //head of the edit buffer line list - char* retbuf = (char*)realloc(NULL, 1); - unsigned int i = 0; + LineList *line = NULL; //head of the edit buffer line list + char* retbuf = (char*)realloc(NULL, 1); + unsigned int i = 0; - // fix retline bug - retbuf[0] = '\0'; + // fix retline bug + retbuf[0] = '\0'; - // sanity checks - if(edBuf == NULL) - { - return NULL; - } else if (edBuf->LineCount == 0 || edBuf->Lines == NULL) { - // fix any possible errors that may come from this - edBuf->LineCount = 0; - edBuf->Lines = NULL; - return NULL; - } + // sanity checks + if(edBuf == NULL) + { + return NULL; + } else if (edBuf->LineCount == 0 || edBuf->Lines == NULL) { + // fix any possible errors that may come from this + edBuf->LineCount = 0; + edBuf->Lines = NULL; + return NULL; + } - // get the big line - for(line = edBuf->Lines; line != NULL; line = line->Next) - { - if(line->Text != NULL) - { - int len = strlen(retbuf); - len += strlen(line->Text) + (len > 0 ? 3 : 1); + // get the big line + for(line = edBuf->Lines; line != NULL; line = line->Next) + { + if(line->Text != NULL) + { + int len = strlen(retbuf); + len += strlen(line->Text) + (len > 0 ? 3 : 1); - retbuf = (char*)realloc(retbuf, len); + retbuf = (char*)realloc(retbuf, len); - if(strlen(retbuf) > 0) - retbuf = strcat(retbuf, "\r\n"); + if(strlen(retbuf) > 0) + retbuf = strcat(retbuf, "\r\n"); - retbuf = strcat(retbuf, line->Text); + retbuf = strcat(retbuf, line->Text); - retbuf[len-1] = '\0'; + retbuf[len-1] = '\0'; - //concat in the hoouuusssseee! - } - } + //concat in the hoouuusssseee! + } + } - return retbuf; + return retbuf; } /*------------------------------------------------------------------------ Procedure: editbuffer_lastline ID:1 - Author: Chris Watford watford@uiuc.edu + Author: Chris Watford watford@uiuc.edu Purpose: Returns the last line in the edit buffer Input: Output: @@ -344,111 +345,111 @@ char* editbuffer_getasbuffer(EditBuffer* edBuf) ------------------------------------------------------------------------*/ char* editbuffer_lastline(EditBuffer* edBuf) { - LineList *line = NULL; //head of the edit buffer line list + LineList *line = NULL; //head of the edit buffer line list - // sanity checks - if(edBuf == NULL) - { - return NULL; - } else if (edBuf->LineCount == 0 || edBuf->Lines == NULL) { - // fix any possible errors that may come from this - edBuf->LineCount = 0; - edBuf->Lines = NULL; - return NULL; - } + // sanity checks + if(edBuf == NULL) + { + return NULL; + } else if (edBuf->LineCount == 0 || edBuf->Lines == NULL) { + // fix any possible errors that may come from this + edBuf->LineCount = 0; + edBuf->Lines = NULL; + return NULL; + } - // go to the last line - for(line = edBuf->Lines; line->Next != NULL; line = line->Next); + // go to the last line + for(line = edBuf->Lines; line->Next != NULL; line = line->Next); - return line->Text; + return line->Text; } /*------------------------------------------------------------------------ Procedure: editbuffer_copy ID:1 - Author: Chris Watford watford@uiuc.edu + Author: Chris Watford watford@uiuc.edu Purpose: Makes an exact copy of an edit buffer Input: Output: Errors: -------------------------------------------------------------------------- Edit History: - 16 Sept 2003 - Chris Watford watford@uiuc.edu - - Added to make copies of history entries - 18 Sept 2003 - Chris Watford watford@uiuc.edu - - Corrected doubly linked list issue - 06 Oct 2003 - Chris Watford watford@uiuc.edu - - Added isCorrect flag + 16 Sept 2003 - Chris Watford watford@uiuc.edu + - Added to make copies of history entries + 18 Sept 2003 - Chris Watford watford@uiuc.edu + - Corrected doubly linked list issue + 06 Oct 2003 - Chris Watford watford@uiuc.edu + - Added isCorrect flag ------------------------------------------------------------------------*/ EditBuffer* editbuffer_copy(EditBuffer* edBuf) { - // sanity checks - if(edBuf == NULL) - { - return NULL; - } else { - EditBuffer* copy = (EditBuffer*)SafeMalloc(sizeof(EditBuffer)); - LineList* lines = edBuf->Lines; - LineList* lastLine = NULL; + // sanity checks + if(edBuf == NULL) + { + return NULL; + } else { + EditBuffer* copy = (EditBuffer*)SafeMalloc(sizeof(EditBuffer)); + LineList* lines = edBuf->Lines; + LineList* lastLine = NULL; - // clear its initial values - copy->LineCount = 0; - copy->Lines = NULL; - copy->isCorrect = FALSE; + // clear its initial values + copy->LineCount = 0; + copy->Lines = NULL; + copy->isCorrect = FALSE; - // well we don't have to copy much - if((lines == NULL) || (edBuf->LineCount <= 0)) - { - return copy; - } + // well we don't have to copy much + if((lines == NULL) || (edBuf->LineCount <= 0)) + { + return copy; + } - // get if its correct - copy->isCorrect = edBuf->isCorrect; + // get if its correct + copy->isCorrect = edBuf->isCorrect; - // go through each line, malloc it and add it - for( ; lines != NULL; lines = lines->Next) - { - LineList* curline = (LineList*)SafeMalloc(sizeof(LineList)); - curline->Next = NULL; - curline->Prev = NULL; + // go through each line, malloc it and add it + for( ; lines != NULL; lines = lines->Next) + { + LineList* curline = (LineList*)SafeMalloc(sizeof(LineList)); + curline->Next = NULL; + curline->Prev = NULL; - // if there was a last line, link them to us - if(lastLine != NULL) - { - lastLine->Next = curline; - curline->Prev = lastLine; - } + // if there was a last line, link them to us + if(lastLine != NULL) + { + lastLine->Next = curline; + curline->Prev = lastLine; + } - // are we the first line? add us to the edit buffer as the first - if(copy->Lines == NULL) - { - copy->Lines = curline; - } + // are we the first line? add us to the edit buffer as the first + if(copy->Lines == NULL) + { + copy->Lines = curline; + } - // check if there is text on the line - if(lines->Text == NULL) - { // no text, make it blankz0r - curline->Text = (char*)SafeMalloc(sizeof(char)); - curline->Text[0] = '\0'; - } else { - // there is text, copy it and null-terminate - curline->Text = (char*)SafeMalloc(strlen(lines->Text) + 1); - strncpy(curline->Text, lines->Text, strlen(lines->Text)); - curline->Text[strlen(lines->Text)] = '\0'; - } + // check if there is text on the line + if(lines->Text == NULL) + { // no text, make it blankz0r + curline->Text = (char*)SafeMalloc(sizeof(char)); + curline->Text[0] = '\0'; + } else { + // there is text, copy it and null-terminate + curline->Text = (char*)SafeMalloc(strlen(lines->Text) + 1); + strncpy(curline->Text, lines->Text, strlen(lines->Text)); + curline->Text[strlen(lines->Text)] = '\0'; + } - // up the line count and make us the last line - copy->LineCount++; - lastLine = curline; - } + // up the line count and make us the last line + copy->LineCount++; + lastLine = curline; + } - // return our new copy - return copy; - } + // return our new copy + return copy; + } } /*------------------------------------------------------------------------ Procedure: editbuffer_destroy ID:1 - Author: Chris Watford watford@uiuc.edu + Author: Chris Watford watford@uiuc.edu Purpose: Destroys an edit buffer Input: Output: @@ -456,59 +457,59 @@ EditBuffer* editbuffer_copy(EditBuffer* edBuf) ------------------------------------------------------------------------*/ void editbuffer_destroy(EditBuffer* edBuf) { - // sanity checks - if(edBuf == NULL) - { // nothing to do - return; - } else if(edBuf->Lines != NULL) { - LineList* lastline = NULL; + // sanity checks + if(edBuf == NULL) + { // nothing to do + return; + } else if(edBuf->Lines != NULL) { + LineList* lastline = NULL; - // loop through each line free'ing its text - for( ; edBuf->Lines != NULL; edBuf->Lines = edBuf->Lines->Next) - { - if(edBuf->Lines->Text != NULL) - free(edBuf->Lines->Text); + // loop through each line free'ing its text + for( ; edBuf->Lines != NULL; edBuf->Lines = edBuf->Lines->Next) + { + if(edBuf->Lines->Text != NULL) + free(edBuf->Lines->Text); - // if there was a line before us, free it - if(lastline != NULL) - { - free(lastline); - lastline = NULL; - } + // if there was a line before us, free it + if(lastline != NULL) + { + free(lastline); + lastline = NULL; + } - lastline = edBuf->Lines; - } + lastline = edBuf->Lines; + } - // free the last line - free(lastline); - } + // free the last line + free(lastline); + } - // free ourself - free(edBuf); + // free ourself + free(edBuf); } /*------------------------------------------------------------------------ Procedure: editbuffer_new ID:1 - Author: Chris Watford watford@uiuc.edu + Author: Chris Watford watford@uiuc.edu Purpose: Creates an edit buffer Input: Output: Errors: -------------------------------------------------------------------------- Edit History: - 06 Oct 2003 - Chris Watford watford@uiuc.edu - - Added isCorrect flag + 06 Oct 2003 - Chris Watford watford@uiuc.edu + - Added isCorrect flag ------------------------------------------------------------------------*/ EditBuffer* editbuffer_new(void) { - // create a new one - EditBuffer *edBuf = (EditBuffer*)SafeMalloc(sizeof(EditBuffer)); - - // default vals - edBuf->LineCount = 0; - edBuf->Lines = NULL; - edBuf->isCorrect = FALSE; - - // return it - return edBuf; + // create a new one + EditBuffer *edBuf = (EditBuffer*)SafeMalloc(sizeof(EditBuffer)); + + // default vals + edBuf->LineCount = 0; + edBuf->Lines = NULL; + edBuf->isCorrect = FALSE; + + // return it + return edBuf; } diff --git a/win32caml/editbuffer.h b/win32caml/editbuffer.h index 91e2999c3..add99b2ee 100644 --- a/win32caml/editbuffer.h +++ b/win32caml/editbuffer.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Jacob Navia, after Xavier Leroy */ /* */ @@ -22,26 +22,26 @@ // All the below was added by Chris Watford watford@uiuc.edu typedef struct tagLineList { - struct tagLineList *Next; - struct tagLineList *Prev; - char *Text; + struct tagLineList *Next; + struct tagLineList *Prev; + char *Text; } LineList; typedef struct tagEditBuffer { - int LineCount; - struct tagLineList *Lines; - BOOL isCorrect; + int LineCount; + struct tagLineList *Lines; + BOOL isCorrect; } EditBuffer; -BOOL editbuffer_addline (EditBuffer* edBuf, char* line); -BOOL editbuffer_updateline (EditBuffer* edBuf, int idx, char* line); -BOOL editbuffer_updateoraddline (EditBuffer* edBuf, int idx, char* line); -BOOL editbuffer_removeline (EditBuffer* edBuf, int idx); -char* editbuffer_getasline (EditBuffer* edBuf); -char* editbuffer_getasbuffer (EditBuffer* edBuf); -char* editbuffer_lastline (EditBuffer* edBuf); -EditBuffer* editbuffer_copy (EditBuffer* edBuf); -void editbuffer_destroy (EditBuffer* edBuf); -EditBuffer* editbuffer_new (void); +BOOL editbuffer_addline (EditBuffer* edBuf, char* line); +BOOL editbuffer_updateline (EditBuffer* edBuf, int idx, char* line); +BOOL editbuffer_updateoraddline (EditBuffer* edBuf, int idx, char* line); +BOOL editbuffer_removeline (EditBuffer* edBuf, int idx); +char* editbuffer_getasline (EditBuffer* edBuf); +char* editbuffer_getasbuffer (EditBuffer* edBuf); +char* editbuffer_lastline (EditBuffer* edBuf); +EditBuffer* editbuffer_copy (EditBuffer* edBuf); +void editbuffer_destroy (EditBuffer* edBuf); +EditBuffer* editbuffer_new (void); #endif diff --git a/win32caml/history.c b/win32caml/history.c index 11397ac66..9a0003482 100644 --- a/win32caml/history.c +++ b/win32caml/history.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Jacob Navia, after Xavier Leroy */ /* */ @@ -21,78 +21,78 @@ /*------------------------------------------------------------------------ Procedure: AddToHistory ID:2 -Author: Chris Watford watford@uiuc.edu +Author: Chris Watford watford@uiuc.edu Purpose: Adds an edit buffer to the history control -Input: Pointer to the edit buffer to add +Input: Pointer to the edit buffer to add Output: Errors: -------------------------------------------------------------------------- Edit History: - 15 Sept 2003 - Chris Watford watford@uiuc.edu - - Complete rewrite - - Got it to add the edit buffer to the history - 17 Sept 2003 - Chris Watford watford@uiuc.edu - - Added doubly link list support + 15 Sept 2003 - Chris Watford watford@uiuc.edu + - Complete rewrite + - Got it to add the edit buffer to the history + 17 Sept 2003 - Chris Watford watford@uiuc.edu + - Added doubly link list support ------------------------------------------------------------------------*/ void AddToHistory(EditBuffer *edBuf) { - StatementHistory *newLine; + StatementHistory *newLine; - // sanity checks - if(edBuf == NULL) - { - return; - } else if (edBuf->LineCount == 0 || edBuf->Lines == NULL) { - // fix any possible errors that may come from this - edBuf->LineCount = 0; - edBuf->Lines = NULL; - return; - } + // sanity checks + if(edBuf == NULL) + { + return; + } else if (edBuf->LineCount == 0 || edBuf->Lines == NULL) { + // fix any possible errors that may come from this + edBuf->LineCount = 0; + edBuf->Lines = NULL; + return; + } - // setup newline and add as the front of the linked list - newLine = SafeMalloc(sizeof(StatementHistory)); - newLine->Next = History; - newLine->Prev = NULL; - newLine->Statement = edBuf; + // setup newline and add as the front of the linked list + newLine = SafeMalloc(sizeof(StatementHistory)); + newLine->Next = History; + newLine->Prev = NULL; + newLine->Statement = edBuf; - // setup back linking - if(History != NULL) - History->Prev = newLine; + // setup back linking + if(History != NULL) + History->Prev = newLine; - // set the history up - History = newLine; + // set the history up + History = newLine; - // search for the new history tail - for(HistoryTail = (HistoryTail != NULL ? HistoryTail : History); HistoryTail->Next != NULL; HistoryTail = HistoryTail->Next); + // search for the new history tail + for(HistoryTail = (HistoryTail != NULL ? HistoryTail : History); HistoryTail->Next != NULL; HistoryTail = HistoryTail->Next); } /*------------------------------------------------------------------------ Procedure: GetHistoryLine ID:2 -Author: Chris Watford watford@uiuc.edu +Author: Chris Watford watford@uiuc.edu Purpose: Returns an entry from the history table -Input: Index of the history entry to return -Output: The history entry as a single line +Input: Index of the history entry to return +Output: The history entry as a single line Errors: -------------------------------------------------------------------------- Edit History: - 15 Sept 2003 - Chris Watford watford@uiuc.edu - - Complete rewrite - 17 Sept 2003 - Chris Watford watford@uiuc.edu - - Added doubly link list support + 15 Sept 2003 - Chris Watford watford@uiuc.edu + - Complete rewrite + 17 Sept 2003 - Chris Watford watford@uiuc.edu + - Added doubly link list support ------------------------------------------------------------------------*/ char *GetHistoryLine(int n) { - StatementHistory *histentry = History; - int i; + StatementHistory *histentry = History; + int i; - // traverse linked list looking for member n - for (i = 0; ((i < n) && (histentry != NULL)); i++, histentry = histentry->Next); + // traverse linked list looking for member n + for (i = 0; ((i < n) && (histentry != NULL)); i++, histentry = histentry->Next); - // figure out what to return - if (histentry != NULL) - { - return editbuffer_getasline(histentry->Statement); - } else { - return ""; - } + // figure out what to return + if (histentry != NULL) + { + return editbuffer_getasline(histentry->Statement); + } else { + return ""; + } } diff --git a/win32caml/history.h b/win32caml/history.h index a9ba85841..4fceef1fe 100644 --- a/win32caml/history.h +++ b/win32caml/history.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Jacob Navia, after Xavier Leroy */ /* */ @@ -23,13 +23,13 @@ // Simple linked list for holding the history lines typedef struct tagStatementHistory { - struct tagStatementHistory *Next; - struct tagStatementHistory *Prev; - EditBuffer *Statement; + struct tagStatementHistory *Next; + struct tagStatementHistory *Prev; + EditBuffer *Statement; } StatementHistory; -void AddToHistory (EditBuffer *edBuf); -char *GetHistoryLine (int n); +void AddToHistory (EditBuffer *edBuf); +char *GetHistoryLine (int n); static BOOL CALLBACK HistoryDlgProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam); #endif diff --git a/win32caml/inria.h b/win32caml/inria.h index 095cbcc75..325fb38ac 100644 --- a/win32caml/inria.h +++ b/win32caml/inria.h @@ -1,8 +1,9 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Developed by Jacob Navia. */ +/* */ /* Copyright 2001 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ /* under the terms of the GNU Library General Public License, with */ @@ -112,12 +113,12 @@ void RewriteCurrentEditBuffer(void); void RefreshCurrentEditBuffer(void); // **************** User defined window messages ************* -#define WM_NEWLINE (WM_USER+6000) -#define WM_TIMERTICK (WM_USER+6001) -#define WM_QUITOCAML (WM_USER+6002) -#define WM_SYNTAXERROR (WM_USER+6003) -#define WM_UNBOUNDVAL (WM_USER+6004) -#define WM_ILLEGALCHAR (WM_USER+6005) +#define WM_NEWLINE (WM_USER+6000) +#define WM_TIMERTICK (WM_USER+6001) +#define WM_QUITOCAML (WM_USER+6002) +#define WM_SYNTAXERROR (WM_USER+6003) +#define WM_UNBOUNDVAL (WM_USER+6004) +#define WM_ILLEGALCHAR (WM_USER+6005) // ********************** Structures *********************** typedef struct tagPosition { diff --git a/win32caml/libgraph.h b/win32caml/libgraph.h index 3bfaff301..1df232988 100644 --- a/win32caml/libgraph.h +++ b/win32caml/libgraph.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Jacob Navia, after Xavier Leroy */ /* */ diff --git a/win32caml/menu.c b/win32caml/menu.c index 9ab0f5f37..f0dcb5bbe 100644 --- a/win32caml/menu.c +++ b/win32caml/menu.c @@ -1,8 +1,9 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Developed by Jacob Navia. */ +/* */ /* Copyright 2001 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ /* under the terms of the GNU Library General Public License, with */ @@ -396,25 +397,25 @@ void AddLineToControl(char *buf) /*------------------------------------------------------------------------ Procedure: AddStringToControl ID:1 - Author: Chris Watford watford@uiuc.edu + Author: Chris Watford watford@uiuc.edu Purpose: It will ad the given text at the end of the edit control. This simulates user input. The history will not - be modified by this procedure. + be modified by this procedure. Input: The text to be added Output: None Errors: If the line is empty, nothing will be done -------------------------------------------------------------------------- Edit History: - 16 Sept 2003 - Chris Watford watford@uiuc.edu - - Basically this is AddLineToControl, but without appending a - newline + 16 Sept 2003 - Chris Watford watford@uiuc.edu + - Basically this is AddLineToControl, but without appending a + newline ------------------------------------------------------------------------*/ void AddStringToControl(char* buf) { HWND hEditCtrl; - if(buf == NULL) - return; + if(buf == NULL) + return; if((*buf) == 0) return; @@ -451,10 +452,10 @@ static BOOL CALLBACK AboutDlgProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM Errors: -------------------------------------------------------------------------- Edit History: - 15 Sept 2003 - Chris Watford watford@uiuc.edu - - Added support for my StatementHistory structure - - Added the ability to export it as its exact entry, rather than - just a 1 liner + 15 Sept 2003 - Chris Watford watford@uiuc.edu + - Added support for my StatementHistory structure + - Added the ability to export it as its exact entry, rather than + just a 1 liner ------------------------------------------------------------------------*/ static BOOL CALLBACK HistoryDlgProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam) { @@ -468,7 +469,7 @@ static BOOL CALLBACK HistoryDlgProc(HWND hDlg, UINT message, WPARAM wParam, LPAR histentry = History; // get our statement history object idx = 0; - // loop through each history entry adding it to the dialog + // loop through each history entry adding it to the dialog while (histentry != NULL) { SendDlgItemMessage(hDlg,IDLIST,LB_INSERTSTRING,0,(LPARAM)editbuffer_getasline(histentry->Statement)); SendDlgItemMessage(hDlg,IDLIST,LB_SETITEMDATA,0,(LPARAM)idx); @@ -515,8 +516,8 @@ static BOOL CALLBACK HistoryDlgProc(HWND hDlg, UINT message, WPARAM wParam, LPAR error box -------------------------------------------------------------------------- Edit History: - 06 Oct 2003 - Chris Watford watford@uiuc.edu - - Corrected wsprintf error + 06 Oct 2003 - Chris Watford watford@uiuc.edu + - Corrected wsprintf error ------------------------------------------------------------------------*/ static void SaveText(char *fname) { @@ -528,8 +529,8 @@ static void SaveText(char *fname) f = fopen(fname,"wb"); if (f == NULL) - { - // corrected error using wsprintf + { + // corrected error using wsprintf wsprintf(buf, "Impossible to open %s for writing", fname); ShowDbgMsg(buf); @@ -537,11 +538,11 @@ static void SaveText(char *fname) } for (i = 0; i < linesCount; i++) - { + { *(unsigned short *)buf = 8100; len = SendMessage(hEdit, EM_GETLINE, i, (LPARAM)buf); buf[len] = '\0'; - fprintf(f, "%s\r\n", buf+1); + fprintf(f, "%s\r\n", buf+1); //fwrite(buf,1,len+2,f); } @@ -551,9 +552,9 @@ static void SaveText(char *fname) /*------------------------------------------------------------------------ Procedure: SaveML ID:1 - Author: Chris Watford watford@uiuc.edu + Author: Chris Watford watford@uiuc.edu Purpose: Saves the ML source to a file, commenting out functions - that contained errors + that contained errors Input: The name of the file where the session will be saved Output: The session is saved Errors: If it can't open the file for writing it will show an @@ -567,47 +568,47 @@ static void SaveML(char *fname) f = fopen(fname, "wb"); if(f == NULL) - { + { wsprintf(buf, "Impossible to open %s for writing", fname); ShowDbgMsg(buf); return; } - fprintf(f, "(* %s *)\r\n\r\n", fname); + fprintf(f, "(* %s *)\r\n\r\n", fname); - if(History != NULL) - { - StatementHistory *h = NULL; - EditBuffer *stmt = NULL; + if(History != NULL) + { + StatementHistory *h = NULL; + EditBuffer *stmt = NULL; - // get to the end - for(h = History; h->Next != NULL; h = h->Next); + // get to the end + for(h = History; h->Next != NULL; h = h->Next); - // go back :( - // this is NOT the fastest method, BUT this is the easiest - // on the subsystem - for(; h != NULL; h = h->Prev) - { - stmt = h->Statement; + // go back :( + // this is NOT the fastest method, BUT this is the easiest + // on the subsystem + for(; h != NULL; h = h->Prev) + { + stmt = h->Statement; - if(stmt != NULL) - { - // comment out incorrect lines - if(stmt->isCorrect) - { - char *buff = editbuffer_getasbuffer(stmt); - fprintf(f, "%s\r\n", buff); - free(buff); - } else { - char *buff = editbuffer_getasbuffer(stmt); - fprintf(f, "(* Syntax Error or Unbound Value\r\n%s\r\n *)\r\n", buff); - free(buff); - } - } + if(stmt != NULL) + { + // comment out incorrect lines + if(stmt->isCorrect) + { + char *buff = editbuffer_getasbuffer(stmt); + fprintf(f, "%s\r\n", buff); + free(buff); + } else { + char *buff = editbuffer_getasbuffer(stmt); + fprintf(f, "(* Syntax Error or Unbound Value\r\n%s\r\n *)\r\n", buff); + free(buff); + } + } - fprintf(f, "\r\n"); - } - } + fprintf(f, "\r\n"); + } + } fclose(f); free(buf); @@ -615,15 +616,15 @@ static void SaveML(char *fname) /*------------------------------------------------------------------------ Procedure: Add_Clipboard_To_Queue ID:1 - Author: Chris Watford watford@uiuc.edu + Author: Chris Watford watford@uiuc.edu Purpose: Adds the clipboard text to the control Input: Output: Errors: -------------------------------------------------------------------------- Edit History: - 16 Sept 2003 - Chris Watford watford@uiuc.edu - - Added method to update edit buffer with paste contents + 16 Sept 2003 - Chris Watford watford@uiuc.edu + - Added method to update edit buffer with paste contents ------------------------------------------------------------------------*/ static void Add_Clipboard_To_Queue(void) { @@ -636,7 +637,7 @@ static void Add_Clipboard_To_Queue(void) char *str = GlobalLock(hClipData); if (str != NULL) - { + { while ((*str) != 0) { if (*str != '\r') @@ -645,9 +646,9 @@ static void Add_Clipboard_To_Queue(void) str++; } - // added to fix odd errors - RefreshCurrentEditBuffer(); - } + // added to fix odd errors + RefreshCurrentEditBuffer(); + } GlobalUnlock(hClipData); } @@ -659,7 +660,7 @@ static void Add_Clipboard_To_Queue(void) /*------------------------------------------------------------------------ Procedure: CopyToClipboard ID:1 Purpose: Copies text to the clipboard - Input: Window with the edit control + Input: Window with the edit control Output: Errors: ------------------------------------------------------------------------*/ @@ -673,7 +674,7 @@ static void CopyToClipboard(HWND hwnd) Procedure: ResetText ID:1 Purpose: Resets the text? I'm not really sure Input: - Output: Always returns 0 + Output: Always returns 0 Errors: ------------------------------------------------------------------------*/ int ResetText(void) @@ -706,10 +707,10 @@ int ResetText(void) Errors: -------------------------------------------------------------------------- Edit History: - 06 Oct 2003 - Chris Watford watford@uiuc.edu - - Removed entries that crashed OCaml - - Removed useless entries - - Added Save ML and Save Transcript + 06 Oct 2003 - Chris Watford watford@uiuc.edu + - Removed entries that crashed OCaml + - Removed useless entries + - Added Save ML and Save Transcript ------------------------------------------------------------------------*/ void HandleCommand(HWND hwnd, WPARAM wParam,LPARAM lParam) { @@ -747,7 +748,7 @@ void HandleCommand(HWND hwnd, WPARAM wParam,LPARAM lParam) CopyToClipboard(hwnd); break; - // updated to save a transcript + // updated to save a transcript case IDM_SAVEAS: fname = SafeMalloc(512); if (GetSaveName(fname,512)) { @@ -756,29 +757,29 @@ void HandleCommand(HWND hwnd, WPARAM wParam,LPARAM lParam) free(fname); break; - // updated to save an ML file - case IDM_SAVE: + // updated to save an ML file + case IDM_SAVE: fname = SafeMalloc(512); if (GetSaveMLName(fname,512)) - { + { SaveML(fname); } free(fname); break; - // updated to work with new history system + // updated to work with new history system case IDM_HISTORY: r = CallDlgProc(HistoryDlgProc,IDD_HISTORY); if (r) - { + { AddLineToControl(GetHistoryLine(r-1)); } break; case IDM_PRINTSU: - // Removed by Chris Watford - // seems to die + // Removed by Chris Watford + // seems to die // CallPrintSetup(); break; @@ -799,7 +800,7 @@ void HandleCommand(HWND hwnd, WPARAM wParam,LPARAM lParam) Undo(hwnd); break; - /* Removed, really not very useful in this IDE + /* Removed, really not very useful in this IDE case IDM_WINDOWTILE: SendMessage(hwndMDIClient,WM_MDITILE,0,0); break; @@ -809,7 +810,7 @@ void HandleCommand(HWND hwnd, WPARAM wParam,LPARAM lParam) case IDM_WINDOWICONS: SendMessage(hwndMDIClient,WM_MDIICONARRANGE,0,0); break; - */ + */ case IDM_EXIT: PostMessage(hwnd,WM_CLOSE,0,0); diff --git a/win32caml/ocaml.c b/win32caml/ocaml.c index 2a2e04a54..04899473f 100644 --- a/win32caml/ocaml.c +++ b/win32caml/ocaml.c @@ -1,7 +1,9 @@ +/***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Developed by Jacob Navia. */ +/* */ /* Copyright 2001 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ /* under the terms of the GNU Library General Public License, with */ @@ -76,10 +78,10 @@ Errors: none ------------------------------------------------------------------------*/ void UpdateStatusBar(LPSTR lpszStatusString, WORD partNumber, WORD displayFlags) { - SendMessage(hWndStatusbar, - SB_SETTEXT, - partNumber | displayFlags, - (LPARAM)lpszStatusString); + SendMessage(hWndStatusbar, + SB_SETTEXT, + partNumber | displayFlags, + (LPARAM)lpszStatusString); } @@ -95,36 +97,36 @@ Errors: If the string is not found nothing will be shown. ------------------------------------------------------------------------*/ LRESULT MsgMenuSelect(HWND hwnd, UINT uMessage, WPARAM wparam, LPARAM lparam) { - static char szBuffer[256]; - UINT nStringID = 0; - UINT fuFlags = GET_WM_MENUSELECT_FLAGS(wparam, lparam) & 0xffff; - UINT uCmd = GET_WM_MENUSELECT_CMD(wparam, lparam); - HMENU hMenu = GET_WM_MENUSELECT_HMENU(wparam, lparam); + static char szBuffer[256]; + UINT nStringID = 0; + UINT fuFlags = GET_WM_MENUSELECT_FLAGS(wparam, lparam) & 0xffff; + UINT uCmd = GET_WM_MENUSELECT_CMD(wparam, lparam); + HMENU hMenu = GET_WM_MENUSELECT_HMENU(wparam, lparam); - szBuffer[0] = 0; // First reset the buffer - if (fuFlags == 0xffff && hMenu == NULL) // Menu has been closed - nStringID = 0; + szBuffer[0] = 0; // First reset the buffer + if (fuFlags == 0xffff && hMenu == NULL) // Menu has been closed + nStringID = 0; - else if (fuFlags & MFT_SEPARATOR) // Ignore separators - nStringID = 0; + else if (fuFlags & MFT_SEPARATOR) // Ignore separators + nStringID = 0; - else if (fuFlags & MF_POPUP) // Popup menu - { - if (fuFlags & MF_SYSMENU) // System menu - nStringID = IDS_SYSMENU; - else - // Get string ID for popup menu from idPopup array. - nStringID = 0; - } // for MF_POPUP - else // Must be a command item - nStringID = uCmd; // String ID == Command ID + else if (fuFlags & MF_POPUP) // Popup menu + { + if (fuFlags & MF_SYSMENU) // System menu + nStringID = IDS_SYSMENU; + else + // Get string ID for popup menu from idPopup array. + nStringID = 0; + } // for MF_POPUP + else // Must be a command item + nStringID = uCmd; // String ID == Command ID - // Load the string if we have an ID - if (0 != nStringID) - LoadString(hInst, nStringID, szBuffer, sizeof(szBuffer)); - // Finally... send the string to the status bar - UpdateStatusBar(szBuffer, 0, 0); - return 0; + // Load the string if we have an ID + if (0 != nStringID) + LoadString(hInst, nStringID, szBuffer, sizeof(szBuffer)); + // Finally... send the string to the status bar + UpdateStatusBar(szBuffer, 0, 0); + return 0; } /*------------------------------------------------------------------------ @@ -138,7 +140,7 @@ Errors: ------------------------------------------------------------------------*/ static VOID CALLBACK TimerProc(HWND hwnd, UINT uMsg, UINT idEvent, DWORD dwTime) { - SendMessage(hwndSession, WM_TIMERTICK, 0, 0); + SendMessage(hwndSession, WM_TIMERTICK, 0, 0); } /*------------------------------------------------------------------------ @@ -154,27 +156,27 @@ Errors: ------------------------------------------------------------------------*/ void InitializeStatusBar(HWND hwndParent,int nrOfParts) { - const int cSpaceInBetween = 8; - int ptArray[40]; // Array defining the number of parts/sections - RECT rect; - HDC hDC; + const int cSpaceInBetween = 8; + int ptArray[40]; // Array defining the number of parts/sections + RECT rect; + HDC hDC; - /* * Fill in the ptArray... */ + /* * Fill in the ptArray... */ - hDC = GetDC(hwndParent); - GetClientRect(hwndParent, &rect); + hDC = GetDC(hwndParent); + GetClientRect(hwndParent, &rect); - ptArray[nrOfParts-1] = rect.right; - //---TODO--- Add code to calculate the size of each part of the status - // bar here. + ptArray[nrOfParts-1] = rect.right; + //---TODO--- Add code to calculate the size of each part of the status + // bar here. - ReleaseDC(hwndParent, hDC); - SendMessage(hWndStatusbar, - SB_SETPARTS, - nrOfParts, - (LPARAM)(LPINT)ptArray); + ReleaseDC(hwndParent, hDC); + SendMessage(hWndStatusbar, + SB_SETPARTS, + nrOfParts, + (LPARAM)(LPINT)ptArray); - UpdateStatusBar("Ready", 0, 0); + UpdateStatusBar("Ready", 0, 0); } @@ -188,17 +190,17 @@ Errors: ------------------------------------------------------------------------*/ static BOOL CreateSBar(HWND hwndParent,char *initialText,int nrOfParts) { - hWndStatusbar = CreateStatusWindow(WS_CHILD | WS_VISIBLE | WS_BORDER|SBARS_SIZEGRIP, - initialText, - hwndParent, - IDM_STATUSBAR); - if(hWndStatusbar) - { - InitializeStatusBar(hwndParent,nrOfParts); - return TRUE; - } + hWndStatusbar = CreateStatusWindow(WS_CHILD | WS_VISIBLE | WS_BORDER|SBARS_SIZEGRIP, + initialText, + hwndParent, + IDM_STATUSBAR); + if(hWndStatusbar) + { + InitializeStatusBar(hwndParent,nrOfParts); + return TRUE; + } - return FALSE; + return FALSE; } /*------------------------------------------------------------------------ Procedure: InitApplication ID:1 @@ -211,32 +213,32 @@ Errors: ------------------------------------------------------------------------*/ static BOOL InitApplication(void) { - WNDCLASS wc; + WNDCLASS wc; - memset(&wc,0,sizeof(WNDCLASS)); - wc.style = CS_HREDRAW|CS_VREDRAW |CS_DBLCLKS ; - wc.lpfnWndProc = (WNDPROC)MainWndProc; - wc.hInstance = hInst; - wc.hbrBackground = (HBRUSH)(COLOR_WINDOW+1); - wc.lpszClassName = "inriaWndClass"; - wc.lpszMenuName = MAKEINTRESOURCE(IDMAINMENU); - wc.hCursor = LoadCursor(NULL,IDC_ARROW); - wc.hIcon = LoadIcon(hInst,MAKEINTRESOURCE(OCAML_ICON)); - if (!RegisterClass(&wc)) - return 0; - wc.style = 0; - wc.lpfnWndProc = (WNDPROC)MdiChildWndProc; - wc.cbClsExtra = 0; - wc.cbWndExtra = 20; - wc.hInstance = hInst; // Owner of this class - wc.hIcon = LoadIcon(hInst, MAKEINTRESOURCE(OCAML_ICON)); - wc.hCursor = LoadCursor(NULL, IDC_ARROW); - wc.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1); // Default color - wc.lpszMenuName = NULL; - wc.lpszClassName = "MdiChildWndClass"; - if (!RegisterClass((LPWNDCLASS)&wc)) - return FALSE; - return 1; + memset(&wc,0,sizeof(WNDCLASS)); + wc.style = CS_HREDRAW|CS_VREDRAW |CS_DBLCLKS ; + wc.lpfnWndProc = (WNDPROC)MainWndProc; + wc.hInstance = hInst; + wc.hbrBackground = (HBRUSH)(COLOR_WINDOW+1); + wc.lpszClassName = "inriaWndClass"; + wc.lpszMenuName = MAKEINTRESOURCE(IDMAINMENU); + wc.hCursor = LoadCursor(NULL,IDC_ARROW); + wc.hIcon = LoadIcon(hInst,MAKEINTRESOURCE(OCAML_ICON)); + if (!RegisterClass(&wc)) + return 0; + wc.style = 0; + wc.lpfnWndProc = (WNDPROC)MdiChildWndProc; + wc.cbClsExtra = 0; + wc.cbWndExtra = 20; + wc.hInstance = hInst; // Owner of this class + wc.hIcon = LoadIcon(hInst, MAKEINTRESOURCE(OCAML_ICON)); + wc.hCursor = LoadCursor(NULL, IDC_ARROW); + wc.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1); // Default color + wc.lpszMenuName = NULL; + wc.lpszClassName = "MdiChildWndClass"; + if (!RegisterClass((LPWNDCLASS)&wc)) + return FALSE; + return 1; } /*------------------------------------------------------------------------ @@ -248,13 +250,13 @@ Errors: ------------------------------------------------------------------------*/ HWND CreateinriaWndClassWnd(void) { - return CreateWindow("inriaWndClass","OCamlWinPlus v1.9RC4", - WS_MINIMIZEBOX|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CLIPCHILDREN|WS_MAXIMIZEBOX|WS_CAPTION|WS_BORDER|WS_SYSMENU|WS_THICKFRAME, - CW_USEDEFAULT,0,CW_USEDEFAULT,0, - NULL, - NULL, - hInst, - NULL); + return CreateWindow("inriaWndClass","OCamlWinPlus v1.9RC4", + WS_MINIMIZEBOX|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CLIPCHILDREN|WS_MAXIMIZEBOX|WS_CAPTION|WS_BORDER|WS_SYSMENU|WS_THICKFRAME, + CW_USEDEFAULT,0,CW_USEDEFAULT,0, + NULL, + NULL, + hInst, + NULL); } /*------------------------------------------------------------------------ @@ -267,80 +269,80 @@ Errors: ------------------------------------------------------------------------*/ static HWND MDICmdFileNew(char *title, int show) { - HWND hwndChild; - char rgch[150]; - static int cUntitled; - MDICREATESTRUCT mcs; + HWND hwndChild; + char rgch[150]; + static int cUntitled; + MDICREATESTRUCT mcs; - if (title == NULL) - wsprintf(rgch,"Session%d", cUntitled++); - else { - strncpy(rgch,title,149); - rgch[149] = 0; - } + if (title == NULL) + wsprintf(rgch,"Session%d", cUntitled++); + else { + strncpy(rgch,title,149); + rgch[149] = 0; + } - // Create the MDI child window + // Create the MDI child window - mcs.szClass = "MdiChildWndClass"; // window class name - mcs.szTitle = rgch; // window title - mcs.hOwner = hInst; // owner - mcs.x = CW_USEDEFAULT; // x position - mcs.y = CW_USEDEFAULT; // y position - mcs.cx = CW_USEDEFAULT; // width - mcs.cy = CW_USEDEFAULT; // height - mcs.style = 0; // window style - mcs.lParam = 0; // lparam + mcs.szClass = "MdiChildWndClass"; // window class name + mcs.szTitle = rgch; // window title + mcs.hOwner = hInst; // owner + mcs.x = CW_USEDEFAULT; // x position + mcs.y = CW_USEDEFAULT; // y position + mcs.cx = CW_USEDEFAULT; // width + mcs.cy = CW_USEDEFAULT; // height + mcs.style = 0; // window style + mcs.lParam = 0; // lparam - hwndChild = (HWND) SendMessage(hwndMDIClient, - WM_MDICREATE, - 0, - (LPARAM)(LPMDICREATESTRUCT) &mcs); + hwndChild = (HWND) SendMessage(hwndMDIClient, + WM_MDICREATE, + 0, + (LPARAM)(LPMDICREATESTRUCT) &mcs); - if (hwndChild != NULL && show) - ShowWindow(hwndChild, SW_SHOW); + if (hwndChild != NULL && show) + ShowWindow(hwndChild, SW_SHOW); - return hwndChild; + return hwndChild; } static HWND CreateMdiClient(HWND hwndparent) { - CLIENTCREATESTRUCT ccs = {0}; - HWND hwndMDIClient; - int icount = GetMenuItemCount(GetMenu(hwndparent)); + CLIENTCREATESTRUCT ccs = {0}; + HWND hwndMDIClient; + int icount = GetMenuItemCount(GetMenu(hwndparent)); - // Find window menu where children will be listed - ccs.hWindowMenu = GetSubMenu(GetMenu(hwndparent), icount-2); - ccs.idFirstChild = IDM_WINDOWCHILD; + // Find window menu where children will be listed + ccs.hWindowMenu = GetSubMenu(GetMenu(hwndparent), icount-2); + ccs.idFirstChild = IDM_WINDOWCHILD; - // Create the MDI client filling the client area - hwndMDIClient = CreateWindow("mdiclient", - NULL, - WS_CHILD | WS_CLIPCHILDREN | WS_VSCROLL | - WS_HSCROLL, - 0, 0, 0, 0, - hwndparent, - (HMENU)0xCAC, - hInst, - (LPVOID)&ccs); + // Create the MDI client filling the client area + hwndMDIClient = CreateWindow("mdiclient", + NULL, + WS_CHILD | WS_CLIPCHILDREN | WS_VSCROLL | + WS_HSCROLL, + 0, 0, 0, 0, + hwndparent, + (HMENU)0xCAC, + hInst, + (LPVOID)&ccs); - ShowWindow(hwndMDIClient, SW_SHOW); + ShowWindow(hwndMDIClient, SW_SHOW); - return hwndMDIClient; + return hwndMDIClient; } void GotoEOF(void) { - HWND hEdit = (HWND)GetWindowLongPtr(hwndSession,DWLP_USER); - int linesCount = SendMessage(hEdit,EM_GETLINECOUNT,0,0); - int lineindex = SendMessage(hEdit,EM_LINEINDEX,linesCount-1,0); - int lastLineLength = SendMessage(hEdit,EM_LINELENGTH,linesCount-1,0); + HWND hEdit = (HWND)GetWindowLongPtr(hwndSession,DWLP_USER); + int linesCount = SendMessage(hEdit,EM_GETLINECOUNT,0,0); + int lineindex = SendMessage(hEdit,EM_LINEINDEX,linesCount-1,0); + int lastLineLength = SendMessage(hEdit,EM_LINELENGTH,linesCount-1,0); - lineindex += lastLineLength; - SendMessage(hEdit,EM_SETSEL,lineindex,lineindex); + lineindex += lastLineLength; + SendMessage(hEdit,EM_SETSEL,lineindex,lineindex); } /*------------------------------------------------------------------------ Procedure: GotoPrompt ID:1 -Author: Chris Watford watford@uiuc.edu +Author: Chris Watford watford@uiuc.edu Purpose: Puts the cursor on the prompt line right after the '# ' Input: Output: @@ -348,190 +350,190 @@ Errors: ------------------------------------------------------------------------*/ void GotoPrompt(void) { - HWND hEdit = (HWND)GetWindowLongPtr(hwndSession,DWLP_USER); - int lineindex = SendMessage(hEdit,EM_LINEINDEX,LastPromptPosition.line,0)+2; - SendMessage(hEdit,EM_SETSEL,lineindex,lineindex); + HWND hEdit = (HWND)GetWindowLongPtr(hwndSession,DWLP_USER); + int lineindex = SendMessage(hEdit,EM_LINEINDEX,LastPromptPosition.line,0)+2; + SendMessage(hEdit,EM_SETSEL,lineindex,lineindex); } int GetCurLineIndex(HWND hEdit) { - return SendMessage(hEdit,EM_LINEFROMCHAR,(WPARAM)-1,0); + return SendMessage(hEdit,EM_LINEFROMCHAR,(WPARAM)-1,0); } int GetNumberOfLines(HWND hEdit) { - return SendMessage(hEdit,EM_GETLINECOUNT,0,0); + return SendMessage(hEdit,EM_GETLINECOUNT,0,0); } static int GetWordUnderCursor(HWND hwndEditControl,char *buf,int len) { - char *line,*p,*pstart,*pend; - int lineidx,start,end,length,offset,cursorpos,startingChar; + char *line,*p,*pstart,*pend; + int lineidx,start,end,length,offset,cursorpos,startingChar; - SendMessage(hwndEditControl,EM_GETSEL,(WPARAM)&start,(LPARAM)&end); - lineidx = SendMessage(hwndEditControl,EM_EXLINEFROMCHAR,0,start); - startingChar = SendMessage(hwndEditControl,EM_LINEINDEX,lineidx,0); - start -= startingChar; - end -= startingChar; - lineidx = SendMessage(hwndEditControl,EM_LINEFROMCHAR,start,0); - length = SendMessage(hwndEditControl,EM_LINELENGTH,lineidx,0); - offset = SendMessage(hwndEditControl,EM_LINEINDEX,lineidx,0); - line = SafeMalloc(length+1); - memset(line,0,length+1); - *(unsigned short *)line = length; - SendMessage(hwndEditControl,EM_GETLINE,lineidx,(LPARAM)line); - cursorpos = start-offset; - p = line + cursorpos; - pstart = p; - while (*pstart - && *pstart != ' ' - && *pstart != '\t' - && *pstart != '(' - && pstart > line) - pstart--; - pend = p; - while (*pend - && *pend != ' ' - && *pend != '\t' - && *pend != '(' - && pend < line + length) - pend++; - if (*pstart == ' ' || *pstart == '\t') - pstart++; - if (*pend == ' ' || *pend == '\t') - pend--; - memcpy(buf,pstart,1+pend-pstart); - buf[pend-pstart] = 0; - free(line); - return 1; + SendMessage(hwndEditControl,EM_GETSEL,(WPARAM)&start,(LPARAM)&end); + lineidx = SendMessage(hwndEditControl,EM_EXLINEFROMCHAR,0,start); + startingChar = SendMessage(hwndEditControl,EM_LINEINDEX,lineidx,0); + start -= startingChar; + end -= startingChar; + lineidx = SendMessage(hwndEditControl,EM_LINEFROMCHAR,start,0); + length = SendMessage(hwndEditControl,EM_LINELENGTH,lineidx,0); + offset = SendMessage(hwndEditControl,EM_LINEINDEX,lineidx,0); + line = SafeMalloc(length+1); + memset(line,0,length+1); + *(unsigned short *)line = length; + SendMessage(hwndEditControl,EM_GETLINE,lineidx,(LPARAM)line); + cursorpos = start-offset; + p = line + cursorpos; + pstart = p; + while (*pstart + && *pstart != ' ' + && *pstart != '\t' + && *pstart != '(' + && pstart > line) + pstart--; + pend = p; + while (*pend + && *pend != ' ' + && *pend != '\t' + && *pend != '(' + && pend < line + length) + pend++; + if (*pstart == ' ' || *pstart == '\t') + pstart++; + if (*pend == ' ' || *pend == '\t') + pend--; + memcpy(buf,pstart,1+pend-pstart); + buf[pend-pstart] = 0; + free(line); + return 1; } /*------------------------------------------------------------------------ Procedure: GetLastLine ID:1 Purpose: Gets the data in the line containing the cursor to - the interpreter. + the interpreter. Input: The edit control window handle Output: None explicit Errors: None ------------------------------------------------------------------------*/ char* GetLastLine(HWND hEdit) { - int curline = GetCurLineIndex(hEdit); - char *linebuffer = (char*)SafeMalloc(2048*sizeof(char)); - int n; - int linescount = GetNumberOfLines(hEdit); + int curline = GetCurLineIndex(hEdit); + char *linebuffer = (char*)SafeMalloc(2048*sizeof(char)); + int n; + int linescount = GetNumberOfLines(hEdit); - *(unsigned short *)linebuffer = 2047; - n = SendMessage(hEdit,EM_GETLINE,curline,(LPARAM)linebuffer); + *(unsigned short *)linebuffer = 2047; + n = SendMessage(hEdit,EM_GETLINE,curline,(LPARAM)linebuffer); - if (n >= 2 && linebuffer[0] == '#' && linebuffer[1] == ' ') { - n -= 2; - memmove(linebuffer, linebuffer+2, n); - } + if (n >= 2 && linebuffer[0] == '#' && linebuffer[1] == ' ') { + n -= 2; + memmove(linebuffer, linebuffer+2, n); + } - linebuffer[n] = '\0'; + linebuffer[n] = '\0'; - return linebuffer; + return linebuffer; } void DoHelp(HWND hwnd) { - char word[256]; - GetWordUnderCursor(hwnd,word,sizeof(word)); - MessageBox(NULL,word,"Aide pour:",MB_OK); + char word[256]; + GetWordUnderCursor(hwnd,word,sizeof(word)); + MessageBox(NULL,word,"Aide pour:",MB_OK); } /*------------------------------------------------------------------------ Procedure: RewriteCurrentEditBuffer ID:1 Purpose: Rewrites what is at the prompt with the current contents of - the edit buffer + the edit buffer Input: None Output: None explicit Errors: None ------------------------------------------------------------------------*/ void RewriteCurrentEditBuffer(void) { - // get the editbox's handle - HWND hEdit = (HWND)GetWindowLongPtr(hwndSession,DWLP_USER); + // get the editbox's handle + HWND hEdit = (HWND)GetWindowLongPtr(hwndSession,DWLP_USER); - // calculate what to highlight - int linesCount = SendMessage(hEdit,EM_GETLINECOUNT,0,0); - int lineindex = SendMessage(hEdit,EM_LINEINDEX,LastPromptPosition.line,0) + 2; - int lastLine = SendMessage(hEdit,EM_LINEINDEX,linesCount-1,0) + SendMessage(hEdit,EM_LINELENGTH,linesCount-1,0) + 100; + // calculate what to highlight + int linesCount = SendMessage(hEdit,EM_GETLINECOUNT,0,0); + int lineindex = SendMessage(hEdit,EM_LINEINDEX,LastPromptPosition.line,0) + 2; + int lastLine = SendMessage(hEdit,EM_LINEINDEX,linesCount-1,0) + SendMessage(hEdit,EM_LINELENGTH,linesCount-1,0) + 100; - // delete the current text - SendMessage(hEdit, EM_SETSEL, (WPARAM)lineindex, (LPARAM)lastLine); - SendMessage(hEdit, EM_REPLACESEL, (WPARAM)TRUE, (LPARAM)""); + // delete the current text + SendMessage(hEdit, EM_SETSEL, (WPARAM)lineindex, (LPARAM)lastLine); + SendMessage(hEdit, EM_REPLACESEL, (WPARAM)TRUE, (LPARAM)""); - { - // loop through each line in the edit buffer and add it to the control - LineList* line = CurrentEditBuffer->Lines; - for(; line != NULL; line = line->Next) - { - // if there is a line before me, add a newline - if(line->Prev != NULL) - SendMessage(hEdit, EM_REPLACESEL, (WPARAM)TRUE, (LPARAM)"\r\n"); + { + // loop through each line in the edit buffer and add it to the control + LineList* line = CurrentEditBuffer->Lines; + for(; line != NULL; line = line->Next) + { + // if there is a line before me, add a newline + if(line->Prev != NULL) + SendMessage(hEdit, EM_REPLACESEL, (WPARAM)TRUE, (LPARAM)"\r\n"); - // add the line - SendMessage(hEdit, EM_REPLACESEL, (WPARAM)TRUE, (LPARAM)line->Text); - } - } + // add the line + SendMessage(hEdit, EM_REPLACESEL, (WPARAM)TRUE, (LPARAM)line->Text); + } + } } /*------------------------------------------------------------------------ Procedure: RefreshCurrentEditBuffer ID:1 Purpose: Rewrites what is in the CurrentEditBuffer with what is - actually there + actually there Input: None Output: None explicit Errors: None ------------------------------------------------------------------------*/ void RefreshCurrentEditBuffer(void) { - // get the editbox's handle - HWND hEdit = (HWND)GetWindowLongPtr(hwndSession,DWLP_USER); + // get the editbox's handle + HWND hEdit = (HWND)GetWindowLongPtr(hwndSession,DWLP_USER); - // get the last line index - int linesCount = SendMessage(hEdit,EM_GETLINECOUNT,0,0) - 1; - int i = 0, n = 0; + // get the last line index + int linesCount = SendMessage(hEdit,EM_GETLINECOUNT,0,0) - 1; + int i = 0, n = 0; - // where to hold the line we grab - char *linebuffer = (char*)SafeMalloc(2048*sizeof(char)); - *(unsigned short *)linebuffer = 2047; + // where to hold the line we grab + char *linebuffer = (char*)SafeMalloc(2048*sizeof(char)); + *(unsigned short *)linebuffer = 2047; - editbuffer_destroy(CurrentEditBuffer); - CurrentEditBuffer = editbuffer_new(); + editbuffer_destroy(CurrentEditBuffer); + CurrentEditBuffer = editbuffer_new(); - // loop through each line updating or adding it to the current edit buffer - for( ; (i + LastPromptPosition.line) <= linesCount; i++) - { - n = SendMessage(hEdit, EM_GETLINE, (i + LastPromptPosition.line), (LPARAM)linebuffer); + // loop through each line updating or adding it to the current edit buffer + for( ; (i + LastPromptPosition.line) <= linesCount; i++) + { + n = SendMessage(hEdit, EM_GETLINE, (i + LastPromptPosition.line), (LPARAM)linebuffer); - if ((n >= 2) && (linebuffer[0] == '#') && (linebuffer[1] == ' ')) { - n -= 2; - memmove(linebuffer, linebuffer+2, n); - } + if ((n >= 2) && (linebuffer[0] == '#') && (linebuffer[1] == ' ')) { + n -= 2; + memmove(linebuffer, linebuffer+2, n); + } - linebuffer[n] = '\0'; + linebuffer[n] = '\0'; - { // remove line breaks and feeds - char* ln = linebuffer; + { // remove line breaks and feeds + char* ln = linebuffer; - while((*ln) != 0) - { - switch((*ln)) - { - case '\r': - case '\n': - (*ln) = ' '; - } + while((*ln) != 0) + { + switch((*ln)) + { + case '\r': + case '\n': + (*ln) = ' '; + } - ln++; - } - } + ln++; + } + } - editbuffer_addline(CurrentEditBuffer, linebuffer); - } + editbuffer_addline(CurrentEditBuffer, linebuffer); + } } /*------------------------------------------------------------------------ @@ -542,42 +544,42 @@ Output: None explicit Errors: None -------------------------------------------------------------------------- Edit History: - 17 Sept 2003 - Chris Watford watford@uiuc.edu - - Added this as a helper function - 18 Sept 2003 - Chris Watford watford@uiuc.edu - - Corrected doubly linked list problems + 17 Sept 2003 - Chris Watford watford@uiuc.edu + - Added this as a helper function + 18 Sept 2003 - Chris Watford watford@uiuc.edu + - Corrected doubly linked list problems ------------------------------------------------------------------------*/ void NextHistoryEntry(void) { - // out of bounds, put it back into bounds - if(historyEntry == NULL && History == NULL) - { - return; - } else if (historyEntry == NULL && History != NULL) { - historyEntry = History; - } else { - if(historyEntry->Next == NULL) - return; + // out of bounds, put it back into bounds + if(historyEntry == NULL && History == NULL) + { + return; + } else if (historyEntry == NULL && History != NULL) { + historyEntry = History; + } else { + if(historyEntry->Next == NULL) + return; - historyEntry = historyEntry->Next; - } + historyEntry = historyEntry->Next; + } - // if its valid - if(historyEntry != NULL) - { - // copy the history entry to a new buffer - EditBuffer* newBuf = editbuffer_copy(historyEntry->Statement); + // if its valid + if(historyEntry != NULL) + { + // copy the history entry to a new buffer + EditBuffer* newBuf = editbuffer_copy(historyEntry->Statement); - // destroy the old buffer - editbuffer_destroy(CurrentEditBuffer); + // destroy the old buffer + editbuffer_destroy(CurrentEditBuffer); - // setup the current one to the copy - CurrentEditBuffer = newBuf; + // setup the current one to the copy + CurrentEditBuffer = newBuf; - // rewrite the old one and go to the prompt - RewriteCurrentEditBuffer(); - GotoPrompt(); - } + // rewrite the old one and go to the prompt + RewriteCurrentEditBuffer(); + GotoPrompt(); + } } /*------------------------------------------------------------------------ @@ -588,312 +590,312 @@ Output: None explicit Errors: None -------------------------------------------------------------------------- Edit History: - 17 Sept 2003 - Chris Watford watford@uiuc.edu - - Added this as a helper function - 18 Sept 2003 - Chris Watford watford@uiuc.edu - - Corrected doubly linked list problems + 17 Sept 2003 - Chris Watford watford@uiuc.edu + - Added this as a helper function + 18 Sept 2003 - Chris Watford watford@uiuc.edu + - Corrected doubly linked list problems ------------------------------------------------------------------------*/ void PrevHistoryEntry(void) { - // out of bounds, put it back into bounds - if(historyEntry == NULL || History == NULL) - { - return; - } else { - if(historyEntry->Prev == NULL) - return; + // out of bounds, put it back into bounds + if(historyEntry == NULL || History == NULL) + { + return; + } else { + if(historyEntry->Prev == NULL) + return; - historyEntry = historyEntry->Prev; - } + historyEntry = historyEntry->Prev; + } - // if its valid - if(historyEntry != NULL) - { - // copy the history entry to a new buffer - EditBuffer* newBuf = editbuffer_copy(historyEntry->Statement); + // if its valid + if(historyEntry != NULL) + { + // copy the history entry to a new buffer + EditBuffer* newBuf = editbuffer_copy(historyEntry->Statement); - // destroy the old buffer - editbuffer_destroy(CurrentEditBuffer); + // destroy the old buffer + editbuffer_destroy(CurrentEditBuffer); - // setup the current one to the copy - CurrentEditBuffer = newBuf; + // setup the current one to the copy + CurrentEditBuffer = newBuf; - // rewrite the old one and go to the prompt - RewriteCurrentEditBuffer(); - GotoPrompt(); - } + // rewrite the old one and go to the prompt + RewriteCurrentEditBuffer(); + GotoPrompt(); + } } /*------------------------------------------------------------------------ Procedure: SubClassEdit ID:1 Purpose: Handles messages to the editbox -Input: -Output: +Input: +Output: Errors: -------------------------------------------------------------------------- Edit History: - 14 Sept 2003 - Chris Watford watford@uiuc.edu - - Setup handler for up and down arrows - 15 Sept 2003 - Chris Watford watford@uiuc.edu - - Setup framework for history on up arrow - - Saves lines you move off of in the edit buffer - 16 Sept 2003 - Chris Watford watford@uiuc.edu - - Proper handling of newline message finished - - Fixed ENTER on middle of interior line, moves cursor to the end - and sends the line - - Setup the copying and destroying of the old buffer - - Included buffer rewrite - 17 Sept 2003 - Chris Watford watford@uiuc.edu - - Added C-p/C-n support - - Changed UpArrow to C-UpArrow so as to not confuse users - 18 Sept 2003 - Chris Watford watford@uiuc.edu - - Added Left and Right arrow line saving - - Added backspace and delete line saving and removing - - Fixed history scrolling - 21 Sept 2003 - Chris Watford watford@uiuc.edu - - Fixed pasting errors associated with lines being out of bounds - for the buffer - - Added error handling, possibly able to handle it diff down the - line - - Removed C-Up/C-Dn for history scrolling, buggy at best on my - machine + 14 Sept 2003 - Chris Watford watford@uiuc.edu + - Setup handler for up and down arrows + 15 Sept 2003 - Chris Watford watford@uiuc.edu + - Setup framework for history on up arrow + - Saves lines you move off of in the edit buffer + 16 Sept 2003 - Chris Watford watford@uiuc.edu + - Proper handling of newline message finished + - Fixed ENTER on middle of interior line, moves cursor to the end + and sends the line + - Setup the copying and destroying of the old buffer + - Included buffer rewrite + 17 Sept 2003 - Chris Watford watford@uiuc.edu + - Added C-p/C-n support + - Changed UpArrow to C-UpArrow so as to not confuse users + 18 Sept 2003 - Chris Watford watford@uiuc.edu + - Added Left and Right arrow line saving + - Added backspace and delete line saving and removing + - Fixed history scrolling + 21 Sept 2003 - Chris Watford watford@uiuc.edu + - Fixed pasting errors associated with lines being out of bounds + for the buffer + - Added error handling, possibly able to handle it diff down the + line + - Removed C-Up/C-Dn for history scrolling, buggy at best on my + machine ------------------------------------------------------------------------*/ static LRESULT CALLBACK SubClassEdit(HWND hwnd, UINT msg, WPARAM mp1, LPARAM mp2) { - LRESULT r; - int postit=0,nl; + LRESULT r; + int postit=0,nl; - if (msg == WM_CHAR && mp1 == '\r') { - if (!busy) { - r = GetCurLineIndex(hwnd); - nl = GetNumberOfLines(hwnd); + if (msg == WM_CHAR && mp1 == '\r') { + if (!busy) { + r = GetCurLineIndex(hwnd); + nl = GetNumberOfLines(hwnd); - // if we're not the last line - if (r != nl-1) - { - // update or add us, we might not have any lines in the edit buffer - editbuffer_updateoraddline(CurrentEditBuffer, r-LastPromptPosition.line, GetLastLine(hwnd)); + // if we're not the last line + if (r != nl-1) + { + // update or add us, we might not have any lines in the edit buffer + editbuffer_updateoraddline(CurrentEditBuffer, r-LastPromptPosition.line, GetLastLine(hwnd)); - // scroll to the end, add CrLf then post the newline message - GotoEOF(); - AddStringToControl("\r\n"); - PostMessage(GetParent(hwnd),WM_NEWLINE,0,0); - return 0; - } + // scroll to the end, add CrLf then post the newline message + GotoEOF(); + AddStringToControl("\r\n"); + PostMessage(GetParent(hwnd),WM_NEWLINE,0,0); + return 0; + } - CallWindowProc(lpEProc,hwnd,WM_KEYDOWN,VK_END,1); - CallWindowProc(lpEProc,hwnd,WM_KEYUP,VK_END,1); + CallWindowProc(lpEProc,hwnd,WM_KEYDOWN,VK_END,1); + CallWindowProc(lpEProc,hwnd,WM_KEYUP,VK_END,1); - postit = 1; - } + postit = 1; + } - } - else if (msg == WM_CHAR && mp1 == (char)0x08) { - int lineindex = SendMessage(hwnd, EM_LINEINDEX, LastPromptPosition.line, 0) + 2; - int curline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)-1,0); - int nextline = 0; - int curpoint = 0; + } + else if (msg == WM_CHAR && mp1 == (char)0x08) { + int lineindex = SendMessage(hwnd, EM_LINEINDEX, LastPromptPosition.line, 0) + 2; + int curline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)-1,0); + int nextline = 0; + int curpoint = 0; - SendMessage(hwnd, EM_GETSEL, (WPARAM)&curpoint, (LPARAM)NULL); - nextline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)(curpoint - 1),0); + SendMessage(hwnd, EM_GETSEL, (WPARAM)&curpoint, (LPARAM)NULL); + nextline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)(curpoint - 1),0); - if(curpoint <= lineindex) - { - return 0; - } else if(nextline != curline) { - // delete the line we're on + if(curpoint <= lineindex) + { + return 0; + } else if(nextline != curline) { + // delete the line we're on - // grab the index - curline -= LastPromptPosition.line; + // grab the index + curline -= LastPromptPosition.line; - // kill it - editbuffer_removeline(CurrentEditBuffer, curline); - } - } - else if (msg == WM_KEYDOWN && mp1 == VK_F1) { - DoHelp(hwnd); - } - else if ((msg == WM_KEYDOWN || msg == WM_KEYUP) && mp1 == VK_UP) { - int curline = GetCurLineIndex(hwnd); + // kill it + editbuffer_removeline(CurrentEditBuffer, curline); + } + } + else if (msg == WM_KEYDOWN && mp1 == VK_F1) { + DoHelp(hwnd); + } + else if ((msg == WM_KEYDOWN || msg == WM_KEYUP) && mp1 == VK_UP) { + int curline = GetCurLineIndex(hwnd); - /*if((msg == WM_KEYDOWN) && (GetKeyState(VK_CONTROL) && 0x8000)) - { // go forward once in history - NextHistoryEntry(); - return 0; - } else */ - if((curline > LastPromptPosition.line) && (curline <= (LastPromptPosition.line + CurrentEditBuffer->LineCount))) - { - // update current line - if (msg == WM_KEYDOWN) - { - int lineidx = (curline - LastPromptPosition.line); + /*if((msg == WM_KEYDOWN) && (GetKeyState(VK_CONTROL) && 0x8000)) + { // go forward once in history + NextHistoryEntry(); + return 0; + } else */ + if((curline > LastPromptPosition.line) && (curline <= (LastPromptPosition.line + CurrentEditBuffer->LineCount))) + { + // update current line + if (msg == WM_KEYDOWN) + { + int lineidx = (curline - LastPromptPosition.line); - CallWindowProc(lpEProc,hwnd,WM_KEYDOWN,VK_END,1); - CallWindowProc(lpEProc,hwnd,WM_KEYUP,VK_END,1); - - // we may have to add this line, otherwise update it - editbuffer_updateoraddline(CurrentEditBuffer, lineidx, GetLastLine(hwnd)); - } - } else { - return 0; - } - } - else if ((msg == WM_KEYDOWN || msg == WM_KEYUP) && (mp1 == VK_LEFT)) { - int lineindex = SendMessage(hwnd, EM_LINEINDEX, LastPromptPosition.line, 0) + 2; - int curline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)-1,0); - int nextline = 0; - int curpoint = 0; + CallWindowProc(lpEProc,hwnd,WM_KEYDOWN,VK_END,1); + CallWindowProc(lpEProc,hwnd,WM_KEYUP,VK_END,1); - SendMessage(hwnd, EM_GETSEL, (WPARAM)&curpoint, (LPARAM)NULL); - nextline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)(curpoint - 1),0); + // we may have to add this line, otherwise update it + editbuffer_updateoraddline(CurrentEditBuffer, lineidx, GetLastLine(hwnd)); + } + } else { + return 0; + } + } + else if ((msg == WM_KEYDOWN || msg == WM_KEYUP) && (mp1 == VK_LEFT)) { + int lineindex = SendMessage(hwnd, EM_LINEINDEX, LastPromptPosition.line, 0) + 2; + int curline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)-1,0); + int nextline = 0; + int curpoint = 0; - if(curpoint <= lineindex) - { // no left arrow to the left of the prompt - return 0; - } else if(nextline != curline) { - // update current line - if (msg == WM_KEYDOWN) - { - int lineidx = (curline - LastPromptPosition.line); + SendMessage(hwnd, EM_GETSEL, (WPARAM)&curpoint, (LPARAM)NULL); + nextline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)(curpoint - 1),0); - CallWindowProc(lpEProc,hwnd,WM_KEYDOWN,VK_END,1); - CallWindowProc(lpEProc,hwnd,WM_KEYUP,VK_END,1); - - // we may have to add this line, otherwise update it - editbuffer_updateoraddline(CurrentEditBuffer, lineidx, GetLastLine(hwnd)); + if(curpoint <= lineindex) + { // no left arrow to the left of the prompt + return 0; + } else if(nextline != curline) { + // update current line + if (msg == WM_KEYDOWN) + { + int lineidx = (curline - LastPromptPosition.line); - CallWindowProc(lpEProc,hwnd,WM_KEYDOWN,VK_HOME,1); - CallWindowProc(lpEProc,hwnd,WM_KEYUP,VK_HOME,1); - } - } - } - else if ((msg == WM_KEYDOWN || msg == WM_KEYUP) && (mp1 == VK_DOWN)) { - int curline = GetCurLineIndex(hwnd); - - /*if((msg == WM_KEYDOWN) && (GetKeyState(VK_CONTROL) && 0x8000)) - { // go back once in history - PrevHistoryEntry(); - return 0; - } else*/ - if((curline >= LastPromptPosition.line) && (curline < (LastPromptPosition.line + CurrentEditBuffer->LineCount))) - { - // We don't post the newline, but instead update the current line - if (msg == WM_KEYDOWN) - { - int lineidx = (curline - LastPromptPosition.line); + CallWindowProc(lpEProc,hwnd,WM_KEYDOWN,VK_END,1); + CallWindowProc(lpEProc,hwnd,WM_KEYUP,VK_END,1); - CallWindowProc(lpEProc,hwnd,WM_KEYDOWN,VK_END,1); - CallWindowProc(lpEProc,hwnd,WM_KEYUP,VK_END,1); - - editbuffer_updateline(CurrentEditBuffer, lineidx, GetLastLine(hwnd)); - } - } else { - return 0; - } - } - else if ((msg == WM_KEYDOWN || msg == WM_KEYUP) && (mp1 == VK_RIGHT)) { - int lineindex = SendMessage(hwnd, EM_LINEINDEX, LastPromptPosition.line, 0) + 1; - int curline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)-1,0); - int nextline = 0; - int curpoint = 0; + // we may have to add this line, otherwise update it + editbuffer_updateoraddline(CurrentEditBuffer, lineidx, GetLastLine(hwnd)); - SendMessage(hwnd, EM_GETSEL, (WPARAM)&curpoint, (LPARAM)NULL); - nextline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)(curpoint + 2),0); + CallWindowProc(lpEProc,hwnd,WM_KEYDOWN,VK_HOME,1); + CallWindowProc(lpEProc,hwnd,WM_KEYUP,VK_HOME,1); + } + } + } + else if ((msg == WM_KEYDOWN || msg == WM_KEYUP) && (mp1 == VK_DOWN)) { + int curline = GetCurLineIndex(hwnd); - if(curpoint <= lineindex) - { // no movement behind the prompt - return 0; - } else if((nextline != curline) && (msg = WM_KEYDOWN)) { - int lineidx = (curline - LastPromptPosition.line); + /*if((msg == WM_KEYDOWN) && (GetKeyState(VK_CONTROL) && 0x8000)) + { // go back once in history + PrevHistoryEntry(); + return 0; + } else*/ + if((curline >= LastPromptPosition.line) && (curline < (LastPromptPosition.line + CurrentEditBuffer->LineCount))) + { + // We don't post the newline, but instead update the current line + if (msg == WM_KEYDOWN) + { + int lineidx = (curline - LastPromptPosition.line); - CallWindowProc(lpEProc,hwnd,WM_KEYDOWN,VK_END,1); - CallWindowProc(lpEProc,hwnd,WM_KEYUP,VK_END,1); - - editbuffer_updateline(CurrentEditBuffer, lineidx, GetLastLine(hwnd)); - } - } - else if ((msg == WM_KEYDOWN) && (mp1 == VK_PRIOR) && (GetKeyState(VK_CONTROL) && 0x8000)) { - // C-p - NextHistoryEntry(); - return 0; - } - else if ((msg == WM_KEYDOWN) && (mp1 == VK_NEXT) && (GetKeyState(VK_CONTROL) && 0x8000)) { - // C-n - PrevHistoryEntry(); - return 0; - } - else if ((msg == WM_KEYDOWN || msg == WM_KEYUP) && (mp1 == VK_DELETE)) { - // see if we're the last char on the line, if so delete the next line - // don't allow deleting left of the prompt - int lineindex = SendMessage(hwnd, EM_LINEINDEX, LastPromptPosition.line, 0) + 2; - int curline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)-1,0); - int nextline = 0; - int curpoint = 0; + CallWindowProc(lpEProc,hwnd,WM_KEYDOWN,VK_END,1); + CallWindowProc(lpEProc,hwnd,WM_KEYUP,VK_END,1); - SendMessage(hwnd, EM_GETSEL, (WPARAM)&curpoint, (LPARAM)NULL); - nextline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)(curpoint + 2),0); + editbuffer_updateline(CurrentEditBuffer, lineidx, GetLastLine(hwnd)); + } + } else { + return 0; + } + } + else if ((msg == WM_KEYDOWN || msg == WM_KEYUP) && (mp1 == VK_RIGHT)) { + int lineindex = SendMessage(hwnd, EM_LINEINDEX, LastPromptPosition.line, 0) + 1; + int curline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)-1,0); + int nextline = 0; + int curpoint = 0; - if(curpoint < lineindex) - { // no chomping behind the prompt - return 0; - } else if(nextline != curline) { - // deleting - // grab the next line index - curline -= LastPromptPosition.line; + SendMessage(hwnd, EM_GETSEL, (WPARAM)&curpoint, (LPARAM)NULL); + nextline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)(curpoint + 2),0); - // kill it - editbuffer_removeline(CurrentEditBuffer, curline+1); - } - } - else if (msg == WM_PASTE) { - // if they paste text, allow it - r = CallWindowProc(lpEProc, hwnd, msg, mp1, mp2); + if(curpoint <= lineindex) + { // no movement behind the prompt + return 0; + } else if((nextline != curline) && (msg = WM_KEYDOWN)) { + int lineidx = (curline - LastPromptPosition.line); - // update the current edit buffer - RefreshCurrentEditBuffer(); + CallWindowProc(lpEProc,hwnd,WM_KEYDOWN,VK_END,1); + CallWindowProc(lpEProc,hwnd,WM_KEYUP,VK_END,1); - return r; - } + editbuffer_updateline(CurrentEditBuffer, lineidx, GetLastLine(hwnd)); + } + } + else if ((msg == WM_KEYDOWN) && (mp1 == VK_PRIOR) && (GetKeyState(VK_CONTROL) && 0x8000)) { + // C-p + NextHistoryEntry(); + return 0; + } + else if ((msg == WM_KEYDOWN) && (mp1 == VK_NEXT) && (GetKeyState(VK_CONTROL) && 0x8000)) { + // C-n + PrevHistoryEntry(); + return 0; + } + else if ((msg == WM_KEYDOWN || msg == WM_KEYUP) && (mp1 == VK_DELETE)) { + // see if we're the last char on the line, if so delete the next line + // don't allow deleting left of the prompt + int lineindex = SendMessage(hwnd, EM_LINEINDEX, LastPromptPosition.line, 0) + 2; + int curline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)-1,0); + int nextline = 0; + int curpoint = 0; - // handle errors - switch(msg) - { - case WM_SYNTAXERROR: - case WM_ILLEGALCHAR: - case WM_UNBOUNDVAL: - { // currently I handle them all the same - // get the start of the line - int start = SendMessage(hwnd, EM_LINEINDEX, LastPromptPosition.line, 0) + 2; + SendMessage(hwnd, EM_GETSEL, (WPARAM)&curpoint, (LPARAM)NULL); + nextline = SendMessage(hwnd,EM_LINEFROMCHAR,(WPARAM)(curpoint + 2),0); - // get the statement that error'd - NextHistoryEntry(); + if(curpoint < lineindex) + { // no chomping behind the prompt + return 0; + } else if(nextline != curline) { + // deleting + // grab the next line index + curline -= LastPromptPosition.line; - // tell the history that the last line errored - if(History != NULL) - if(History->Statement != NULL) - History->Statement->isCorrect = FALSE; + // kill it + editbuffer_removeline(CurrentEditBuffer, curline+1); + } + } + else if (msg == WM_PASTE) { + // if they paste text, allow it + r = CallWindowProc(lpEProc, hwnd, msg, mp1, mp2); - // highlight the offending chars - SendMessage(hwnd,EM_SETSEL,(WPARAM)(start + mp1), (LPARAM)(start + mp2)); - - return 0; - } - } + // update the current edit buffer + RefreshCurrentEditBuffer(); - r = CallWindowProc(lpEProc, hwnd, msg, mp1, mp2); + return r; + } - if (postit) - PostMessage(GetParent(hwnd),WM_NEWLINE,0,0); + // handle errors + switch(msg) + { + case WM_SYNTAXERROR: + case WM_ILLEGALCHAR: + case WM_UNBOUNDVAL: + { // currently I handle them all the same + // get the start of the line + int start = SendMessage(hwnd, EM_LINEINDEX, LastPromptPosition.line, 0) + 2; - return r; + // get the statement that error'd + NextHistoryEntry(); + + // tell the history that the last line errored + if(History != NULL) + if(History->Statement != NULL) + History->Statement->isCorrect = FALSE; + + // highlight the offending chars + SendMessage(hwnd,EM_SETSEL,(WPARAM)(start + mp1), (LPARAM)(start + mp2)); + + return 0; + } + } + + r = CallWindowProc(lpEProc, hwnd, msg, mp1, mp2); + + if (postit) + PostMessage(GetParent(hwnd),WM_NEWLINE,0,0); + + return r; } static void SubClassEditField(HWND hwnd) { - if (lpEProc == NULL) { - lpEProc = (WNDPROC) GetWindowLongPtr(hwnd, GWLP_WNDPROC); - } - SetWindowLongPtr(hwnd, GWLP_WNDPROC, (LONG_PTR) SubClassEdit); + if (lpEProc == NULL) { + lpEProc = (WNDPROC) GetWindowLongPtr(hwnd, GWLP_WNDPROC); + } + SetWindowLongPtr(hwnd, GWLP_WNDPROC, (LONG_PTR) SubClassEdit); } /*------------------------------------------------------------------------ @@ -909,42 +911,42 @@ REMOVED! ------------------------------------------------------------------------*/ void SendLastLine(HWND hEdit) { -/* int curline = GetCurLineIndex(hEdit); - char *p,linebuffer[2048]; - int n; - int linescount = GetNumberOfLines(hEdit); +/* int curline = GetCurLineIndex(hEdit); + char *p,linebuffer[2048]; + int n; + int linescount = GetNumberOfLines(hEdit); - *(unsigned short *)linebuffer = sizeof(linebuffer)-1; - if (curline != linescount-1) - n = SendMessage(hEdit,EM_GETLINE,curline,(LPARAM)linebuffer); - else - n = SendMessage(hEdit,EM_GETLINE,curline-1,(LPARAM)linebuffer); - if (n >= 2 && linebuffer[0] == '#' && linebuffer[1] == ' ') { - n -= 2; - memmove(linebuffer, linebuffer+2, n); - } - linebuffer[n] = 0; + *(unsigned short *)linebuffer = sizeof(linebuffer)-1; + if (curline != linescount-1) + n = SendMessage(hEdit,EM_GETLINE,curline,(LPARAM)linebuffer); + else + n = SendMessage(hEdit,EM_GETLINE,curline-1,(LPARAM)linebuffer); + if (n >= 2 && linebuffer[0] == '#' && linebuffer[1] == ' ') { + n -= 2; + memmove(linebuffer, linebuffer+2, n); + } + linebuffer[n] = 0; - // Record user input! - AddToHistory(linebuffer); - linebuffer[n] = '\n'; - linebuffer[n+1] = 0; - WriteToPipe(linebuffer); - if (curline != linescount-1) { - // Copy the line sent to the end of the text - p = strrchr(linebuffer,'\n'); - if (p) { - *p = 0; - } - busy = 1; - AddLineToControl(linebuffer); - busy = 0; - }*/ + // Record user input! + AddToHistory(linebuffer); + linebuffer[n] = '\n'; + linebuffer[n+1] = 0; + WriteToPipe(linebuffer); + if (curline != linescount-1) { + // Copy the line sent to the end of the text + p = strrchr(linebuffer,'\n'); + if (p) { + *p = 0; + } + busy = 1; + AddLineToControl(linebuffer); + busy = 0; + }*/ } /*------------------------------------------------------------------------ Procedure: SendLastEditBuffer ID:1 -Author: Chris Watford watford@uiuc.edu +Author: Chris Watford watford@uiuc.edu Purpose: Sends an edit buffer to the pipe Input: Output: @@ -952,231 +954,231 @@ Errors: -------------------------------------------------------------------------- Edit History: 7 Aug 2004 - Chris Watford christopher.watford@gmail.com - - Fixed error where SendLastEditBuffer sent waaaay too many - newlines which completely broke the underlying connection to the - ocaml.exe pipe - 15 Sept 2003 - Chris Watford watford@uiuc.edu - - Sends line to the pipe and adds newline to the end + - Fixed error where SendLastEditBuffer sent waaaay too many + newlines which completely broke the underlying connection to the + ocaml.exe pipe + 15 Sept 2003 - Chris Watford watford@uiuc.edu + - Sends line to the pipe and adds newline to the end ------------------------------------------------------------------------*/ void SendLastEditBuffer(HWND hwndChild) { - char* line = editbuffer_getasbuffer(CurrentEditBuffer); - int l = strlen(line) - 1; - char* linebuffer = (char*)SafeMalloc(l+2); + char* line = editbuffer_getasbuffer(CurrentEditBuffer); + int l = strlen(line) - 1; + char* linebuffer = (char*)SafeMalloc(l+2); - // save current edit buffer to history and create a new blank edit buffer - CurrentEditBuffer->isCorrect = TRUE; - AddToHistory(CurrentEditBuffer); - CurrentEditBuffer = (EditBuffer*)SafeMalloc(sizeof(EditBuffer)); - CurrentEditBuffer->LineCount = 0; - CurrentEditBuffer->Lines = NULL; + // save current edit buffer to history and create a new blank edit buffer + CurrentEditBuffer->isCorrect = TRUE; + AddToHistory(CurrentEditBuffer); + CurrentEditBuffer = (EditBuffer*)SafeMalloc(sizeof(EditBuffer)); + CurrentEditBuffer->LineCount = 0; + CurrentEditBuffer->Lines = NULL; - // trim and add the newline to the end - strncpy(linebuffer, line, l+1); - while((linebuffer[l] == '\n' || linebuffer[l] == '\r') && (l >= 0)) - { - linebuffer[l--] = '\0'; - } + // trim and add the newline to the end + strncpy(linebuffer, line, l+1); + while((linebuffer[l] == '\n' || linebuffer[l] == '\r') && (l >= 0)) + { + linebuffer[l--] = '\0'; + } - linebuffer[l+1] = '\n'; - linebuffer[l+2] = '\0'; + linebuffer[l+1] = '\n'; + linebuffer[l+2] = '\0'; - // save line to the pipe - WriteToPipe(linebuffer); + // save line to the pipe + WriteToPipe(linebuffer); } /*------------------------------------------------------------------------ Procedure: SendingFullCommand ID:1 -Author: Chris Watford watford@uiuc.edu -Purpose: Returns if the command being sent +Author: Chris Watford watford@uiuc.edu +Purpose: Returns if the command being sent Input: The edit control window handle Output: None explicit Errors: None -------------------------------------------------------------------------- Edit History: - 7 Aug 2004 - Chris Watford christopher.watford@gmail.com - - Fixed bug #2932 where many carraige returns were sent and it came - back with a null pointer error due to a fault of not checking if - the line returned was NULL - 13 Oct 2003 - Chris Watford watford@uiuc.edu - - Solved the error when you have a malformed comment in the buffer + 7 Aug 2004 - Chris Watford christopher.watford@gmail.com + - Fixed bug #2932 where many carraige returns were sent and it came + back with a null pointer error due to a fault of not checking if + the line returned was NULL + 13 Oct 2003 - Chris Watford watford@uiuc.edu + - Solved the error when you have a malformed comment in the buffer ------------------------------------------------------------------------*/ BOOL SendingFullCommand(void) { - // if there is a ;; on the line, return true - char *line = editbuffer_getasline(CurrentEditBuffer); - char *firstComment, *firstSemiColonSemiColon, *firstQuote; + // if there is a ;; on the line, return true + char *line = editbuffer_getasline(CurrentEditBuffer); + char *firstComment, *firstSemiColonSemiColon, *firstQuote; - if(line == NULL) - { - return FALSE; - } + if(line == NULL) + { + return FALSE; + } - firstComment = strstr(line, "(*"); - firstSemiColonSemiColon = strstr(line, ";;"); - firstQuote = strstr(line, "\""); + firstComment = strstr(line, "(*"); + firstSemiColonSemiColon = strstr(line, ";;"); + firstQuote = strstr(line, "\""); - // easy case :D - if(firstSemiColonSemiColon == NULL) - { - free(line); - return FALSE; - } + // easy case :D + if(firstSemiColonSemiColon == NULL) + { + free(line); + return FALSE; + } - // if there are no comments - if(firstComment == NULL) - { - // if there are no quotations used - if(firstQuote == NULL) - { - BOOL r = (firstSemiColonSemiColon != NULL); - free(line); - return r; - } else { - // we need to first check if the ;; is before the \", since the \" - // won't matter if its before the semicolonsemicolon - if(firstQuote < firstSemiColonSemiColon) - { - // the quote is before the ;;, we need to make sure its terminated - // also we have to check for escaped quotes, le sigh! - char *c = firstQuote+1; - BOOL in_quote = TRUE; - - // in-quote determiner loop - while(c[0] != '\0') - { - // are we a backslash? - if(c[0] == '\\') - { - // ignore the next character - c++; - } - else - { - // are we a quote? - if(c[0] == '"') - { - in_quote = !in_quote; - } - } + // if there are no comments + if(firstComment == NULL) + { + // if there are no quotations used + if(firstQuote == NULL) + { + BOOL r = (firstSemiColonSemiColon != NULL); + free(line); + return r; + } else { + // we need to first check if the ;; is before the \", since the \" + // won't matter if its before the semicolonsemicolon + if(firstQuote < firstSemiColonSemiColon) + { + // the quote is before the ;;, we need to make sure its terminated + // also we have to check for escaped quotes, le sigh! + char *c = firstQuote+1; + BOOL in_quote = TRUE; - c++; - } + // in-quote determiner loop + while(c[0] != '\0') + { + // are we a backslash? + if(c[0] == '\\') + { + // ignore the next character + c++; + } + else + { + // are we a quote? + if(c[0] == '"') + { + in_quote = !in_quote; + } + } - free(line); - return !in_quote; - } else { - BOOL r = (firstSemiColonSemiColon != NULL); - free(line); - return r; - } - } - } else { - // we have to search through finding all comments + c++; + } - // a neat little trick we can do is compare the point at which - // the ;; is and where the first (* can be found, if the ;; is - // before the (* ocaml.exe ignores the comment - if((unsigned int)firstSemiColonSemiColon < (unsigned int)firstComment) - { - free(line); - return TRUE; - } else { - // time to search and find if the endline is inside a comment or not - // start at the first comment, and move forward keeping track of the - // nesting level, if the nest level is 0, i.e. outside a comment - // and we find the ;; return TRUE immediately, otherwise keep searching - // if we end with a nest level >0 return FALSE + free(line); + return !in_quote; + } else { + BOOL r = (firstSemiColonSemiColon != NULL); + free(line); + return r; + } + } + } else { + // we have to search through finding all comments - char *c = firstComment+2; // firstComment[0] is the '(', firstComment[1] is the '*' - int nestLevel = 1; // we have a (* + // a neat little trick we can do is compare the point at which + // the ;; is and where the first (* can be found, if the ;; is + // before the (* ocaml.exe ignores the comment + if((unsigned int)firstSemiColonSemiColon < (unsigned int)firstComment) + { + free(line); + return TRUE; + } else { + // time to search and find if the endline is inside a comment or not + // start at the first comment, and move forward keeping track of the + // nesting level, if the nest level is 0, i.e. outside a comment + // and we find the ;; return TRUE immediately, otherwise keep searching + // if we end with a nest level >0 return FALSE - // in-comment determiner loop - while(c[0] != '\0') - { - // are we an endline - if((c[0] == ';') && (c[1] == ';')) - { - // if we are NOT in a comment, its a full line - if(nestLevel <= 0) - { - free(line); - return TRUE; - } - } + char *c = firstComment+2; // firstComment[0] is the '(', firstComment[1] is the '*' + int nestLevel = 1; // we have a (* - // are we in a comment? - if((c[0] == '(') && (c[1] == '*')) - { - nestLevel++; + // in-comment determiner loop + while(c[0] != '\0') + { + // are we an endline + if((c[0] == ';') && (c[1] == ';')) + { + // if we are NOT in a comment, its a full line + if(nestLevel <= 0) + { + free(line); + return TRUE; + } + } - // watch out we may go past the end - if(c[2] == '\0') - { - free(line); - return FALSE; - } + // are we in a comment? + if((c[0] == '(') && (c[1] == '*')) + { + nestLevel++; - // c needs to advance past the *, cause (*) is NOT the start/finish of a comment - c++; - } + // watch out we may go past the end + if(c[2] == '\0') + { + free(line); + return FALSE; + } - // adjust the nesting down a level - if((c[0] == '*') && (c[1] == ')')) - nestLevel--; + // c needs to advance past the *, cause (*) is NOT the start/finish of a comment + c++; + } - // next char - c++; - } + // adjust the nesting down a level + if((c[0] == '*') && (c[1] == ')')) + nestLevel--; - // not a full line - free(line); - return FALSE; - } - } + // next char + c++; + } - // weird case ;) - free(line); - return FALSE; + // not a full line + free(line); + return FALSE; + } + } + + // weird case ;) + free(line); + return FALSE; } /*------------------------------------------------------------------------ Procedure: AppendToEditBuffer ID:1 -Author: Chris Watford watford@uiuc.edu +Author: Chris Watford watford@uiuc.edu Purpose: Add a line to the edit buffer -Input: Handle of the edit control +Input: Handle of the edit control Output: Errors: ------------------------------------------------------------------------*/ void AppendToEditBuffer(HWND hEdit) { - char *p = NULL, linebuffer[2048]; - int n = 0; - int curline = GetCurLineIndex(hEdit); - int linescount = GetNumberOfLines(hEdit); + char *p = NULL, linebuffer[2048]; + int n = 0; + int curline = GetCurLineIndex(hEdit); + int linescount = GetNumberOfLines(hEdit); - // they are passing the size of the buffer as - // the first 'short' in the array... - *(unsigned short *)linebuffer = sizeof(linebuffer)-1; + // they are passing the size of the buffer as + // the first 'short' in the array... + *(unsigned short *)linebuffer = sizeof(linebuffer)-1; - if (curline > (linescount-1)) - { - n = SendMessage(hEdit, EM_GETLINE, curline, (LPARAM)linebuffer); - } else { - n = SendMessage(hEdit, EM_GETLINE, --curline, (LPARAM)linebuffer); - } + if (curline > (linescount-1)) + { + n = SendMessage(hEdit, EM_GETLINE, curline, (LPARAM)linebuffer); + } else { + n = SendMessage(hEdit, EM_GETLINE, --curline, (LPARAM)linebuffer); + } - // correct for the prompt line - if (n >= 2 && linebuffer[0] == '#' && linebuffer[1] == ' ') - { - n -= 2; - memmove(linebuffer, linebuffer+2, n); - } + // correct for the prompt line + if (n >= 2 && linebuffer[0] == '#' && linebuffer[1] == ' ') + { + n -= 2; + memmove(linebuffer, linebuffer+2, n); + } - linebuffer[n] = '\0'; + linebuffer[n] = '\0'; - // linebuffer now has the line to add to our edit buffer - editbuffer_updateoraddline(CurrentEditBuffer, (curline - LastPromptPosition.line), linebuffer); + // linebuffer now has the line to add to our edit buffer + editbuffer_updateoraddline(CurrentEditBuffer, (curline - LastPromptPosition.line), linebuffer); } /*------------------------------------------------------------------------ @@ -1189,10 +1191,10 @@ Errors: ------------------------------------------------------------------------*/ void SetLastPrompt(HWND hEdit) { - DWORD startpos,endpos; - SendMessage(hEdit,EM_GETSEL,(WPARAM)&startpos,(LPARAM)&endpos); - LastPromptPosition.line = SendMessage(hEdit,EM_LINEFROMCHAR,(WPARAM)-1,0); - LastPromptPosition.col = startpos; + DWORD startpos,endpos; + SendMessage(hEdit,EM_GETSEL,(WPARAM)&startpos,(LPARAM)&endpos); + LastPromptPosition.line = SendMessage(hEdit,EM_LINEFROMCHAR,(WPARAM)-1,0); + LastPromptPosition.col = startpos; } /*------------------------------------------------------------------------ @@ -1206,194 +1208,194 @@ Output: Errors: -------------------------------------------------------------------------- Edit History: - 14 Sept 2003 - Chris Watford watford@uiuc.edu - - Added edit buffer and statement buffer support to the WM_NEWLINE - message. - 15 Sept 2003 - Chris Watford watford@uiuc.edu - - Got it adding to the edit buffer - 16 Sept 2003 - Chris Watford watford@uiuc.edu - - Proper handling of newline message finished - 21 Sept 2003 - Chris Watford watford@uiuc.edu - - Added error detection on return from ocaml interp - 23 Sept 2003 - Chris Watford watford@uiuc.edu - - Fixed prompt detection error as pointed out by Patrick Meredith + 14 Sept 2003 - Chris Watford watford@uiuc.edu + - Added edit buffer and statement buffer support to the WM_NEWLINE + message. + 15 Sept 2003 - Chris Watford watford@uiuc.edu + - Got it adding to the edit buffer + 16 Sept 2003 - Chris Watford watford@uiuc.edu + - Proper handling of newline message finished + 21 Sept 2003 - Chris Watford watford@uiuc.edu + - Added error detection on return from ocaml interp + 23 Sept 2003 - Chris Watford watford@uiuc.edu + - Fixed prompt detection error as pointed out by Patrick Meredith ------------------------------------------------------------------------*/ static LRESULT CALLBACK MdiChildWndProc(HWND hwnd,UINT msg,WPARAM wparam,LPARAM lparam) { - HWND hwndChild; - RECT rc; - HDC hDC; + HWND hwndChild; + RECT rc; + HDC hDC; - switch(msg) { - case WM_CREATE: - GetClientRect(hwnd,&rc); - hwndChild= CreateWindow("EDIT", - NULL, - WS_CHILD | WS_VISIBLE | - ES_MULTILINE | - WS_VSCROLL | WS_HSCROLL | - ES_AUTOHSCROLL | ES_AUTOVSCROLL, - 0, - 0, - (rc.right-rc.left), - (rc.bottom-rc.top), - hwnd, - (HMENU) EditControls++, - hInst, - NULL); - SetWindowLongPtr(hwnd, DWLP_USER, (LONG_PTR) hwndChild); - SendMessage(hwndChild, WM_SETFONT, (WPARAM) ProgramParams.hFont, 0L); - SendMessage(hwndChild,EM_LIMITTEXT,0xffffffff,0); - SubClassEditField(hwndChild); - break; - // Resize the edit control - case WM_SIZE: - hwndChild = (HWND) GetWindowLongPtr(hwnd, DWLP_USER); - MoveWindow(hwndChild, 0, 0, LOWORD(lparam), HIWORD(lparam), TRUE); - break; - // Always set the focus to the edit control. - case WM_SETFOCUS: - hwndChild = (HWND) GetWindowLongPtr(hwnd, DWLP_USER); - SetFocus(hwndChild); - break; - // Repainting of the edit control about to happen. - // Set the text color and the background color - case WM_CTLCOLOREDIT: - hDC = (HDC)wparam; - SetTextColor(hDC,ProgramParams.TextColor); - SetBkColor(hDC,BackColor); - return (LRESULT)BackgroundBrush; - // Take care of erasing the background color to avoid flicker - case WM_ERASEBKGND: - GetWindowRect(hwnd,&rc); - hDC = (HDC)wparam; - FillRect(hDC,&rc,BackgroundBrush); - return 1; - // A carriage return has been pressed. Send the data to the interpreted. - // This message is posted by the subclassed edit field. - case WM_COMMAND: - if (LOWORD(wparam) >= IDEDITCONTROL && LOWORD(wparam) < IDEDITCONTROL+5) { - switch (HIWORD(wparam)) { - case EN_ERRSPACE: - case EN_MAXTEXT: - ResetText(); - break; - } - } - break; - case WM_NEWLINE: - if (busy) - break; + switch(msg) { + case WM_CREATE: + GetClientRect(hwnd,&rc); + hwndChild= CreateWindow("EDIT", + NULL, + WS_CHILD | WS_VISIBLE | + ES_MULTILINE | + WS_VSCROLL | WS_HSCROLL | + ES_AUTOHSCROLL | ES_AUTOVSCROLL, + 0, + 0, + (rc.right-rc.left), + (rc.bottom-rc.top), + hwnd, + (HMENU) EditControls++, + hInst, + NULL); + SetWindowLongPtr(hwnd, DWLP_USER, (LONG_PTR) hwndChild); + SendMessage(hwndChild, WM_SETFONT, (WPARAM) ProgramParams.hFont, 0L); + SendMessage(hwndChild,EM_LIMITTEXT,0xffffffff,0); + SubClassEditField(hwndChild); + break; + // Resize the edit control + case WM_SIZE: + hwndChild = (HWND) GetWindowLongPtr(hwnd, DWLP_USER); + MoveWindow(hwndChild, 0, 0, LOWORD(lparam), HIWORD(lparam), TRUE); + break; + // Always set the focus to the edit control. + case WM_SETFOCUS: + hwndChild = (HWND) GetWindowLongPtr(hwnd, DWLP_USER); + SetFocus(hwndChild); + break; + // Repainting of the edit control about to happen. + // Set the text color and the background color + case WM_CTLCOLOREDIT: + hDC = (HDC)wparam; + SetTextColor(hDC,ProgramParams.TextColor); + SetBkColor(hDC,BackColor); + return (LRESULT)BackgroundBrush; + // Take care of erasing the background color to avoid flicker + case WM_ERASEBKGND: + GetWindowRect(hwnd,&rc); + hDC = (HDC)wparam; + FillRect(hDC,&rc,BackgroundBrush); + return 1; + // A carriage return has been pressed. Send the data to the interpreted. + // This message is posted by the subclassed edit field. + case WM_COMMAND: + if (LOWORD(wparam) >= IDEDITCONTROL && LOWORD(wparam) < IDEDITCONTROL+5) { + switch (HIWORD(wparam)) { + case EN_ERRSPACE: + case EN_MAXTEXT: + ResetText(); + break; + } + } + break; + case WM_NEWLINE: + if (busy) + break; - hwndChild = (HWND) GetWindowLongPtr(hwnd, DWLP_USER); + hwndChild = (HWND) GetWindowLongPtr(hwnd, DWLP_USER); - // add what they wrote to the edit buffer - AppendToEditBuffer(hwndChild); + // add what they wrote to the edit buffer + AppendToEditBuffer(hwndChild); - /** Modified by Chris Watford 14 Sept 2003, 15 Sept 2003, 16 Sept 2003 **/ - // test if this line has an end or if it needs to be in the Edit Buffer - if(SendingFullCommand()) - { - // send the edit buffer to the interpreter - //SendLastLine(hwndChild); - SendLastEditBuffer(hwndChild); - historyEntry = NULL; - } else { - AddStringToControl(" "); - } - /** End Modifications **/ + /** Modified by Chris Watford 14 Sept 2003, 15 Sept 2003, 16 Sept 2003 **/ + // test if this line has an end or if it needs to be in the Edit Buffer + if(SendingFullCommand()) + { + // send the edit buffer to the interpreter + //SendLastLine(hwndChild); + SendLastEditBuffer(hwndChild); + historyEntry = NULL; + } else { + AddStringToControl(" "); + } + /** End Modifications **/ - break; - // The timer will call us 4 times a second. Look if the interpreter - // has written something in its end of the pipe. - case WM_TIMERTICK: - /** Modified by Chris Watford 21 Sept 2003 **/ - hwndChild = (HWND) GetWindowLongPtr(hwnd, DWLP_USER); + break; + // The timer will call us 4 times a second. Look if the interpreter + // has written something in its end of the pipe. + case WM_TIMERTICK: + /** Modified by Chris Watford 21 Sept 2003 **/ + hwndChild = (HWND) GetWindowLongPtr(hwnd, DWLP_USER); - if (ReadToLineBuffer()) - { - int errMsg = 0; - char *p, *l = lineBuffer; + if (ReadToLineBuffer()) + { + int errMsg = 0; + char *p, *l = lineBuffer; - // Ok we read something. Display the trimmed version - while(((*l) == ' ') || ((*l) == '\t') || ((*l) == '\n') || ((*l) == '\r') || ((*l) == '*')) - l++; + // Ok we read something. Display the trimmed version + while(((*l) == ' ') || ((*l) == '\t') || ((*l) == '\n') || ((*l) == '\r') || ((*l) == '*')) + l++; - SendMessage(hwndChild,EM_REPLACESEL,0,(LPARAM)l); + SendMessage(hwndChild,EM_REPLACESEL,0,(LPARAM)l); - // fix bug where it won't find prompt - p = strrchr(l, '\r'); - if((l[0] == '#') || (p != NULL)) - { - if(p != NULL) - { - if(!strcmp(p, "\r\n# ")) - { - SetLastPrompt(hwndChild); - } - // solve the bug Patrick found - } else if((l[0] == '#') && (l[1] == ' ')) { - SetLastPrompt(hwndChild); - } - } + // fix bug where it won't find prompt + p = strrchr(l, '\r'); + if((l[0] == '#') || (p != NULL)) + { + if(p != NULL) + { + if(!strcmp(p, "\r\n# ")) + { + SetLastPrompt(hwndChild); + } + // solve the bug Patrick found + } else if((l[0] == '#') && (l[1] == ' ')) { + SetLastPrompt(hwndChild); + } + } - // detect syntax errors - if(strstr(lineBuffer, "Syntax error")) - { - errMsg = WM_SYNTAXERROR; - } else if(strstr(lineBuffer, "Illegal character")) { - errMsg = WM_ILLEGALCHAR; - } else if(strstr(lineBuffer, "Unbound value")) { - errMsg = WM_UNBOUNDVAL; - } + // detect syntax errors + if(strstr(lineBuffer, "Syntax error")) + { + errMsg = WM_SYNTAXERROR; + } else if(strstr(lineBuffer, "Illegal character")) { + errMsg = WM_ILLEGALCHAR; + } else if(strstr(lineBuffer, "Unbound value")) { + errMsg = WM_UNBOUNDVAL; + } - // error! error! alert alert! - if(errMsg > 0) - { - int len = strlen(lineBuffer); - char* err = (char*)SafeMalloc(len+1); - char *m = err, *n1 = NULL, *n2 = NULL, *nt = NULL; + // error! error! alert alert! + if(errMsg > 0) + { + int len = strlen(lineBuffer); + char* err = (char*)SafeMalloc(len+1); + char *m = err, *n1 = NULL, *n2 = NULL, *nt = NULL; - // make a copy of the message - strncpy(err, lineBuffer, len); - err[len] = '\0'; + // make a copy of the message + strncpy(err, lineBuffer, len); + err[len] = '\0'; - // find it - m = strstr(err, "Characters "); - if(m == NULL) - break; + // find it + m = strstr(err, "Characters "); + if(m == NULL) + break; - // got the start char - n1 = m + strlen("Characters "); - - // start looking for the end char - nt = strstr(n1, "-"); - if(nt == NULL) - break; - - // makes n1 a valid string - nt[0] = '\0'; + // got the start char + n1 = m + strlen("Characters "); - // end char is right after this - n2 = nt + 1; + // start looking for the end char + nt = strstr(n1, "-"); + if(nt == NULL) + break; - // find the end of n2 - nt = strstr(n2, ":"); - if(nt == NULL) - break; + // makes n1 a valid string + nt[0] = '\0'; - // makes n2 a valid string - nt[0] = '\0'; + // end char is right after this + n2 = nt + 1; - SendMessage(hwndChild, errMsg, (WPARAM)atoi(n1), (LPARAM)atoi(n2)); - } - } - /** End Modifications **/ + // find the end of n2 + nt = strstr(n2, ":"); + if(nt == NULL) + break; - break; + // makes n2 a valid string + nt[0] = '\0'; - } - return DefMDIChildProc(hwnd, msg, wparam, lparam); + SendMessage(hwndChild, errMsg, (WPARAM)atoi(n1), (LPARAM)atoi(n2)); + } + } + /** End Modifications **/ + + break; + + } + return DefMDIChildProc(hwnd, msg, wparam, lparam); } @@ -1413,52 +1415,52 @@ Errors: ------------------------------------------------------------------------*/ static LRESULT CALLBACK MainWndProc(HWND hwnd,UINT msg,WPARAM wParam,LPARAM lParam) { - switch (msg) { - // Create the MDI client invisible window - case WM_CREATE: - hwndMDIClient = CreateMdiClient(hwnd); - TimerId = SetTimer((HWND) 0, 0, 100, (TIMERPROC) TimerProc); - break; - // Move the child windows - case WM_SIZE: - SendMessage(hWndStatusbar,msg,wParam,lParam); - InitializeStatusBar(hWndStatusbar,1); - // Position the MDI client window between the tool and status bars - if (wParam != SIZE_MINIMIZED) { - RECT rc, rcClient; + switch (msg) { + // Create the MDI client invisible window + case WM_CREATE: + hwndMDIClient = CreateMdiClient(hwnd); + TimerId = SetTimer((HWND) 0, 0, 100, (TIMERPROC) TimerProc); + break; + // Move the child windows + case WM_SIZE: + SendMessage(hWndStatusbar,msg,wParam,lParam); + InitializeStatusBar(hWndStatusbar,1); + // Position the MDI client window between the tool and status bars + if (wParam != SIZE_MINIMIZED) { + RECT rc, rcClient; - GetClientRect(hwnd, &rcClient); - GetWindowRect(hWndStatusbar, &rc); - ScreenToClient(hwnd, (LPPOINT)&rc.left); - rcClient.bottom = rc.top; - MoveWindow(hwndMDIClient,rcClient.left,rcClient.top,rcClient.right-rcClient.left, rcClient.bottom-rcClient.top, TRUE); - } + GetClientRect(hwnd, &rcClient); + GetWindowRect(hWndStatusbar, &rc); + ScreenToClient(hwnd, (LPPOINT)&rc.left); + rcClient.bottom = rc.top; + MoveWindow(hwndMDIClient,rcClient.left,rcClient.top,rcClient.right-rcClient.left, rcClient.bottom-rcClient.top, TRUE); + } - return 0; - // Dispatch the menu commands - case WM_COMMAND: - HandleCommand(hwnd, wParam,lParam); - return 0; - // If user confirms close - case WM_CLOSE: - if (!AskYesOrNo("Quit OCamlWinPlus?")) - return 0; - break; - // End application - case WM_DESTROY: - PostQuitMessage(0); - break; - // The interpreter has exited. Force close of the application - case WM_QUITOCAML: - DestroyWindow(hwnd); - return 0; - case WM_USER+1000: - // TestGraphics(); - break; - default: - return DefFrameProc(hwnd,hwndMDIClient,msg,wParam,lParam); - } - return DefFrameProc(hwnd,hwndMDIClient,msg,wParam,lParam); + return 0; + // Dispatch the menu commands + case WM_COMMAND: + HandleCommand(hwnd, wParam,lParam); + return 0; + // If user confirms close + case WM_CLOSE: + if (!AskYesOrNo("Quit OCamlWinPlus?")) + return 0; + break; + // End application + case WM_DESTROY: + PostQuitMessage(0); + break; + // The interpreter has exited. Force close of the application + case WM_QUITOCAML: + DestroyWindow(hwnd); + return 0; + case WM_USER+1000: + // TestGraphics(); + break; + default: + return DefFrameProc(hwnd,hwndMDIClient,msg,wParam,lParam); + } + return DefFrameProc(hwnd,hwndMDIClient,msg,wParam,lParam); } /*------------------------------------------------------------------------ @@ -1470,17 +1472,17 @@ Errors: ------------------------------------------------------------------------*/ static HFONT CreationCourier(int flag) { - LOGFONT CurrentFont; - memset(&CurrentFont, 0, sizeof(LOGFONT)); - CurrentFont.lfCharSet = ANSI_CHARSET; - CurrentFont.lfWeight = FW_NORMAL; - if (flag) - CurrentFont.lfHeight = 18; - else - CurrentFont.lfHeight = 15; - CurrentFont.lfPitchAndFamily = (BYTE) (FIXED_PITCH | FF_MODERN); - strcpy(CurrentFont.lfFaceName, "Courier"); /* Courier */ - return (CreateFontIndirect(&CurrentFont)); + LOGFONT CurrentFont; + memset(&CurrentFont, 0, sizeof(LOGFONT)); + CurrentFont.lfCharSet = ANSI_CHARSET; + CurrentFont.lfWeight = FW_NORMAL; + if (flag) + CurrentFont.lfHeight = 18; + else + CurrentFont.lfHeight = 15; + CurrentFont.lfPitchAndFamily = (BYTE) (FIXED_PITCH | FF_MODERN); + strcpy(CurrentFont.lfFaceName, "Courier"); /* Courier */ + return (CreateFontIndirect(&CurrentFont)); } /*------------------------------------------------------------------------ @@ -1493,8 +1495,8 @@ Errors: None ------------------------------------------------------------------------*/ int ReadToLineBuffer(void) { - memset(lineBuffer,0,sizeof(lineBuffer)); - return ReadFromPipe(lineBuffer,sizeof(lineBuffer)); + memset(lineBuffer,0,sizeof(lineBuffer)); + return ReadFromPipe(lineBuffer,sizeof(lineBuffer)); } /*------------------------------------------------------------------------ @@ -1507,10 +1509,10 @@ Errors: ------------------------------------------------------------------------*/ int AddLineBuffer(void) { - HWND hEditCtrl; + HWND hEditCtrl; - hEditCtrl = (HWND)GetWindowLongPtr(hwndSession,DWLP_USER); - return SendMessage(hEditCtrl,EM_REPLACESEL,0,(LPARAM)lineBuffer); + hEditCtrl = (HWND)GetWindowLongPtr(hwndSession,DWLP_USER); + return SendMessage(hEditCtrl,EM_REPLACESEL,0,(LPARAM)lineBuffer); } @@ -1524,14 +1526,14 @@ Errors: ------------------------------------------------------------------------*/ static int Setup(HANDLE *phAccelTable) { - if (!InitApplication()) - return 0; - ProgramParams.hFont = CreationCourier(1); - ProgramParams.TextColor = RGB(0,0,0); - GetObject(ProgramParams.hFont,sizeof(LOGFONT),&CurrentFont); - BackgroundBrush = CreateSolidBrush(BackColor); - *phAccelTable = LoadAccelerators(hInst,MAKEINTRESOURCE(IDACCEL)); - return 1; + if (!InitApplication()) + return 0; + ProgramParams.hFont = CreationCourier(1); + ProgramParams.TextColor = RGB(0,0,0); + GetObject(ProgramParams.hFont,sizeof(LOGFONT),&CurrentFont); + BackgroundBrush = CreateSolidBrush(BackColor); + *phAccelTable = LoadAccelerators(hInst,MAKEINTRESOURCE(IDACCEL)); + return 1; } @@ -1544,56 +1546,56 @@ Errors: ------------------------------------------------------------------------*/ int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, INT nCmdShow) { - MSG msg; - HANDLE hAccelTable; - char consoleTitle[512]; - HWND hwndConsole; + MSG msg; + HANDLE hAccelTable; + char consoleTitle[512]; + HWND hwndConsole; - CurrentEditBuffer = (EditBuffer*)SafeMalloc(sizeof(EditBuffer)); - CurrentEditBuffer->LineCount = 0; - CurrentEditBuffer->Lines = NULL; + CurrentEditBuffer = (EditBuffer*)SafeMalloc(sizeof(EditBuffer)); + CurrentEditBuffer->LineCount = 0; + CurrentEditBuffer->Lines = NULL; - //setup the history index pointer - historyEntry = NULL; + //setup the history index pointer + historyEntry = NULL; - // Setup the hInst global - hInst = hInstance; - // Do the setup - if (!Setup(&hAccelTable)) - return 0; - // Need to set up a console so that we can send ctrl-break signal - // to inferior Caml - AllocConsole(); - GetConsoleTitle(consoleTitle,sizeof(consoleTitle)); - hwndConsole = FindWindow(NULL,consoleTitle); - ShowWindow(hwndConsole,SW_HIDE); - // Create main window and exit if this fails - if ((hwndMain = CreateinriaWndClassWnd()) == (HWND)0) - return 0; - // Create the status bar - CreateSBar(hwndMain,"Ready",2); - // Show the window - ShowWindow(hwndMain,SW_SHOW); - // Create the session window - hwndSession = MDICmdFileNew("Session transcript",0); - // Get the path to ocaml.exe - GetOcamlPath(); - // Start the interpreter - StartOcaml(); - // Show the session window - ShowWindow(hwndSession, SW_SHOW); - // Maximize it - SendMessage(hwndMDIClient, WM_MDIMAXIMIZE, (WPARAM) hwndSession, 0); + // Setup the hInst global + hInst = hInstance; + // Do the setup + if (!Setup(&hAccelTable)) + return 0; + // Need to set up a console so that we can send ctrl-break signal + // to inferior Caml + AllocConsole(); + GetConsoleTitle(consoleTitle,sizeof(consoleTitle)); + hwndConsole = FindWindow(NULL,consoleTitle); + ShowWindow(hwndConsole,SW_HIDE); + // Create main window and exit if this fails + if ((hwndMain = CreateinriaWndClassWnd()) == (HWND)0) + return 0; + // Create the status bar + CreateSBar(hwndMain,"Ready",2); + // Show the window + ShowWindow(hwndMain,SW_SHOW); + // Create the session window + hwndSession = MDICmdFileNew("Session transcript",0); + // Get the path to ocaml.exe + GetOcamlPath(); + // Start the interpreter + StartOcaml(); + // Show the session window + ShowWindow(hwndSession, SW_SHOW); + // Maximize it + SendMessage(hwndMDIClient, WM_MDIMAXIMIZE, (WPARAM) hwndSession, 0); - PostMessage(hwndMain,WM_USER+1000,0,0); - while (GetMessage(&msg,NULL,0,0)) { - if (!TranslateMDISysAccel(hwndMDIClient, &msg)) - if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg)) { - TranslateMessage(&msg); // Translates virtual key codes - DispatchMessage(&msg); // Dispatches message to window - } - } - WriteToPipe("#quit;;\r\n\032"); - KillTimer((HWND) 0, TimerId); - return msg.wParam; + PostMessage(hwndMain,WM_USER+1000,0,0); + while (GetMessage(&msg,NULL,0,0)) { + if (!TranslateMDISysAccel(hwndMDIClient, &msg)) + if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg)) { + TranslateMessage(&msg); // Translates virtual key codes + DispatchMessage(&msg); // Dispatches message to window + } + } + WriteToPipe("#quit;;\r\n\032"); + KillTimer((HWND) 0, TimerId); + return msg.wParam; } diff --git a/win32caml/ocaml.rc b/win32caml/ocaml.rc index 52ae94974..0aab9c3c7 100644 --- a/win32caml/ocaml.rc +++ b/win32caml/ocaml.rc @@ -106,7 +106,7 @@ EXSTYLE WS_EX_TOOLWINDOW | WS_EX_CLIENTEDGE CAPTION "About OCamlWinPlus" FONT 8, "MS Sans Serif", 0, 0, 0x1 BEGIN - LTEXT "Objective Caml for Windows",101,75,7,90,12 + LTEXT "OCaml for Windows",101,75,7,90,12 LTEXT "New Windows Interface 1.9RC4",102,68,15,104,12 CTEXT "Copyright 1996-2001\nUpdated 2003",103,88,25,66,23 CTEXT "Institut National de Recherche en Informatique et Automatique", diff --git a/win32caml/startocaml.c b/win32caml/startocaml.c index f1a3562d9..d457dd41b 100644 --- a/win32caml/startocaml.c +++ b/win32caml/startocaml.c @@ -1,8 +1,9 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Developed by Jacob Navia. */ +/* */ /* Copyright 2001 Institut National de Recherche en Informatique et */ /* en Automatique. All rights reserved. This file is distributed */ /* under the terms of the GNU Library General Public License, with */ @@ -37,28 +38,28 @@ Errors: ------------------------------------------------------------------------*/ void ShowDbgMsg(char *str) { - HWND hWnd; - char p[20], message[255]; - hWnd = hwndMain; - if (IsIconic(hWnd)){ - ShowWindow(hWnd,SW_RESTORE); - } - strncpy(message, str, 254); - message[254] = 0; - strcpy(p, "Error"); - MessageBox(hWnd, message, p, MB_OK | MB_ICONHAND|MB_TASKMODAL|MB_SETFOREGROUND); + HWND hWnd; + char p[20], message[255]; + hWnd = hwndMain; + if (IsIconic(hWnd)){ + ShowWindow(hWnd,SW_RESTORE); + } + strncpy(message, str, 254); + message[254] = 0; + strcpy(p, "Error"); + MessageBox(hWnd, message, p, MB_OK | MB_ICONHAND|MB_TASKMODAL|MB_SETFOREGROUND); } int AskYesOrNo(char *msg) { - HWND hwnd; - int r; + HWND hwnd; + int r; - hwnd = hwndMain; - r = MessageBox(hwnd, msg, "Ocaml", MB_YESNO | MB_SETFOREGROUND); - if (r == IDYES) - return (TRUE); - return (FALSE); + hwnd = hwndMain; + r = MessageBox(hwnd, msg, "Ocaml", MB_YESNO | MB_SETFOREGROUND); + if (r == IDYES) + return (TRUE); + return (FALSE); } @@ -66,60 +67,60 @@ static DWORD OcamlStatus; static int RegistryError(void) { - char buf[512]; + char buf[512]; - wsprintf(buf,"Error %d writing to the registry",GetLastError()); - ShowDbgMsg(buf); - return 0; + wsprintf(buf,"Error %d writing to the registry",GetLastError()); + ShowDbgMsg(buf); + return 0; } static int ReadRegistry(HKEY hroot, - char * p1, char * p2, char * p3, - char dest[1024]) + char * p1, char * p2, char * p3, + char dest[1024]) { - HKEY h1, h2; - DWORD dwType; - unsigned long size; - LONG ret; + HKEY h1, h2; + DWORD dwType; + unsigned long size; + LONG ret; - if (RegOpenKeyExA(hroot, p1, 0, KEY_QUERY_VALUE, &h1) != ERROR_SUCCESS) - return 0; - if (RegOpenKeyExA(h1, p2, 0, KEY_QUERY_VALUE, &h2) != ERROR_SUCCESS) { - RegCloseKey(h1); - return 0; - } - dwType = REG_SZ; - size = 1024; - ret = RegQueryValueExA(h2, p3, 0, &dwType, dest, &size); - RegCloseKey(h2); - RegCloseKey(h1); - return ret == ERROR_SUCCESS; + if (RegOpenKeyExA(hroot, p1, 0, KEY_QUERY_VALUE, &h1) != ERROR_SUCCESS) + return 0; + if (RegOpenKeyExA(h1, p2, 0, KEY_QUERY_VALUE, &h2) != ERROR_SUCCESS) { + RegCloseKey(h1); + return 0; + } + dwType = REG_SZ; + size = 1024; + ret = RegQueryValueExA(h2, p3, 0, &dwType, dest, &size); + RegCloseKey(h2); + RegCloseKey(h1); + return ret == ERROR_SUCCESS; } static int WriteRegistry(HKEY hroot, - char * p1, char * p2, char * p3, - char data[1024]) + char * p1, char * p2, char * p3, + char data[1024]) { - HKEY h1, h2; - DWORD disp; - LONG ret; + HKEY h1, h2; + DWORD disp; + LONG ret; - if (RegOpenKeyExA(hroot, p1, 0, KEY_QUERY_VALUE, &h1) != ERROR_SUCCESS) - return 0; - if (RegCreateKeyExA(h1, p2, 0, NULL, 0, KEY_ALL_ACCESS, NULL, &h2, &disp) - != ERROR_SUCCESS) { - RegCloseKey(h1); - return 0; - } - ret = RegSetValueEx(h2, p3, 0, REG_SZ, data, strlen(data) + 1); - RegCloseKey(h2); - RegCloseKey(h1); - return ret == ERROR_SUCCESS; + if (RegOpenKeyExA(hroot, p1, 0, KEY_QUERY_VALUE, &h1) != ERROR_SUCCESS) + return 0; + if (RegCreateKeyExA(h1, p2, 0, NULL, 0, KEY_ALL_ACCESS, NULL, &h2, &disp) + != ERROR_SUCCESS) { + RegCloseKey(h1); + return 0; + } + ret = RegSetValueEx(h2, p3, 0, REG_SZ, data, strlen(data) + 1); + RegCloseKey(h2); + RegCloseKey(h1); + return ret == ERROR_SUCCESS; } /*------------------------------------------------------------------------ Procedure: GetOcamlPath ID:1 -Purpose: Read the registry key +Purpose: Read the registry key HKEY_LOCAL_MACHINE\Software\Objective Caml or HKEY_CURRENT_USER\Software\Objective Caml, @@ -141,13 +142,13 @@ int GetOcamlPath(void) char path[1024], *p; while (( !ReadRegistry(HKEY_CURRENT_USER, - "Software", "Objective Caml", - "InterpreterPath", path) - && - !ReadRegistry(HKEY_LOCAL_MACHINE, - "Software", "Objective Caml", - "InterpreterPath", path)) - || _access(path, 0) != 0) { + "Software", "Objective Caml", + "InterpreterPath", path) + && + !ReadRegistry(HKEY_LOCAL_MACHINE, + "Software", "Objective Caml", + "InterpreterPath", path)) + || _access(path, 0) != 0) { /* Registry key doesn't exist or contains invalid path */ /* Ask user */ if (!BrowseForFile("Ocaml interpreter|ocaml.exe", path)) { @@ -155,8 +156,8 @@ int GetOcamlPath(void) exit(0); } WriteRegistry(HKEY_CURRENT_USER, - "Software", "Objective Caml", - "InterpreterPath", path); + "Software", "Objective Caml", + "InterpreterPath", path); /* Iterate to validate again */ } strcpy(OcamlPath, path); @@ -185,11 +186,11 @@ Errors: ------------------------------------------------------------------------*/ int IsWindowsNT(void) { - OSVERSIONINFO osv; + OSVERSIONINFO osv; - osv.dwOSVersionInfoSize = sizeof(osv); - GetVersionEx(&osv); - return(osv.dwPlatformId == VER_PLATFORM_WIN32_NT); + osv.dwOSVersionInfoSize = sizeof(osv); + GetVersionEx(&osv); + return(osv.dwPlatformId == VER_PLATFORM_WIN32_NT); } /*------------------------------------------------------------------------ @@ -215,56 +216,56 @@ thread will exit. No error message is shown. DWORD WINAPI DoStartOcaml(LPVOID param) { HWND hwndParent = (HWND) param; - char *cmdline; - int processStarted; - LPSECURITY_ATTRIBUTES lpsa=NULL; - SECURITY_ATTRIBUTES sa; - SECURITY_DESCRIPTOR sd; + char *cmdline; + int processStarted; + LPSECURITY_ATTRIBUTES lpsa=NULL; + SECURITY_ATTRIBUTES sa; + SECURITY_DESCRIPTOR sd; - sa.nLength = sizeof(SECURITY_ATTRIBUTES); - // Under windows NT/2000/Whistler we have to initialize the security descriptors - // This is not necessary under windows 98/95. - if (IsWindowsNT()) { - InitializeSecurityDescriptor(&sd,SECURITY_DESCRIPTOR_REVISION); - SetSecurityDescriptorDacl(&sd,TRUE,NULL,FALSE); - sa.bInheritHandle = TRUE; - sa.lpSecurityDescriptor = &sd; - lpsa = &sa; - } - memset(&startInfo,0,sizeof(STARTUPINFO)); - startInfo.cb = sizeof(STARTUPINFO); - // Create a pipe for the child process's STDOUT. - if (! CreatePipe(&hChildStdoutRd, &hChildStdoutWr, &sa, 0)) - return 0; - // Create a pipe for the child process's STDIN. - if (! CreatePipe(&hChildStdinRd, &hChildStdinWr, &sa, 0)) - return 0; - // Setup the start info structure - startInfo.dwFlags = STARTF_USESTDHANDLES|STARTF_USESHOWWINDOW; - startInfo.wShowWindow = SW_HIDE; - startInfo.hStdOutput = hChildStdoutWr; - startInfo.hStdError = hChildStdoutWr; - startInfo.hStdInput = hChildStdinRd; - cmdline = OcamlPath; - // Set the OCAMLLIB environment variable - SetEnvironmentVariable("OCAMLLIB", LibDir); - // Let's go: start the ocaml interpreter - processStarted = CreateProcess(NULL,cmdline,lpsa,lpsa,1, - CREATE_NEW_PROCESS_GROUP|NORMAL_PRIORITY_CLASS, - NULL,ProgramParams.CurrentWorkingDir,&startInfo,&pi); - if (processStarted) { - WaitForSingleObject(pi.hProcess,INFINITE); - GetExitCodeProcess(pi.hProcess,(unsigned long *)&OcamlStatus); - CloseHandle(pi.hProcess); - PostMessage(hwndMain,WM_QUITOCAML,0,0); - } - else { - char *msg = malloc(1024); - wsprintf(msg,"Impossible to start ocaml.exe in:\n%s",cmdline); - ShowDbgMsg(msg); - free(msg); - } - return 0; + sa.nLength = sizeof(SECURITY_ATTRIBUTES); + // Under windows NT/2000/Whistler we have to initialize the security descriptors + // This is not necessary under windows 98/95. + if (IsWindowsNT()) { + InitializeSecurityDescriptor(&sd,SECURITY_DESCRIPTOR_REVISION); + SetSecurityDescriptorDacl(&sd,TRUE,NULL,FALSE); + sa.bInheritHandle = TRUE; + sa.lpSecurityDescriptor = &sd; + lpsa = &sa; + } + memset(&startInfo,0,sizeof(STARTUPINFO)); + startInfo.cb = sizeof(STARTUPINFO); + // Create a pipe for the child process's STDOUT. + if (! CreatePipe(&hChildStdoutRd, &hChildStdoutWr, &sa, 0)) + return 0; + // Create a pipe for the child process's STDIN. + if (! CreatePipe(&hChildStdinRd, &hChildStdinWr, &sa, 0)) + return 0; + // Setup the start info structure + startInfo.dwFlags = STARTF_USESTDHANDLES|STARTF_USESHOWWINDOW; + startInfo.wShowWindow = SW_HIDE; + startInfo.hStdOutput = hChildStdoutWr; + startInfo.hStdError = hChildStdoutWr; + startInfo.hStdInput = hChildStdinRd; + cmdline = OcamlPath; + // Set the OCAMLLIB environment variable + SetEnvironmentVariable("OCAMLLIB", LibDir); + // Let's go: start the ocaml interpreter + processStarted = CreateProcess(NULL,cmdline,lpsa,lpsa,1, + CREATE_NEW_PROCESS_GROUP|NORMAL_PRIORITY_CLASS, + NULL,ProgramParams.CurrentWorkingDir,&startInfo,&pi); + if (processStarted) { + WaitForSingleObject(pi.hProcess,INFINITE); + GetExitCodeProcess(pi.hProcess,(unsigned long *)&OcamlStatus); + CloseHandle(pi.hProcess); + PostMessage(hwndMain,WM_QUITOCAML,0,0); + } + else { + char *msg = malloc(1024); + wsprintf(msg,"Impossible to start ocaml.exe in:\n%s",cmdline); + ShowDbgMsg(msg); + free(msg); + } + return 0; } /*------------------------------------------------------------------------ @@ -278,12 +279,12 @@ Errors: None ------------------------------------------------------------------------*/ int WriteToPipe(char *data) { - DWORD dwWritten; + DWORD dwWritten; - if (! WriteFile(hChildStdinWr, data, strlen(data), &dwWritten, NULL)) - return 0; + if (! WriteFile(hChildStdinWr, data, strlen(data), &dwWritten, NULL)) + return 0; - return dwWritten; + return dwWritten; } @@ -300,17 +301,17 @@ Errors: None explicit ------------------------------------------------------------------------*/ int ReadFromPipe(char *data,int len) { - DWORD dwRead; + DWORD dwRead; - PeekNamedPipe(hChildStdoutRd,data,len,NULL,&dwRead,NULL); - if (dwRead == 0) - return 0; + PeekNamedPipe(hChildStdoutRd,data,len,NULL,&dwRead,NULL); + if (dwRead == 0) + return 0; - // Read output from the child process, and write to parent's STDOUT. - if( !ReadFile( hChildStdoutRd, data, len, &dwRead, NULL) || dwRead == 0) - return 0; + // Read output from the child process, and write to parent's STDOUT. + if( !ReadFile( hChildStdoutRd, data, len, &dwRead, NULL) || dwRead == 0) + return 0; - return dwRead; + return dwRead; } static DWORD tid; @@ -324,39 +325,39 @@ Errors: ------------------------------------------------------------------------*/ int StartOcaml(void) { - getcwd(ProgramParams.CurrentWorkingDir,sizeof(ProgramParams.CurrentWorkingDir)); - CreateThread(NULL,0,DoStartOcaml,hwndMain,0,&tid); - return 1; + getcwd(ProgramParams.CurrentWorkingDir,sizeof(ProgramParams.CurrentWorkingDir)); + CreateThread(NULL,0,DoStartOcaml,hwndMain,0,&tid); + return 1; } void *SafeMalloc(int size) { - void *result; + void *result; - if (size < 0) { - char message[1024]; + if (size < 0) { + char message[1024]; error: - sprintf(message,"Can't allocate %d bytes",size); - MessageBox(NULL, message, "Ocaml", MB_OK); - exit(-1); - } - result = malloc(size); + sprintf(message,"Can't allocate %d bytes",size); + MessageBox(NULL, message, "Ocaml", MB_OK); + exit(-1); + } + result = malloc(size); - if (result == NULL) - goto error; + if (result == NULL) + goto error; - return result; + return result; } void InterruptOcaml(void) { - if (!GenerateConsoleCtrlEvent(CTRL_BREAK_EVENT, pi.dwProcessId)) { - char message[1024]; - sprintf(message, "GenerateConsole failed: %lu\n", GetLastError()); - MessageBox(NULL, message, "Ocaml", MB_OK); - } - WriteToPipe(" "); + if (!GenerateConsoleCtrlEvent(CTRL_BREAK_EVENT, pi.dwProcessId)) { + char message[1024]; + sprintf(message, "GenerateConsole failed: %lu\n", GetLastError()); + MessageBox(NULL, message, "Ocaml", MB_OK); + } + WriteToPipe(" "); } diff --git a/yacc/Makefile b/yacc/Makefile index a90700f2f..fb560cfd3 100644 --- a/yacc/Makefile +++ b/yacc/Makefile @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/yacc/Makefile.nt b/yacc/Makefile.nt index a33fa0143..14a69f02d 100644 --- a/yacc/Makefile.nt +++ b/yacc/Makefile.nt @@ -1,6 +1,6 @@ ######################################################################### # # -# Objective Caml # +# OCaml # # # # Xavier Leroy, projet Cristal, INRIA Rocquencourt # # # diff --git a/yacc/closure.c b/yacc/closure.c index 1b7926a07..b3f4659d0 100644 --- a/yacc/closure.c +++ b/yacc/closure.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/yacc/defs.h b/yacc/defs.h index 1be27d1a3..75c8ef101 100644 --- a/yacc/defs.h +++ b/yacc/defs.h @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/yacc/error.c b/yacc/error.c index ae0b77aca..f0b92d2d6 100644 --- a/yacc/error.c +++ b/yacc/error.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/yacc/lalr.c b/yacc/lalr.c index f87afb1dc..d595e76d7 100644 --- a/yacc/lalr.c +++ b/yacc/lalr.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/yacc/lr0.c b/yacc/lr0.c index e05fcb072..3da50da00 100644 --- a/yacc/lr0.c +++ b/yacc/lr0.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/yacc/main.c b/yacc/main.c index feb2dbdac..8616b9b3d 100644 --- a/yacc/main.c +++ b/yacc/main.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ @@ -188,7 +188,7 @@ void getargs(int argc, char **argv) case 'v': if (!strcmp (argv[i], "-version")){ - printf ("The Objective Caml parser generator, version " + printf ("The OCaml parser generator, version " OCAML_VERSION "\n"); exit (0); }else if (!strcmp (argv[i], "-vnum")){ diff --git a/yacc/mkpar.c b/yacc/mkpar.c index 1f9759e17..0e20724bf 100644 --- a/yacc/mkpar.c +++ b/yacc/mkpar.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/yacc/output.c b/yacc/output.c index 00d61ac9c..9723d3fa6 100644 --- a/yacc/output.c +++ b/yacc/output.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/yacc/reader.c b/yacc/reader.c index d3c275572..1c36843d4 100644 --- a/yacc/reader.c +++ b/yacc/reader.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/yacc/skeleton.c b/yacc/skeleton.c index 86e152ac2..8048999d7 100644 --- a/yacc/skeleton.c +++ b/yacc/skeleton.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/yacc/symtab.c b/yacc/symtab.c index 87e280a09..f30e4a90d 100644 --- a/yacc/symtab.c +++ b/yacc/symtab.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/yacc/verbose.c b/yacc/verbose.c index 0a1850ff0..799c4969a 100644 --- a/yacc/verbose.c +++ b/yacc/verbose.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */ diff --git a/yacc/warshall.c b/yacc/warshall.c index 5b8f10c89..c9ec782be 100644 --- a/yacc/warshall.c +++ b/yacc/warshall.c @@ -1,6 +1,6 @@ /***********************************************************************/ /* */ -/* Objective Caml */ +/* OCaml */ /* */ /* Xavier Leroy, projet Cristal, INRIA Rocquencourt */ /* */