[gforth] / gforth / doc / makedoc.fs  

gforth: gforth/doc/makedoc.fs

Diff for /gforth/doc/makedoc.fs between version 1.10 and 1.11

version 1.10, Fri Dec 31 13:24:02 2004 UTC version 1.11, Fri Jul 6 12:54:56 2007 UTC
Line 73 
Line 73 
         s" " >fileCR          s" " >fileCR
         s" make-doc " >file          s" make-doc " >file
         >in @ >r          >in @ >r
         [char] ( parse 2drop          parse-name 2dup s" (" str= if
         [char] ) parse              2drop ') parse
           else
               2dup s" {" str= if
                   2drop '} parse
               else \ no stack comment or locals
                   2drop
                   r@ >in ! \ restore "\"
                   s" unknown " \ default stack comment
               endif
           endif
         [char] \ parse 2drop          [char] \ parse 2drop
         >in @          >in @
         bl word  dup c@          bl word  dup c@
Line 90 
Line 99 
             drop >in !              drop >in !
         THEN          THEN
         latest name>string >file          latest name>string >file
           s"  " >file
         >file          >file
         s"  )" >file          s"  )" >file
         POSTPONE \g          POSTPONE \g

Generate output suitable for use with a patch program
Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11
CVS Admin

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help