package glMLite

  1. Overview
  2. Docs
type client_state =
  1. | GL_COLOR_ARRAY
  2. | GL_EDGE_FLAG_ARRAY
  3. | GL_FOG_COORD_ARRAY
  4. | GL_INDEX_ARRAY
  5. | GL_NORMAL_ARRAY
  6. | GL_SECONDARY_COLOR_ARRAY
  7. | GL_TEXTURE_COORD_ARRAY
  8. | GL_VERTEX_ARRAY
val glEnableClientState : client_state:client_state -> unit
val glDisableClientState : client_state:client_state -> unit
val glDrawArrays : mode:GL.primitive -> first:int -> count:int -> unit
val glMultiDrawArrays : mode:int -> arr:(int * int) array -> unit
val glArrayElement : i:int -> unit
module Elem : sig ... end
val glDrawElements : mode:GL.primitive -> count:int -> data_type:Elem.elem_data_type -> data:('a, 'b, Bigarray.c_layout) Bigarray.Array1.t -> unit
val glDrawRangeElements : mode:GL.primitive -> start:int -> end_:int -> count:int -> data_type:Elem.elem_data_type -> data:('a, 'b, Bigarray.c_layout) Bigarray.Array1.t -> unit
type interleaved_format =
  1. | GL_V2F
  2. | GL_V3F
  3. | GL_C4UB_V2F
  4. | GL_C4UB_V3F
  5. | GL_C3F_V3F
  6. | GL_N3F_V3F
  7. | GL_C4F_N3F_V3F
  8. | GL_T2F_V3F
  9. | GL_T4F_V4F
  10. | GL_T2F_C4UB_V3F
  11. | GL_T2F_C3F_V3F
  12. | GL_T2F_N3F_V3F
  13. | GL_T2F_C4F_N3F_V3F
  14. | GL_T4F_C4F_N3F_V4F
