Author: kjs
Date: Tue Jan 6 11:07:49 2009
New Revision: 35070
Modified:
trunk/examples/sdl/tetris/eventhandler.pir
Log:
[examples] fix old syntax/semantics of PIR.
invokecc $P0\nret = I5 ==> ret = $P0()
Modified: trunk/examples/sdl/tetris/eventhandler.pir
==============================================================================
--- trunk/examples/sdl/tetris/eventhandler.pir (original)
+++ trunk/examples/sdl/tetris/eventhandler.pir Tue Jan 6 11:07:49 2009
@@ -40,8 +40,7 @@
app = self."app"()
app."setTimer"( 0 )
$P0 = find_global "SDL::Event", "disptach_event"
- invokecc $P0
- ret = I5
+ ret = $P0()
app."setTimer"( 1 )
.return (ret)
.end
