Arrange xcb bindings properly
This commit is contained in:
@@ -0,0 +1,7 @@
|
||||
open Ctypes
|
||||
open Foreign
|
||||
|
||||
type t = Unsigned.UInt32.t
|
||||
|
||||
let typ : t Ctypes.typ = Ctypes.uint32_t
|
||||
let of_int x = Unsigned.UInt32.of_int x
|
||||
Reference in New Issue
Block a user