diff --git a/compiler/tests-wasm_of_ocaml/dune b/compiler/tests-wasm_of_ocaml/dune new file mode 100644 index 00000000..157c8af8 --- /dev/null +++ b/compiler/tests-wasm_of_ocaml/dune @@ -0,0 +1,13 @@ +(executables + (names gh38) + (modes js) + (js_of_ocaml (flags :standard --disable optcall))) + +(rule + (target gh38.actual) + (enabled_if (= %{profile} wasm)) + (alias runtest) + (action + (with-outputs-to + %{target} + (run node %{dep:gh38.bc.js})))) diff --git a/compiler/tests-wasm_of_ocaml/gh38.ml b/compiler/tests-wasm_of_ocaml/gh38.ml new file mode 100644 index 00000000..5fec74de --- /dev/null +++ b/compiler/tests-wasm_of_ocaml/gh38.ml @@ -0,0 +1,3 @@ +let f () () = () + +let (_ : _ -> _) = f ()