-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathSDL_keyboard.fth
48 lines (43 loc) · 2.25 KB
/
SDL_keyboard.fth
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
\ This file has been generated using SWIG and fsi,
\ and is already platform dependent, search for the corresponding
\ fsi-file to compile it where no one has compiled it before ;)
\ Forth systems have their own own dynamic loader and don't need addional C-Code.
\ That's why this file will just print normal forth-code once compiled
\ and can be used directly with include or require.
\ As all comments are stripped during the compilation, please
\ insert the copyright notice of the original file here.
\ ----===< prefix >===-----
c-library sdl_keyboard
s" SDL2" add-lib
\c #include <SDL2/SDL_keyboard.h>
\ ----===< int constants >===-----
\ -------===< structs >===--------
\ struct SDL_Keysym
begin-structure SDL_Keysym
drop 0 4 +field SDL_Keysym-scancode
drop 4 4 +field SDL_Keysym-sym
drop 12 4 +field SDL_Keysym-unused
drop 8 2 +field SDL_Keysym-mod
drop 16 end-structure
\ ------===< functions >===-------
c-function SDL_GetKeyboardFocus SDL_GetKeyboardFocus -- a ( -- )
c-function SDL_GetKeyboardState SDL_GetKeyboardState a -- a ( numkeys -- )
c-function SDL_ResetKeyboard SDL_ResetKeyboard -- void ( -- )
c-function SDL_GetModState SDL_GetModState -- n ( -- )
c-function SDL_SetModState SDL_SetModState n -- void ( modstate -- )
c-function SDL_GetKeyFromScancode SDL_GetKeyFromScancode n -- n ( scancode -- )
c-function SDL_GetScancodeFromKey SDL_GetScancodeFromKey n -- n ( key -- )
c-function SDL_GetScancodeName SDL_GetScancodeName n -- a ( scancode -- )
c-function SDL_GetScancodeFromName SDL_GetScancodeFromName a -- n ( name -- )
c-function SDL_GetKeyName SDL_GetKeyName n -- a ( key -- )
c-function SDL_GetKeyFromName SDL_GetKeyFromName a -- n ( name -- )
c-function SDL_StartTextInput SDL_StartTextInput -- void ( -- )
c-function SDL_IsTextInputActive SDL_IsTextInputActive -- n ( -- )
c-function SDL_StopTextInput SDL_StopTextInput -- void ( -- )
c-function SDL_ClearComposition SDL_ClearComposition -- void ( -- )
c-function SDL_IsTextInputShown SDL_IsTextInputShown -- n ( -- )
c-function SDL_SetTextInputRect SDL_SetTextInputRect a -- void ( rect -- )
c-function SDL_HasScreenKeyboardSupport SDL_HasScreenKeyboardSupport -- n ( -- )
c-function SDL_IsScreenKeyboardShown SDL_IsScreenKeyboardShown a -- n ( window -- )
\ ----===< postfix >===-----
end-c-library