Changeset View
Changeset View
Standalone View
Standalone View
test/Bindings/OCaml/ext_exc.ml
| (* RUN: cp %s %T/ext_exc.ml | (* RUN: rm -rf %t && mkdir -p %t && cp %s %t/ext_exc.ml | ||||
| * RUN: %ocamlc -g -w +A -package llvm.bitreader -linkpkg %T/ext_exc.ml -o %t | * RUN: %ocamlc -g -w +A -package llvm.bitreader -linkpkg %t/ext_exc.ml -o %t/executable | ||||
| * RUN: %t | * RUN: %t/executable | ||||
| * RUN: %ocamlopt -g -w +A -package llvm.bitreader -linkpkg %T/ext_exc.ml -o %t | * RUN: %ocamlopt -g -w +A -package llvm.bitreader -linkpkg %t/ext_exc.ml -o %t/executable | ||||
| * RUN: %t | * RUN: %t/executable | ||||
| * XFAIL: vg_leak | * XFAIL: vg_leak | ||||
| *) | *) | ||||
| let context = Llvm.global_context () | let context = Llvm.global_context () | ||||
| let diagnostic_handler _ = () | let diagnostic_handler _ = () | ||||
| (* This used to crash, we must not use 'external' in .mli files, but 'val' if we | (* This used to crash, we must not use 'external' in .mli files, but 'val' if we | ||||
| Show All 12 Lines | |||||