Diff for /gforth/compat/struct.fs between versions 1.5 and 1.6

version 1.5, 1998/04/14 16:43:21 version 1.6, 1999/02/22 21:39:43
Line 23 Line 23
 \ from MEMORY :  \ from MEMORY :
 \ allocate   \ allocate 
   
 : nalign ( addr1 n -- addr2 )  : naligned ( addr1 n -- addr2 )
 \ addr2 is the aligned version of addr1 wrt the alignment size n      \ addr2 is the aligned version of addr1 wrt the alignment size n
  1- tuck +  swap invert and ;      1- tuck +  swap invert and ;
   
   : nalign naligned ; \ old name, obsolete
   
 : dofield ( -- )  : dofield ( -- )
 does> ( name execution: addr1 -- addr2 )  does> ( name execution: addr1 -- addr2 )

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


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