[gforth] / gforth / kernel / errore.fs  

gforth: gforth/kernel/errore.fs

Diff for /gforth/kernel/errore.fs between version 1.1 and 1.2

version 1.1, Wed May 21 20:40:14 1997 UTC version 1.2, Sat Sep 13 12:05:51 1997 UTC
Line 43 
Line 43 
         IF 2 cells + count type drop exit THEN          IF 2 cells + count type drop exit THEN
     REPEAT      REPEAT
     drop      drop
 [ has-os [IF] ]  [ has? os [IF] ]
     dup -511 -255 within      dup -511 -255 within
     IF      IF
         256 + negate strsignal type exit          256 + negate strsignal type exit

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help