[gforth] / gforth / table.fs  

gforth: gforth/table.fs

Diff for /gforth/table.fs between version 1.2 and 1.3

version 1.2, Tue Dec 8 22:02:52 1998 UTC version 1.3, Fri Dec 3 18:24:23 1999 UTC
Line 28 
Line 28 
 Create tablesearch-map ( -- wordlist-map )  Create tablesearch-map ( -- wordlist-map )
     ' table-find A, ' hash-reveal A, ' (rehash) A, ' (rehash) A,      ' table-find A, ' hash-reveal A, ' (rehash) A, ' (rehash) A,
   
 : table ( -- wid )  : table ( -- wid ) \ gforth
     \g create a case-sensitive wordlist      \g Create a case-sensitive wordlist.
     tablesearch-map mappedwordlist ;      tablesearch-map mappedwordlist ;
   

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help