Diff for /gforth/Attic/kernal.fs between versions 1.2 and 1.3

version 1.2, 1994/04/20 17:12:03 version 1.3, 1994/05/03 15:24:12
Line 509  Create ???  ," ???" Line 509  Create ???  ," ???"
   
 \ : ;                                                  24feb93py  \ : ;                                                  24feb93py
   
   : EXIT  ( -- )  postpone ;s ;  immediate
   
 : : ( -- colon-sys )  Header [ :docol ] ALiteral cfa, 0 ] ;  : : ( -- colon-sys )  Header [ :docol ] ALiteral cfa, 0 ] ;
 : ; ( colon-sys -- )  ?struc postpone exit reveal postpone [ ;  : ; ( colon-sys -- )  ?struc postpone exit reveal postpone [ ;
   immediate restrict    immediate restrict

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


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