glfw-ocaml 3.2.1~rc1 · OCaml Package

OCaml binding for GLFW 3.2.1

val version_major : int

GLFW-OCaml version numbers.

val version_minor : int

val version_revision : int

exception NotInitialized of string

Exceptions raised by the various functions of this module.

see http://www.glfw.org/docs/latest/group__errors.html
If you ever get an InvalidEnum exception and are not using unsafe features that would be a bug in GLFW-OCaml. Please fill an issue on GitHub.

exception NoCurrentContext of string

exception InvalidEnum of string

exception InvalidValue of string

exception OutOfMemory of string

exception ApiUnavailable of string

exception VersionUnavailable of string

exception PlatformError of string

exception FormatUnavailable of string

exception NoWindowContext of string

type key_action =

| Release
| Press
| Repeat

Key actions.

see http://www.glfw.org/docs/latest/group__input.html

type key =

| Unknown
| Space
| Apostrophe
| Comma
| Minus
| Period
| Slash
| Num0
| Num1
| Num2
| Num3
| Num4
| Num5
| Num6
| Num7
| Num8
| Num9
| Semicolon
| Equal
| A
| B
| C
| D
| E
| F
| G
| H
| I
| J
| K
| L
| M
| N
| O
| P
| Q
| R
| S
| T
| U
| V
| W
| X
| Y
| Z
| LeftBracket
| Backslash
| RightBracket
| GraveAccent
| World1
| World2
| Escape
| Enter
| Tab
| Backspace
| Insert
| Delete
| Right
| Left
| Down
| Up
| PageUp
| PageDown
| Home
| End
| CapsLock
| ScrollLock
| NumLock
| PrintScreen
| Pause
| F1
| F2
| F3
| F4
| F5
| F6
| F7
| F8
| F9
| F10
| F11
| F12
| F13
| F14
| F15
| F16
| F17
| F18
| F19
| F20
| F21
| F22
| F23
| F24
| F25
| Kp0
| Kp1
| Kp2
| Kp3
| Kp4
| Kp5
| Kp6
| Kp7
| Kp8
| Kp9
| KpDecimal
| KpDivide
| KpMultiply
| KpSubtract
| KpAdd
| KpEnter
| KpEqual
| LeftShift
| LeftControl
| LeftAlt
| LeftSuper
| RightShift
| RightControl
| RightAlt
| RightSuper
| Menu

Keyboard keys.

see http://www.glfw.org/docs/latest/group__keys.html

type key_mod =

| Shift
| Control
| Alt
| Super

Keyboard key and mouse button modifiers.

see http://www.glfw.org/docs/latest/group__mods.html

val mouse_button_max_count : int

Maximum number of buttons handled for a mouse.

val joystick_max_count : int

Maximum number of buttons handled for a joystick.

type client_api =

| NoApi
| OpenGLApi
| OpenGLESApi

Client OpenGL API hint

type context_robustness =

| NoRobustness
| NoResetNotification
| LoseContextOnReset

Context robustness hint

type opengl_profile =

| AnyProfile
| CoreProfile
| CompatProfile

OpenGL profile hint

type context_release_behavior =

| AnyReleaseBehavior
| ReleaseBehaviorFlush
| ReleaseBehaviorNone

Context release behavior hint

type context_creation_api =

| NativeContextApi
| EGLContextApi

Context creation API hint

module WindowHint : sig ... end

Window hints. Use with setWindowHint like this:

module WindowAttribute : sig ... end

Windows attributes. Use with getWindowAttrib in a similar manner as with window hints.

type cursor_mode =

| Normal
| Hidden
| Disabled

Mouse cursor input mode.

type _ input_mode =

| Cursor : cursor_mode input_mode
| StickyKeys : bool input_mode
| StickyMouseButtons : bool input_mode

Input modes. Use with setInputMode and getInputMode in a similar manner as with window hints.

see http://www.glfw.org/docs/latest/group__input.html#gaa92336e173da9c8834558b54ee80563b

