
May 24, 2009
1:15 p.m.
Author: blueswirl Date: 2009-05-24 13:15:48 +0200 (Sun, 24 May 2009) New Revision: 498 Modified: trunk/openbios-devel/forth/bootstrap/bootstrap.fs Log: Fix b(case)...b(of)...b(endof)...b(endcase) (Mark Cave-Ayland) Modified: trunk/openbios-devel/forth/bootstrap/bootstrap.fs =================================================================== --- trunk/openbios-devel/forth/bootstrap/bootstrap.fs 2009-05-24 11:04:06 UTC (rev 497) +++ trunk/openbios-devel/forth/bootstrap/bootstrap.fs 2009-05-24 11:15:48 UTC (rev 498) @@ -318,7 +318,7 @@ ['] then execute loop execute-tmp-comp -; compile-only +; immediate : of 1 + >r @@ -327,13 +327,13 @@ ['] if execute ['] drop , r> - ; compile-only + ; immediate : endof >r ['] else execute r> - ; compile-only + ; immediate \
5875
Age (days ago)
5875
Last active (days ago)
0 comments
1 participants
participants (1)
-
svn@openbios.org