--- gforth/glocals.fs 1998/10/14 22:23:12 1.37 +++ gforth/glocals.fs 1999/03/23 20:24:18 1.40 @@ -1,6 +1,6 @@ \ A powerful locals implementation -\ Copyright (C) 1995 Free Software Foundation, Inc. +\ Copyright (C) 1995,1996,1997,1998 Free Software Foundation, Inc. \ This file is part of Gforth. @@ -292,8 +292,19 @@ locals-types definitions postpone laddr# @ lp-offset, ; \ you may want to make comments in a locals definitions group: -' \ alias \ immediate -' ( alias ( immediate +' \ alias \ ( -- ) \ core-ext,block-ext backslash +\G Line comment: if @code{BLK} contains 0, parse and discard the remainder +\G of the parse area. Otherwise, parse and discard all subsequent characters in the +\G parse area corresponding to the current line. +immediate + +' ( alias ( ( compilation 'ccc' -- ; run-time -- ) \ core,file paren +\G Comment: parse and discard all subsequent characters in the parse +\G area until "@code{)}" is encountered. During interactive input, an end-of-line +\G also acts as a comment terminator. For file input, it does not; if the +\G end-of-file is encountered whilst parsing for the "@code{)}" delimiter, Gforth +\G will generate a warning. +immediate forth definitions