blob: 42d8bdde485eff0d011e8efb2487e459ba1f9ffd (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
(* TEST
flags = " -w -a "
ocamlc_byte_exit_status = "2"
* setup-ocamlc.byte-build-env
** ocamlc.byte
*** check-ocamlc.byte-output
*)
include struct
let foo `Test = ()
let wrap f `Test = f
let bar = wrap ()
end
|