sig val set_argv_position : int -> unit val compilePrimitive : string -> int -> CfTypes.renv -> unit end