sig
  external set_text : text:string -> int = "caml_SDL_SetClipboardText"
  external get_text : unit -> string = "caml_SDL_GetClipboardText"
  external has_text : unit -> bool = "caml_SDL_HasClipboardText"
end