[gforth] / gforth / kernel / vars.fs  

gforth: gforth/kernel/vars.fs

Diff for /gforth/kernel/vars.fs between version 1.10 and 1.11

version 1.10, Wed Feb 3 00:10:26 1999 UTC version 1.11, Sun Feb 21 14:55:45 1999 UTC
Line 46 
Line 46 
 400 Constant chars/block  400 Constant chars/block
   
 $20 8 2* cells + 2 + cell+ constant word-pno-size ( -- u )  $20 8 2* cells + 2 + cell+ constant word-pno-size ( -- u )
   create holdbuf word-pno-size chars allot
   holdbuf word-pno-size chars + aconstant holdbuf-end
   avariable holdptr holdbuf-end holdptr a!
   
 84 constant pad-minsize ( -- u )  84 constant pad-minsize ( -- u )
   
   
 \ that's enough so long  \ that's enough so long
   
 \ User variables                                       13feb93py  \ User variables                                       13feb93py

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help