Diff for /gforth/prims2x.fs between versions 1.3 and 1.6

version 1.3, 1994/07/07 14:59:26 version 1.6, 1994/08/25 15:25:33
Line 21 Line 21
   
 warnings off  warnings off
   
   [IFUNDEF] vocabulary  include search-order.fs [THEN]
 include gray.fs  include gray.fs
 include search-order.fs  
   
 100 constant max-effect \ number of things on one side of a stack effect  100 constant max-effect \ number of things on one side of a stack effect
 4096 constant batch-size \ no meaning, just make sure it's >0  4096 constant batch-size \ no meaning, just make sure it's >0
Line 89  variable effect-out-end ( pointer ) Line 89  variable effect-out-end ( pointer )
 2variable effect-in-size  2variable effect-in-size
 2variable effect-out-size  2variable effect-out-size
   
 variable primitive-number -8 primitive-number !  variable primitive-number -9 primitive-number !
   
 \ for several reasons stack items of a word are stored in a wordlist  \ for several reasons stack items of a word are stored in a wordlist
 \ since neither forget nor marker are implemented yet, we make a new  \ since neither forget nor marker are implemented yet, we make a new
Line 544  set-current Line 544  set-current
  warnings @ if   warnings @ if
  ." ------------ CUT HERE -------------" cr  endif   ." ------------ CUT HERE -------------" cr  endif
  r> primfilter ;   r> primfilter ;
   

Removed from v.1.3  
changed lines
  Added in v.1.6


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