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

extra: remove unnecessary yield.

clean-macosx-x86-32
John Benediktsson 2019-04-21 11:07:28 -07:00
parent 867fc1e3fc
commit ba41385f10
3 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/bubble-chamber/bubble-chamber.factor
View File

@ -316,7 +316,7 @@ TUPLE: bubble-chamber < frame-buffer
particles collision-theta size timer ; particles collision-theta size timer ;
M: bubble-chamber graft* M: bubble-chamber graft*
[ timer>> start-timer yield ] [ call-next-method ] bi ; [ timer>> start-timer ] [ call-next-method ] bi ;
M: bubble-chamber ungraft* M: bubble-chamber ungraft*
[ timer>> stop-timer ] [ call-next-method ] bi ; [ timer>> stop-timer ] [ call-next-method ] bi ;

2
extra/lcd/lcd.factor
View File

@ -28,7 +28,7 @@ TUPLE: time-display < label timer ;
f 1 seconds <timer> >>timer ; f 1 seconds <timer> >>timer ;
M: time-display graft* M: time-display graft*
[ timer>> start-timer yield ] [ call-next-method ] bi ; [ timer>> start-timer ] [ call-next-method ] bi ;
M: time-display ungraft* M: time-display ungraft*
[ timer>> stop-timer ] [ call-next-method ] bi ; [ timer>> stop-timer ] [ call-next-method ] bi ;

2
extra/trails/trails.factor
View File

@ -20,7 +20,7 @@ IN: trails
TUPLE: trails-gadget < gadget points timer ; TUPLE: trails-gadget < gadget points timer ;
M: trails-gadget graft* M: trails-gadget graft*
[ timer>> start-timer yield ] [ call-next-method ] bi ; [ timer>> start-timer ] [ call-next-method ] bi ;
M: trails-gadget ungraft* M: trails-gadget ungraft*
[ timer>> stop-timer ] [ call-next-method ] bi ; [ timer>> stop-timer ] [ call-next-method ] bi ;