unhandled_unlinked.ml\effects\tests\testsuite - delta/ocaml.git - github.com: ocaml/ocaml

index : delta/ocaml.git

github.com: ocaml/ocaml

summary refs log tree commit diff

path: root/testsuite/tests/effects/unhandled_unlinked.ml

blob: 9ecfbecbc9cc9825e32cb9c2b6df346cc057024f (plain)

(* TEST
 exit_status = "2";
*)

open Effect
type _ t += E : unit t
let _ = perform E