steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix accessors

db4
Doug Coleman 2010-06-22 14:10:12 -05:00
parent 7d64fe50a1
commit e486d74460
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/game/debug/tests/tests.factor
View File

@ -37,9 +37,9 @@ IN: game.debug.tests
] float-array{ } make ] float-array{ } make
mvp-matrix draw-debug-points mvp-matrix draw-debug-points
"Frame: " world frame-number>> number>string append "Frame: " world frame#>> number>string append
COLOR: purple { 5 5 } world dim>> draw-text COLOR: purple { 5 5 } world dim>> draw-text
world [ 1 + ] change-frame-number drop ; world [ 1 + ] change-frame# drop ;
TUPLE: tests-world < wasd-world frame-number ; TUPLE: tests-world < wasd-world frame-number ;
M: tests-world draw-world* draw-debug-tests ; M: tests-world draw-world* draw-debug-tests ;