Diff for /gforth/prims2x.fs between versions 1.8 and 1.9

version 1.8, 1994/09/12 19:00:36 version 1.9, 1994/09/28 17:02:50
Line 404  set-current Line 404  set-current
      execute nip       execute nip
      UNLOOP EXIT       UNLOOP EXIT
    endif     endif
  -1 +loop   -1 s+loop
  \ we did not find a type, abort   \ we did not find a type, abort
  true abort" unknown type prefix" ;   true abort" unknown type prefix" ;
   
Line 528  set-current Line 528  set-current
  ." NEXT_P1;" cr   ." NEXT_P1;" cr
  stores   stores
  fill-tos   fill-tos
  ." NEXT1_P2;" cr   ." NEXT_P2;" cr
  ." }" cr   ." }" cr
  cr   cr
 ;  ;

Removed from v.1.8  
changed lines
  Added in v.1.9


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