Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!usc!elroy.jpl.nasa.gov!decwrl!world!dcp
From: dcp@world.std.com (David C. Petty)
Newsgroups: comp.lang.forth
Subject: Re: ENDIF (was: HP48SX)
Keywords: ANS Forth
Message-ID: <1991Jun23.050006.23238@world.std.com>
Date: 23 Jun 91 05:00:06 GMT
References: <60B47AF57A3F016E92@utrcgw.utc.com> <1991Jun14.151508.13418@csi.uottawa.ca>
Reply-To: dcp@world (David C. Petty)
Organization: The World @ Software Tool & Die
Lines: 19

In article <1991Jun14.151508.13418@csi.uottawa.ca>,
cbbrowne@csi.uottawa.ca (Christopher Browne (055908)) writes:

`>I remember that THEN and END-IF were equivalent in some early versions
`>of forth, including, if I remember, the distributed fig-forth model.
`
`    That's right.  That was one of the things I liked about fig-forth.

In ANS Forth, include the following preamble to your code:  

: endif  ( -- )  POSTPONE THEN ;  IMMEDIATE  ( Compilation: orig -- )

You can then (or is it `endif'?) happily use ENDIF with no difference
in the compiled code.
-- 
 David C. Petty | dcp@world.std.com | ...!{uunet,bu.edu}!world!dcp /\
      POBox Two | CIS: 73607,1646   | BIX, MCIMail: dcp           /  \
 Cambridge,  MA | `Whatsoever thou doest to the tip,             /    \
02140-0001  USA |  doest thou likewise to the ring.' - RAG      /______\