File tree Expand file tree Collapse file tree 3 files changed +6
-1
lines changed
Expand file tree Collapse file tree 3 files changed +6
-1
lines changed Original file line number Diff line number Diff line change @@ -2,3 +2,4 @@ include Ctypes_reexports
22include Raylib_types
33include Functions
44module Rlgl = Rlgl
5+ module Raylib_c = Raylib_c
Original file line number Diff line number Diff line change @@ -16,6 +16,7 @@ val ptr_of_uint : Unsigned.uint -> Unsigned.uint ptr
1616val void_ptr_of_int : int -> unit ptr
1717
1818module CArray = Ctypes. CArray
19+ module Raylib_c = Raylib_c
1920
2021(* * {1 Constants} *)
2122
Original file line number Diff line number Diff line change @@ -370,7 +370,10 @@ module Font = struct
370370
371371 let set_texture font texture = setf font Font. texture texture
372372 let set_recs font recs = setf font Font. recs recs
373- let set_glyphs font glyphs = setf font Font. glyphs (CArray. start glyphs)
373+
374+ let set_glyphs font glyphs =
375+ setf font Font. glyph_count (CArray. length glyphs);
376+ setf font Font. glyphs (CArray. start glyphs)
374377end
375378
376379module Camera3D = struct
You can’t perform that action at this time.
0 commit comments