val glInterleavedArrays : fmt:interleaved_format -> stride:int -> pointer:('a, 'b, Bigarray.c_layout) Bigarray.Array1.t -> unit
module Coord : sig ... end
val glVertexPointer : size:int -> data_type:Coord.coord_data_type -> stride:int -> data:('a, 'b, Bigarray.c_layout) Bigarray.Array1.t -> unit
val glTexCoordPointer : size:int -> data_type:Coord.coord_data_type -> stride:int -> data:('a, 'b, Bigarray.c_layout) Bigarray.Array1.t -> unit
module Norm : sig ... end
val glNormalPointer : data_type:Norm.norm_data_type -> stride:int -> data:('a, 'b, Bigarray.c_layout) Bigarray.Array1.t -> unit
module Index : sig ... end
val glIndexPointer : data_type:Index.index_data_type -> stride:int -> data:('a, 'b, Bigarray.c_layout) Bigarray.Array1.t -> unit
module Color : sig ... end
val glColorPointer : size:int -> data_type:Color.color_data_type -> stride:int -> data:('a, 'b, Bigarray.c_layout) Bigarray.Array1.t -> unit
val glEdgeFlagPointer : stride:int -> data:('a, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t -> unit
val glSecondaryColorPointer : size:int -> data_type:Color.color_data_type -> stride:int -> data:('a, 'b, Bigarray.c_layout) Bigarray.Array1.t -> unit
module VAttr : sig ... end
val glVertexAttribPointer : index:int -> size:int -> data_type:VAttr.vertattr_data_type -> normalized:bool -> stride:int -> data:('a, 'b, Bigarray.c_layout) Bigarray.Array1.t -> unit
val glVertexPointer0 : size:int -> data_type:Coord.coord_data_type -> stride:int -> unit
val glTexCoordPointer0 : size:int -> data_type:Coord.coord_data_type -> stride:int -> unit
val glColorPointer0 : size:int -> data_type:Color.color_data_type -> stride:int -> unit
val glSecondaryColorPointer0 : size:int -> data_type:Color.color_data_type -> stride:int -> unit
val glIndexPointer0 : data_type:Index.index_data_type -> stride:int -> unit
val glNormalPointer0 : data_type:Norm.norm_data_type -> stride:int -> unit
val glEdgeFlagPointer0 : stride:int -> unit
val glVertexAttribPointer0 : index:int -> size:int -> data_type:VAttr.vertattr_data_type -> normalized:bool -> stride:int -> unit
val glDrawElements0 : mode:GL.primitive -> count:int -> data_type:Elem.elem_data_type -> unit
val glVertexPointerOfs8 : size:int -> data_type:Coord.coord_data_type -> stride:int -> ofs:int -> unit
val glVertexPointerOfs16 : size:int -> data_type:Coord.coord_data_type -> stride:int -> ofs:int -> unit
val glVertexPointerOfs32 : size:int -> data_type:Coord.coord_data_type -> stride:int -> ofs:int -> unit
val glIndexPointerOfs8 : data_type:Index.index_data_type -> stride:int -> ofs:int -> unit
val glIndexPointerOfs16 : data_type:Index.index_data_type -> stride:int -> ofs:int -> unit
val glIndexPointerOfs32 : data_type:Index.index_data_type -> stride:int -> ofs:int -> unit
val glTexCoordPointerOfs8 : size:int -> data_type:Coord.coord_data_type -> stride:int -> ofs:int -> unit
val glTexCoordPointerOfs16 : size:int -> data_type:Coord.coord_data_type -> stride:int -> ofs:int -> unit
val glTexCoordPointerOfs32 : size:int -> data_type:Coord.coord_data_type -> stride:int -> ofs:int -> unit
val glColorPointerOfs8 : size:int -> data_type:Color.color_data_type -> stride:int -> ofs:int -> unit
val glColorPointerOfs16 : size:int -> data_type:Color.color_data_type -> stride:int -> ofs:int -> unit
val glColorPointerOfs32 : size:int -> data_type:Color.color_data_type -> stride:int -> ofs:int -> unit
val glSecondaryColorPointerOfs8 : size:int -> data_type:Color.color_data_type -> stride:int -> unit
val glSecondaryColorPointerOfs16 : size:int -> data_type:Color.color_data_type -> stride:int -> unit
val glSecondaryColorPointerOfs32 : size:int -> data_type:Color.color_data_type -> stride:int -> unit
val glNormalPointerOfs8 : data_type:Norm.norm_data_type -> stride:int -> ofs:int -> unit
val glNormalPointerOfs16 : data_type:Norm.norm_data_type -> stride:int -> ofs:int -> unit
val glNormalPointerOfs32 : data_type:Norm.norm_data_type -> stride:int -> ofs:int -> unit
val glEdgeFlagPointerOfs8 : stride:int -> ofs:int -> unit
val glEdgeFlagPointerOfs16 : stride:int -> ofs:int -> unit
val glEdgeFlagPointerOfs32 : stride:int -> ofs:int -> unit
val glVertexAttribPointerOfs8 : index:int -> size:int -> data_type:VAttr.vertattr_data_type -> normalized:bool -> stride:int -> ofs:int -> unit
val glVertexAttribPointerOfs16 : index:int -> size:int -> data_type:VAttr.vertattr_data_type -> normalized:bool -> stride:int -> ofs:int -> unit
val glVertexAttribPointerOfs32 : index:int -> size:int -> data_type:VAttr.vertattr_data_type -> normalized:bool -> stride:int -> ofs:int -> unit
val glDrawElementsOfs8 : mode:GL.primitive -> count:int -> data_type:Elem.elem_data_type -> ofs:int -> unit
val glDrawElementsOfs16 : mode:GL.primitive -> count:int -> data_type:Elem.elem_data_type -> ofs:int -> unit
val glDrawElementsOfs32 : mode:GL.primitive -> count:int -> data_type:Elem.elem_data_type -> ofs:int -> unit
val glGenVertexArray : unit -> int
val glBindVertexArray : int -> unit
val glDeleteVertexArray : int -> unit
val glIsVertexArray : int -> bool