Diff for /gforth/kernel/cond.fs between versions 1.27 and 1.28

version 1.27, 2012/08/21 19:36:55 version 1.28, 2012/08/21 19:44:27
Line 193  IS until-like Line 193  IS until-like
     \g jump to the next outer BEGIN      \g jump to the next outer BEGIN
     depth 0 ?DO  I pick dest = IF      depth 0 ?DO  I pick dest = IF
             I cs-item-size / cs-pick postpone AGAIN              I cs-item-size / cs-pick postpone AGAIN
             LEAVE  THEN              UNLOOP  EXIT  THEN
     cs-item-size +LOOP      cs-item-size +LOOP
     true abort" no BEGIN found" ; immediate compile-only      true abort" no BEGIN found" ; immediate compile-only
   

Removed from v.1.27  
changed lines
  Added in v.1.28


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