type cursor_shape =

| ArrowCursor
| IBeamCursor
| CrosshairCursor
| HandCursor
| HResizeCursor
| VResizeCursor

Standard cursor shapes.

type connection_event =

| Connected
| Disconnected

Joystick connection event.

type video_mode = {

width : int;
height : int;
red_bits : int;
green_bits : int;
blue_bits : int;
refresh_rate : int;

}

Video mode description as returned by getVideoMode(s).

see http://www.glfw.org/docs/latest/structGLFWvidmode.html

type monitor

type window

type cursor

module GammaRamp : sig ... end

GammaRamp module. Describes the gamma ramp for a monitor.

type image = {

width : int;
height : int;
pixels : bytes;

}

Image data for creating custom cursors.

see http://www.glfw.org/docs/latest/structGLFWimage.html

Module functions. These are mostly identical to their original GLFW counterparts.

There are no bindings for the glfwSetWindowUserPointer and glfwGetWindowUserPointer functions because you would have to use unsafe features to set the correct type for your data. If you need to make user data accessible inside a callback you can instead capture it in a closure and use that closure as your callback function.

There is no binding for the glfwGetProcAddress function because it would basicaly require to write an entire OpenGL wrapper to make the functions returned by GLFW usable from OCaml. Incidentaly the glfwExtensionSupported function is not provided either. There are numerous OpenGL bindings available for OCaml that you can use instead.

The Vulkan related functions are not supported as of now but we might look into it at some point.

see http://www.glfw.org/docs/latest/glfw3_8h.html#func-members

val init : unit -> unit

val terminate : unit -> unit

val getVersion : unit -> int * int * int

val getVersionString : unit -> string

val getMonitors : unit -> monitor list

val getPrimaryMonitor : unit -> monitor

val getMonitorPos : monitor:monitor -> int * int

val getMonitorPhysicalSize : monitor:monitor -> int * int

val getMonitorName : monitor:monitor -> string

val setMonitorCallback : 
  f:(monitor -> connection_event -> unit) option ->
  (monitor -> connection_event -> unit) option

val getVideoModes : monitor:monitor -> video_mode list

val getVideoMode : monitor:monitor -> video_mode

val setGamma : monitor:monitor -> gamma:float -> unit

val getGammaRamp : monitor:monitor -> GammaRamp.t

val setGammaRamp : monitor:monitor -> gamma_ramp:GammaRamp.t -> unit

val defaultWindowHints : unit -> unit

val windowHint : hint:'a WindowHint.t -> value:'a -> unit

val createWindow : 
  width:int ->
  height:int ->
  title:string ->
  ?monitor:monitor ->
  ?share:window ->
  unit ->
  window

val destroyWindow : window:window -> unit

val windowShouldClose : window:window -> bool

val setWindowShouldClose : window:window -> b:bool -> unit

val setWindowTitle : window:window -> title:string -> unit

val setWindowIcon : window:window -> images:image list -> unit

val getWindowPos : window:window -> int * int

val setWindowPos : window:window -> xpos:int -> ypos:int -> unit

val getWindowSize : window:window -> int * int

val setWindowSizeLimits : 
  window:window ->
  minWidth:int option ->
  minHeight:int option ->
  maxWidth:int option ->
  maxHeight:int option ->
  unit

val setWindowAspectRatio : window:window -> numer:int -> denom:int -> unit

val setWindowSize : window:window -> width:int -> height:int -> unit

val getFramebufferSize : window:window -> int * int

val getWindowFrameSize : window:window -> int * int * int * int

val iconifyWindow : window:window -> unit

val restoreWindow : window:window -> unit

val maximizeWindow : window:window -> unit

val showWindow : window:window -> unit

val hideWindow : window:window -> unit

val focusWindow : window:window -> unit

val getWindowMonitor : window:window -> monitor option

