Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!pacific.mps.ohio-state.edu!linac!att!ucbvax!ENG.SUN.COM!wmb
From: wmb@ENG.SUN.COM (Mitch Bradley)
Newsgroups: comp.lang.forth
Subject: ANS Forth
Message-ID: <9104062326.AA28672@ucbvax.Berkeley.EDU>
Date: 5 Apr 91 17:01:11 GMT
Sender: daemon@ucbvax.BERKELEY.EDU
Reply-To: Mitch Bradley <wmb%ENG.SUN.COM@SCFVM.GSFC.NASA.GOV>
Organization: The Internet
Lines: 18

> Is there DEFER in BASIS 15.

No.  I proposed it at the last meeting, but the proposal was defeated 3-8.

> [how do I] read the lines that follow a word in a source, in a std way, with
> what BASIS 15 gives to me?

You can use WORD to read the rest of the line, or \ to skip the rest of the
line, or look at the characters of the line individually by using a
combination of BLK , BLOCK , TIB , >IN , and #TIB to develop the current
input buffer address.

Then, when the input buffer is empty (as indicated by >IN @ equal to #TIB
or by WORD returning the address of a string whose length byte is 0), you
refill the input buffer with REFILL ( -- okay? ).  REFILL returns false
at end-of-file.

Mitch