Diff for /gforth/ds2texi.fs between versions 1.27 and 1.28

version 1.27, 2003/03/09 15:16:47 version 1.28, 2003/03/22 10:04:06
Line 94  create description-buffer 4096 chars all Line 94  create description-buffer 4096 chars all
 : make-doc ( -- )  : make-doc ( -- )
     get-current documentation set-current      get-current documentation set-current
     create      create
         last @ name>string skip-prefix 2,               \ name          latest name>string skip-prefix 2,               \ name
         [char] ) parse save-mem 2,      \ stack-effect          [char] ) parse save-mem 2,      \ stack-effect
         bl sword condition-wordset 2,   \ wordset          bl sword condition-wordset 2,   \ wordset
         bl sword dup    \ pronounciation          bl sword dup    \ pronounciation
         if          if
             condition-pronounciation              condition-pronounciation
         else          else
             2drop last @ name>string skip-prefix              2drop latest name>string skip-prefix
         endif          endif
         2,          2,
         get-description save-mem 2,          get-description save-mem 2,

Removed from v.1.27  
changed lines
  Added in v.1.28


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