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

version 1.4, 1998/05/02 21:28:43 version 1.5, 1998/10/10 10:28:35
Line 38  Variable slowvoc   0 slowvoc ! Line 38  Variable slowvoc   0 slowvoc !
   
 : mappedwordlist ( map-struct -- wid )  \ gforth  : mappedwordlist ( map-struct -- wid )  \ gforth
 \G creates a wordlist with a special map-structure  \G creates a wordlist with a special map-structure
   here 0 A, swap A, voclink @ A, 0 A,    here swap A, 0 A, voclink @ A, 0 A,
   dup wordlist-link voclink !    dup wordlist-link voclink !
   dup initvoc ;    dup initvoc ;
   
Line 109  Vocabulary Root Line 109  Vocabulary Root
   
 \ set initial search order                             14may93py  \ set initial search order                             14may93py
   
 Forth-wordlist @ ' Forth >body !  Forth-wordlist wordlist-id @ ' Forth >body wordlist-id !
   
 0 vp! also Root also definitions  0 vp! also Root also definitions
 Only Forth also definitions  Only Forth also definitions

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


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