-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathSDL_atomic.fth
38 lines (33 loc) · 1.65 KB
/
SDL_atomic.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
\ 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_atomic
s" SDL2" add-lib
\c #include <SDL2/SDL_atomic.h>
\ ----===< int constants >===-----
\ -------===< structs >===--------
\ SDL_atomic_t
begin-structure SDL_atomic_t
drop 0 4 +field SDL_atomic_t-value
drop 4 end-structure
\ ------===< functions >===-------
c-function SDL_AtomicTryLock SDL_AtomicTryLock a -- n ( lock -- )
c-function SDL_AtomicLock SDL_AtomicLock a -- void ( lock -- )
c-function SDL_AtomicUnlock SDL_AtomicUnlock a -- void ( lock -- )
c-function SDL_MemoryBarrierReleaseFunction SDL_MemoryBarrierReleaseFunction -- void ( -- )
c-function SDL_MemoryBarrierAcquireFunction SDL_MemoryBarrierAcquireFunction -- void ( -- )
c-function SDL_AtomicCAS SDL_AtomicCAS a n n -- n ( a oldval newval -- )
c-function SDL_AtomicSet SDL_AtomicSet a n -- n ( a v -- )
c-function SDL_AtomicGet SDL_AtomicGet a -- n ( a -- )
c-function SDL_AtomicAdd SDL_AtomicAdd a n -- n ( a v -- )
c-function SDL_AtomicCASPtr SDL_AtomicCASPtr a a a -- n ( a oldval newval -- )
c-function SDL_AtomicSetPtr SDL_AtomicSetPtr a a -- a ( a v -- )
c-function SDL_AtomicGetPtr SDL_AtomicGetPtr a -- a ( a -- )
\ ----===< postfix >===-----
end-c-library