Author: wmb Date: 2009-12-06 14:56:04 +0100 (Sun, 06 Dec 2009) New Revision: 1541
Modified: dev/ps2mouse.fth ofw/core/muxdev.fth Log: Fixed a couple of innocuous stack bugs that caused extra stack data during compilation.
Modified: dev/ps2mouse.fth =================================================================== --- dev/ps2mouse.fth 2009-12-06 06:49:17 UTC (rev 1540) +++ dev/ps2mouse.fth 2009-12-06 13:56:04 UTC (rev 1541) @@ -36,7 +36,7 @@ : put-get-data ( cmd -- data ) " put-get-data" $call-parent ; : send-cmd ( cmd -- ) " put-data" $call-parent ;
-0 instance variable #retries +instance variable #retries : cmd? ( cmd -- error? ) dup put-get-data ( cmd response ) begin ( cmd response )
Modified: ofw/core/muxdev.fth =================================================================== --- ofw/core/muxdev.fth 2009-12-06 06:49:17 UTC (rev 1540) +++ ofw/core/muxdev.fth 2009-12-06 13:56:04 UTC (rev 1541) @@ -5,7 +5,8 @@ new-device " mux" device-name
-0 instance variable first-device +instance variable first-device +0 first-device !
struct /n field >link