--- gforth/kernel/Attic/special.fs 1998/12/08 22:03:14 1.6 +++ gforth/kernel/Attic/special.fs 1999/02/03 00:10:25 1.7 @@ -29,6 +29,10 @@ has? compiler 0= has? compiler [IF] :noname [char] " parse postpone SLiteral ; 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] has? compiler [IF] @@ -46,6 +50,11 @@ interpret/compile: What's ( "name" -- ad :noname [char] " parse type ; :noname postpone (.") ," align ; 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