diff options
Diffstat (limited to 'testsuite/tests')
-rw-r--r-- | testsuite/tests/asmcomp/ia64.S | 2 | ||||
-rw-r--r-- | testsuite/tests/asmcomp/power-aix.S | 2 | ||||
-rw-r--r-- | testsuite/tests/embedded/cmcaml.ml | 2 | ||||
-rw-r--r-- | testsuite/tests/embedded/cmmain.c | 2 | ||||
-rw-r--r-- | testsuite/tests/embedded/program.reference | 2 | ||||
-rw-r--r-- | testsuite/tests/lib-digest/md5.ml | 2 | ||||
-rw-r--r-- | testsuite/tests/lib-dynlink-csharp/bytecode.reference | 2 | ||||
-rwxr-xr-x | testsuite/tests/lib-dynlink-csharp/main.cs | 2 | ||||
-rw-r--r-- | testsuite/tests/lib-dynlink-csharp/native.reference | 2 | ||||
-rw-r--r-- | testsuite/tests/lib-scanf/tscanf.ml | 4 | ||||
-rw-r--r-- | testsuite/tests/misc/bdd.ml | 2 |
11 files changed, 12 insertions, 12 deletions
diff --git a/testsuite/tests/asmcomp/ia64.S b/testsuite/tests/asmcomp/ia64.S index 68d649b53..028c622f9 100644 --- a/testsuite/tests/asmcomp/ia64.S +++ b/testsuite/tests/asmcomp/ia64.S @@ -26,7 +26,7 @@ .proc call_gen_code# call_gen_code: - /* Allocate 64 "out" registers (for the Caml code) and no locals */ + /* Allocate 64 "out" registers (for the OCaml code) and no locals */ alloc r3 = ar.pfs, 0, 0, 64, 0 /* Save PFS, return address and GP on stack */ diff --git a/testsuite/tests/asmcomp/power-aix.S b/testsuite/tests/asmcomp/power-aix.S index ee8a09698..0752100f5 100644 --- a/testsuite/tests/asmcomp/power-aix.S +++ b/testsuite/tests/asmcomp/power-aix.S @@ -123,7 +123,7 @@ .globl .caml_c_call .caml_c_call: # Preserve RTOC and return address in callee-save registers -# The C function will preserve them, and the Caml code does not +# The C function will preserve them, and the OCaml code does not # expect them to be preserved # Return address is in 25, RTOC is in 26 mflr 25 diff --git a/testsuite/tests/embedded/cmcaml.ml b/testsuite/tests/embedded/cmcaml.ml index 4ebed1e7d..65c7a610e 100644 --- a/testsuite/tests/embedded/cmcaml.ml +++ b/testsuite/tests/embedded/cmcaml.ml @@ -1,4 +1,4 @@ -(* Caml part of the code *) +(* OCaml part of the code *) let rec fib n = if n < 2 then 1 else fib(n-1) + fib(n-2) diff --git a/testsuite/tests/embedded/cmmain.c b/testsuite/tests/embedded/cmmain.c index 87647ac50..6c27fe1e9 100644 --- a/testsuite/tests/embedded/cmmain.c +++ b/testsuite/tests/embedded/cmmain.c @@ -9,7 +9,7 @@ extern char * format_result(int n); int main(int argc, char ** argv) { - printf("Initializing Caml code...\n"); + printf("Initializing OCaml code...\n"); #ifdef NO_BYTECODE_FILE caml_startup(argv); #else diff --git a/testsuite/tests/embedded/program.reference b/testsuite/tests/embedded/program.reference index e2752b724..4f27810ca 100644 --- a/testsuite/tests/embedded/program.reference +++ b/testsuite/tests/embedded/program.reference @@ -1,4 +1,4 @@ -Initializing Caml code... +Initializing OCaml code... Back in C code... Computing fib(20)... Result = 10946 diff --git a/testsuite/tests/lib-digest/md5.ml b/testsuite/tests/lib-digest/md5.ml index 6d4e6e064..27aebf2a3 100644 --- a/testsuite/tests/lib-digest/md5.ml +++ b/testsuite/tests/lib-digest/md5.ml @@ -211,7 +211,7 @@ let _ = if (Array.length Sys.argv) > 1 && (Sys.argv.(1) = "-benchmark") then begin let s = String.make 50000 'a' in let num_iter = 1000 in - time "Caml implementation" num_iter + time "OCaml implementation" num_iter (fun () -> let ctx = init() in update ctx s 0 (String.length s); diff --git a/testsuite/tests/lib-dynlink-csharp/bytecode.reference b/testsuite/tests/lib-dynlink-csharp/bytecode.reference index 65592193a..a76daa230 100644 --- a/testsuite/tests/lib-dynlink-csharp/bytecode.reference +++ b/testsuite/tests/lib-dynlink-csharp/bytecode.reference @@ -1,4 +1,4 @@ -Now starting the Caml engine. +Now starting the OCaml engine. Main is running. Loading ../../../otherlibs/bigarray/bigarray.cma I'm the plugin. diff --git a/testsuite/tests/lib-dynlink-csharp/main.cs b/testsuite/tests/lib-dynlink-csharp/main.cs index a03bfd60a..5cbb8e868 100755 --- a/testsuite/tests/lib-dynlink-csharp/main.cs +++ b/testsuite/tests/lib-dynlink-csharp/main.cs @@ -5,7 +5,7 @@ public class M { public static extern void start_caml_engine(); public static void Main() { - System.Console.WriteLine("Now starting the Caml engine."); + System.Console.WriteLine("Now starting the OCaml engine."); start_caml_engine(); } } diff --git a/testsuite/tests/lib-dynlink-csharp/native.reference b/testsuite/tests/lib-dynlink-csharp/native.reference index b6c9e5c43..684f979a8 100644 --- a/testsuite/tests/lib-dynlink-csharp/native.reference +++ b/testsuite/tests/lib-dynlink-csharp/native.reference @@ -1,4 +1,4 @@ -Now starting the Caml engine. +Now starting the OCaml engine. Main is running. Loading ../../../otherlibs/bigarray/bigarray.cmxs I'm the plugin. diff --git a/testsuite/tests/lib-scanf/tscanf.ml b/testsuite/tests/lib-scanf/tscanf.ml index d929eb747..49afdb320 100644 --- a/testsuite/tests/lib-scanf/tscanf.ml +++ b/testsuite/tests/lib-scanf/tscanf.ml @@ -585,7 +585,7 @@ and test27 () = (test27 ()) ;; -(* To scan a Caml string: +(* To scan an OCaml string: the format is "\"%s@\"". A better way would be to add a %S (String.escaped), a %C (Char.escaped). This is now available. *) @@ -950,7 +950,7 @@ test (test340 () && test35 ()) (* The prefered reader functionnals. *) -(* To read a list as in Caml (elements are ``blank + semicolon + blank'' +(* To read a list as in OCaml (elements are ``blank + semicolon + blank'' separated, and the list is enclosed in brackets). *) let rec read_elems read_elem accu ib = kscanf ib (fun ib exc -> accu) diff --git a/testsuite/tests/misc/bdd.ml b/testsuite/tests/misc/bdd.ml index ddf99a729..b2a3d7059 100644 --- a/testsuite/tests/misc/bdd.ml +++ b/testsuite/tests/misc/bdd.ml @@ -12,7 +12,7 @@ (* $Id$ *) -(* Translated to Caml by Xavier Leroy *) +(* Translated to OCaml by Xavier Leroy *) (* Original code written in SML by ... *) type bdd = One | Zero | Node of bdd * int * int * bdd |