portmidi

Bindings to libportmidi
IN THIS PACKAGE
val names : string list
val timestamp : ( t, int32 ) Fieldslib.Field.t
val message : ( t, int32 ) Fieldslib.Field.t
val fold : init:'acc__0 -> message:( 'acc__0 -> ( t, int32 ) Fieldslib.Field.t -> 'acc__1 ) -> timestamp:( 'acc__1 -> ( t, int32 ) Fieldslib.Field.t -> 'acc__2 ) -> 'acc__2
val make_creator : message: ( ( t, int32 ) Fieldslib.Field.t -> 'acc__0 -> ( 'input__ -> int32 ) * 'acc__1 ) -> timestamp: ( ( t, int32 ) Fieldslib.Field.t -> 'acc__1 -> ( 'input__ -> int32 ) * 'acc__2 ) -> 'acc__0 -> ( 'input__ -> t ) * 'acc__2
val create : message:int32 -> timestamp:int32 -> t
val map : message:( ( t, int32 ) Fieldslib.Field.t -> int32 ) -> timestamp:( ( t, int32 ) Fieldslib.Field.t -> int32 ) -> t
val iter : message:( ( t, int32 ) Fieldslib.Field.t -> unit ) -> timestamp:( ( t, int32 ) Fieldslib.Field.t -> unit ) -> unit
val for_all : message:( ( t, int32 ) Fieldslib.Field.t -> bool ) -> timestamp:( ( t, int32 ) Fieldslib.Field.t -> bool ) -> bool
val exists : message:( ( t, int32 ) Fieldslib.Field.t -> bool ) -> timestamp:( ( t, int32 ) Fieldslib.Field.t -> bool ) -> bool
val to_list : message:( ( t, int32 ) Fieldslib.Field.t -> 'elem__ ) -> timestamp:( ( t, int32 ) Fieldslib.Field.t -> 'elem__ ) -> 'elem__ list
val map_poly : ( [< `Read | `Set_and_create ], t, 'x0 ) Fieldslib.Field.user -> 'x0 list
module Direct : sig ... end