include Cstubs.FOREIGN with type 'a Ffi_generated.return = 'a and type 'a Ffi_generated.result = 'a
type 'a fntype 'a return = 'a
val (@->) : 'a Ctypes.typ -> 'b fn -> ('a -> 'b) fnval returning : 'a Ctypes.typ -> 'a return fn
type 'a result = 'a
val foreign : string -> ('a -> 'b) fn -> ('a -> 'b) resultval foreign_value : string -> 'a Ctypes.typ -> 'a Ctypes.ptr result