diff options
Diffstat (limited to 'sdl2/bindings.scm')
| -rw-r--r-- | sdl2/bindings.scm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/sdl2/bindings.scm b/sdl2/bindings.scm index 180f887..4644f1e 100644 --- a/sdl2/bindings.scm +++ b/sdl2/bindings.scm @@ -1130,3 +1130,17 @@ RETURN-TYPE and accept arguments of ARG-TYPES." (define-foreign sdl-is-game-controller sdl-bool "SDL_IsGameController" (list int)) + + +;;; +;;; Clipboard +;;; + +(define-foreign sdl-get-clipboard-text + '* "SDL_GetClipboardText" '()) + +(define-foreign sdl-set-clipboard-text + int "SDL_SetClipboardText" '(*)) + +(define-foreign sdl-has-clipboard-text + int "SDL_HasClipboardText" '()) |