module TestInterpreter : sig ... end
val mock_get_proc_desc : 'a ‑> 'b option
val tests : OUnit2.test