functor
(
T
:
Stable_unit_test_intf
.
Arg
)
->
sig
val
ounit_tests : unit
->
OUnit
.test
end