[BACK]Return to special.fs CVS log [TXT] [DIR] Up to [gforth] / gforth / kernel

Diff for /gforth/kernel/Attic/special.fs between versions 1.5 and 1.7

version 1.5, 1998/05/02 21:29:09 version 1.7, 1999/02/03 00:10:25
Line 1 Line 1
 \ words with non-default and non-immediate compilation semantics  \ words with non-default and non-immediate compilation semantics
   
 \ Copyright (C) 1996 Free Software Foundation, Inc.  \ Copyright (C) 1996,1998 Free Software Foundation, Inc.
   
 \ This file is part of Gforth.  \ This file is part of Gforth.
   
Line 29  has? compiler 0= Line 29  has? compiler 0=
 has? compiler [IF]  has? compiler [IF]
 :noname [char] " parse postpone SLiteral ;  :noname [char] " parse postpone SLiteral ;
 interpret/compile: S" ( compilation 'ccc"' -- ; run-time -- c-addr u )  \ core,file     s-quote  interpret/compile: S" ( compilation 'ccc"' -- ; run-time -- c-addr u )  \ core,file     s-quote
     \G Compilation: Parse a string ccc delimited by a " (double quote). At run-time,
     \G return the length, u, and the start address, c-addr of the string. Interpretation:
     \G parse the string as before, and return c-addr, u. The string is stored in a
     \G temporary buffer which may be overwritten by subsequent uses of @code{S"}.
 [THEN]  [THEN]
   
 has? compiler [IF]  has? compiler [IF]
Line 46  interpret/compile: What's ( "name" -- ad Line 50  interpret/compile: What's ( "name" -- ad
 :noname    [char] " parse type ;  :noname    [char] " parse type ;
 :noname    postpone (.") ,"  align ;  :noname    postpone (.") ,"  align ;
 interpret/compile: ." ( compilation 'ccc"' -- ; run-time -- )  \ core   dot-quote  interpret/compile: ." ( compilation 'ccc"' -- ; run-time -- )  \ core   dot-quote
     \G Compilation: Parse a string ccc delimited by a " (double quote). At run-time,
     \G display the string. Interpretation semantics for this word are undefined in
     \G the ANS Forth Standard. Gforth's interpretation semantics are to display the
     \G string. This is the simplest way to display a string from
     \G within a definition; see examples below.
   
 \ DOES>                                                17mar93py  \ DOES>                                                17mar93py
   
Removed from v.1.5  
changed lines
  Added in v.1.7

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>