module Cstubs_generate_ml

val extern : stub_name:string -> external_name:string -> Format.formatter -> ('a -> 'b) Ctypes.fn -> unit

val case : stub_name:string -> external_name:string -> Format.formatter -> ('a -> 'b) Ctypes.fn -> unit

val constructor_decl : string -> 'a Ctypes.fn -> Format.formatter -> unit

val inverse_case : register_name:string -> constructor:string -> string -> Format.formatter -> ('a -> 'b) Ctypes.fn -> unit