|
version 1.4, 2001/09/04 08:18:49
|
version 1.7, 2006/03/26 22:54:20
|
|
Line 1
|
Line 1
|
| \ Structural Conditionals, loops part 12dec92py |
\ Structural Conditionals, loops part 12dec92py |
| |
|
| \ Copyright (C) 1995,1996,1997,1999 Free Software Foundation, Inc. |
\ Copyright (C) 1995,1996,1997,1999,2001,2003 Free Software Foundation, Inc. |
| |
|
| \ This file is part of Gforth. |
\ This file is part of Gforth. |
| |
|
|
Line 22
|
Line 22
|
| |
|
| Variable leavings |
Variable leavings |
| |
|
| |
\ this doesn't work with flash yet!! |
| |
|
| : (leave) here leavings @ , leavings ! ; |
: (leave) here leavings @ , leavings ! ; |
| : LEAVE postpone branch (leave) ; immediate restrict |
: LEAVE postpone branch (leave) ; immediate restrict |
| : ?LEAVE postpone 0= postpone ?branch (leave) ; |
: ?LEAVE postpone 0= postpone ?branch (leave) ; |
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to cloop.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth / kernel