[gforth] / gforth / compat / struct.fs  

gforth: gforth/compat/struct.fs

Diff for /gforth/compat/struct.fs between version 1.3 and 1.4

version 1.3, Mon Jun 23 15:54:02 1997 UTC version 1.4, Thu Jul 31 16:17:23 1997 UTC
Line 66 
Line 66 
 cell% 2*              2constant double%  cell% 2*              2constant double%
   
 \ memory allocation words  \ memory allocation words
   : %alignment ( align size -- align )
       drop ;
   
   : %size ( align size -- size )
       nip ;
   
 : %align ( align size -- )  : %align ( align size -- )
     drop here swap nalign here - allot ;      drop here swap nalign here - allot ;
   

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help