summaryrefslogtreecommitdiff
path: root/testsuite/tests/unwind/driver.ml
blob: d56bef433902a04b7d5857875c954d76496f37e9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
(* TEST
 script = "sh ${test_source_directory}/check-linker-version.sh";
 readonly_files = "mylib.mli mylib.ml stack_walker.c";
 macos;
 script;
 setup-ocamlopt.byte-build-env;
 flags = "-opaque";
 module = "mylib.mli";
 ocamlopt.byte;
 module = "";
 flags = "-cclib -Wl,-keep_dwarf_unwind";
 all_modules = "mylib.ml driver.ml stack_walker.c";
 program = "${test_build_directory}/unwind_test";
 ocamlopt.byte;
 output = "${test_build_directory}/program-output";
 stdout = "${output}";
 stderr = "${output}";
 run;
 reference = "${test_source_directory}/unwind_test.reference";
 check-program-output;
*)

let () =
  Mylib.foo1 Mylib.bar 1 2 3 4 5 6 7 8 9 10;
  Mylib.foo2 Mylib.baz 1 2 3 4 5 6 7 8 9 10

(* https://github.com/ocaml-multicore/ocaml-multicore/issues/274 *)
let () =
  Mylib.foo1 Mylib.bob 1 2 3 4 5 6 7 8 9 10