val setWindowMonitor : 
  window:window ->
  monitor:monitor option ->
  xpos:int ->
  ypos:int ->
  width:int ->
  height:int ->
  refreshRate:int option ->
  unit

val getWindowAttrib : window:window -> attribute:'a WindowAttribute.t -> 'a

val setWindowPosCallback : 
  window:window ->
  f:(window -> int -> int -> unit) option ->
  (window -> int -> int -> unit) option

val setWindowSizeCallback : 
  window:window ->
  f:(window -> int -> int -> unit) option ->
  (window -> int -> int -> unit) option

val setWindowCloseCallback : 
  window:window ->
  f:(window -> unit) option ->
  (window -> unit) option

val setWindowRefreshCallback : 
  window:window ->
  f:(window -> unit) option ->
  (window -> unit) option

val setWindowFocusCallback : 
  window:window ->
  f:(window -> bool -> unit) option ->
  (window -> bool -> unit) option

val setWindowIconifyCallback : 
  window:window ->
  f:(window -> bool -> unit) option ->
  (window -> bool -> unit) option

val setFramebufferSizeCallback : 
  window:window ->
  f:(window -> int -> int -> unit) option ->
  (window -> int -> int -> unit) option

val pollEvents : unit -> unit

val waitEvents : unit -> unit

val waitEventsTimeout : timeout:float -> unit

val postEmptyEvent : unit -> unit

val getInputMode : window:window -> mode:'a input_mode -> 'a

val setInputMode : window:window -> mode:'a input_mode -> value:'a -> unit

val getKeyName : key:key -> scancode:int -> string option

val getKey : window:window -> key:key -> bool

val getMouseButton : window:window -> button:int -> bool

val getCursorPos : window:window -> float * float

val setCursorPos : window:window -> xpos:float -> ypos:float -> unit

val createCursor : image:image -> xhot:int -> yhot:int -> cursor

val createStandardCursor : shape:cursor_shape -> cursor

val destroyCursor : cursor:cursor -> unit

val setCursor : window:window -> cursor:cursor -> unit

val setKeyCallback : 
  window:window ->
  f:(window -> key -> int -> key_action -> key_mod list -> unit) option ->
  (window -> key -> int -> key_action -> key_mod list -> unit) option

val setCharCallback : 
  window:window ->
  f:(window -> int -> unit) option ->
  (window -> int -> unit) option

val setCharModsCallback : 
  window:window ->
  f:(window -> int -> key_mod list -> unit) option ->
  (window -> int -> key_mod list -> unit) option

val setMouseButtonCallback : 
  window:window ->
  f:(window -> int -> bool -> key_mod list -> unit) option ->
  (window -> int -> bool -> key_mod list -> unit) option

val setCursorPosCallback : 
  window:window ->
  f:(window -> float -> float -> unit) option ->
  (window -> float -> float -> unit) option

val setCursorEnterCallback : 
  window:window ->
  f:(window -> bool -> unit) option ->
  (window -> bool -> unit) option

val setScrollCallback : 
  window:window ->
  f:(window -> float -> float -> unit) option ->
  (window -> float -> float -> unit) option

val setDropCallback : 
  window:window ->
  f:(window -> string list -> unit) option ->
  (window -> string list -> unit) option

val joystickPresent : joy:int -> bool

val getJoystickAxes : joy:int -> float array

val getJoystickButtons : joy:int -> bool array

val getJoystickName : joy:int -> string option

val setJoystickCallback : 
  f:(int -> connection_event -> unit) option ->
  (int -> connection_event -> unit) option

val setClipboardString : window:window -> string:string -> unit

val getClipboardString : window:window -> string

val getTime : unit -> float

val setTime : time:float -> unit

val getTimerValue : unit -> int64

val getTimerFrequency : unit -> int64

val makeContextCurrent : window:window option -> unit

val getCurrentContext : unit -> window option

val swapBuffers : window:window -> unit

val swapInterval : interval:int -> unit

package glfw-ocaml