Diff for /gforth/hash.fs between versions 1.4 and 1.5

version 1.4, 1994/10/18 15:51:18 version 1.5, 1994/11/15 15:55:36
Line 91  Create hashsearch  ' hash-find A, ' hash Line 91  Create hashsearch  ' hash-find A, ' hash
 addall          \ Baum aufbauen  addall          \ Baum aufbauen
 \ Baumsuche ist installiert.  \ Baumsuche ist installiert.
   
   : hash-cold  ( -- ) Defers 'cold
     HashPointer off  HashTable off  HashIndex off
     addall ;
   ' hash-cold IS 'cold
   
 : .words  ( -- )  : .words  ( -- )
   base @ >r hex HashTable @  Hashlen 0    base @ >r hex HashTable @  Hashlen 0
   DO  cr  i 2 .r ." : " dup i cells +    DO  cr  i 2 .r ." : " dup i cells +

Removed from v.1.4  
changed lines
  Added in v.1.5


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