extra: remove unnecessary yield.
parent
867fc1e3fc
commit
ba41385f10
|
@ -316,7 +316,7 @@ TUPLE: bubble-chamber < frame-buffer
|
|||
particles collision-theta size timer ;
|
||||
|
||||
M: bubble-chamber graft*
|
||||
[ timer>> start-timer yield ] [ call-next-method ] bi ;
|
||||
[ timer>> start-timer ] [ call-next-method ] bi ;
|
||||
|
||||
M: bubble-chamber ungraft*
|
||||
[ timer>> stop-timer ] [ call-next-method ] bi ;
|
||||
|
|
|
@ -28,7 +28,7 @@ TUPLE: time-display < label timer ;
|
|||
f 1 seconds <timer> >>timer ;
|
||||
|
||||
M: time-display graft*
|
||||
[ timer>> start-timer yield ] [ call-next-method ] bi ;
|
||||
[ timer>> start-timer ] [ call-next-method ] bi ;
|
||||
|
||||
M: time-display ungraft*
|
||||
[ timer>> stop-timer ] [ call-next-method ] bi ;
|
||||
|
|
|
@ -20,7 +20,7 @@ IN: trails
|
|||
TUPLE: trails-gadget < gadget points timer ;
|
||||
|
||||
M: trails-gadget graft*
|
||||
[ timer>> start-timer yield ] [ call-next-method ] bi ;
|
||||
[ timer>> start-timer ] [ call-next-method ] bi ;
|
||||
|
||||
M: trails-gadget ungraft*
|
||||
[ timer>> stop-timer ] [ call-next-method ] bi ;
|
||||
|
|
Loading…
Reference in New Issue