remove timing call
parent
d9fdb9d76d
commit
db5e6c5f2a
|
@ -2,7 +2,7 @@ USING: alien io kernel parser sequences ;
|
||||||
|
|
||||||
"freetype" @{
|
"freetype" @{
|
||||||
@{ [ os "macosx" = ] [ "libfreetype.dylib" ] }@
|
@{ [ os "macosx" = ] [ "libfreetype.dylib" ] }@
|
||||||
@{ [ os "win32" = ] [ "freetype.dll" ] }@
|
@{ [ os "win32" = ] [ "freetype6.dll" ] }@
|
||||||
@{ [ t ] [ "libfreetype.so" ] }@
|
@{ [ t ] [ "libfreetype.so" ] }@
|
||||||
}@ cond "cdecl" add-library
|
}@ cond "cdecl" add-library
|
||||||
|
|
||||||
|
|
|
@ -99,7 +99,7 @@ M: motion-event handle-event ( event -- )
|
||||||
|
|
||||||
: world-step ( -- )
|
: world-step ( -- )
|
||||||
world get world-invalid >r layout-world r>
|
world get world-invalid >r layout-world r>
|
||||||
[ update-hand USE: test [ draw-world ] time ] when ;
|
[ update-hand draw-world ] when ;
|
||||||
|
|
||||||
: next-event ( -- event ? ) <event> dup SDL_PollEvent ;
|
: next-event ( -- event ? ) <event> dup SDL_PollEvent ;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue