package portmidi

You can search for identifiers within the package.

in-package search v0.2.0

package portmidi

portmidi
- Portmidi
  - Device_info
    
    Fields
    
    Direct
  - Input_stream
  - Output_stream
  - Portmidi_error
  - Portmidi_event
    
    Fields
    
    Direct
portmidi.c
- Portmidi_c
  - Portmidi_c_generated_functions
portmidi.c_function_descriptions
portmidi.c_type_descriptions
- Portmidi_c_type_descriptions
  - Types
    
    F
    
    Intptr
    
    Infix
    
    Ptrdiff
    
    Infix
    
    Uintptr
    
    Infix
    
    PmDeviceInfo
    
    PmEvent
    
    Pm_error

Legend:
Library
Module
Module type
Parameter
Class
Class type

module CI = Cstubs_internals

val portmidi_stub_1_Pm_Initialize : unit -> int

val portmidi_stub_2_Pm_Terminate : unit -> unit

val portmidi_stub_3_Pm_CountDevices : unit -> int

val portmidi_stub_4_Pm_GetDeviceInfo : int -> CI.voidp

val portmidi_stub_5_Pm_GetErrorText : int -> CI.voidp

val portmidi_stub_6_Pm_OpenInput : 
  (_, _) CI.fatptr ->
  int ->
  (_, _) CI.fatptr ->
  int32 ->
  (_, _) CI.fatptr ->
  (_, _) CI.fatptr ->
  int

val portmidi_stub_7_Pm_OpenOutput : 
  (_, _) CI.fatptr ->
  int ->
  (_, _) CI.fatptr ->
  int32 ->
  (_, _) CI.fatptr ->
  (_, _) CI.fatptr ->
  int32 ->
  int

val portmidi_stub_8_Pm_Abort : (_, _) CI.fatptr -> int

val portmidi_stub_9_Pm_Close : (_, _) CI.fatptr -> int

val portmidi_stub_10_Pm_Read : 
  (_, _) CI.fatptr ->
  (_, _) CI.fatptr ->
  int32 ->
  int

val portmidi_stub_11_Pm_Write : 
  (_, _) CI.fatptr ->
  (_, _) CI.fatptr ->
  int32 ->
  int

val portmidi_stub_12_Pm_WriteSysEx : 
  (_, _) CI.fatptr ->
  int32 ->
  (_, _) CI.fatptr ->
  int

val portmidi_stub_13_Pm_Poll : (_, _) CI.fatptr -> int

type 'a result = 'a

type 'a return = 'a

type 'a fn =

| Returns : 'a CI.typ -> 'a return fn
| Function : 'a CI.typ * 'b fn -> ('a -> 'b) fn

val map_result : ('a -> 'b) -> 'a -> 'b

val returning : 'a CI.typ -> 'a return fn

val (@->) : 'a CI.typ -> 'b fn -> ('a -> 'b) fn

val foreign : 'a 'b. string -> ('a -> 'b) fn -> 'a -> 'b

val foreign_value : 'a. string -> 'a Ctypes.typ -> 'a Ctypes.ptr