by Coos Haak <chforth@[EMAIL PROTECTED]
>
Mar 18, 2008 at 01:06 AM
Op Tue, 18 Mar 2008 10:51:51 +1100 schreef Ed:
> "Ed" <nospam@[EMAIL PROTECTED]
> wrote in message
news:frcl8o$i9g$1@[EMAIL PROTECTED]
>>
>> ...
>> OF ... ENDOF isn't really needed anymore but is retained
>> for ANS compatibility. I didn't include code for it in the
>> demo but it is easily added -
>>
>> : ENDOF postpone else ; immediate
>> : OF postpone dup postpone if postpone drop ; immediate
>
> Correction. That should have been:
>
> : ENDOF postpone else ; immediate
> : OF postpone over postpone =
> postpone dup postpone if postpone drop ; immediate
ISO compatible OF would not have the 'postpone dup'
--
Coos
CHForth, 16 bit DOS applications
http://home.hccnet.nl/j.j.haak/forth.html
