Diff for /gforth/arch/8086/prim.fs between versions 1.5 and 1.6

version 1.5, 2003/09/01 22:12:47 version 1.6, 2003/09/14 21:16:48
Line 119  end-macros Line 119  end-macros
   
   Code ?branch   ( f -- ) \ jump on f<>0    Code ?branch   ( f -- ) \ jump on f<>0
     tos tos or,   tos pop,                      \ check and get new tos      tos tos or,   tos pop,                      \ check and get new tos
     0= IF,  fip ) fip add,      next,           \ jump      0= IF,  fip ) fip mov,      next,           \ jump
     ELSE,   fip inc,  fip inc,  next,  THEN,    \ skip      ELSE,   fip inc,  fip inc,  next,  THEN,    \ skip
    End-Code     End-Code
   
Line 258  end-macros Line 258  end-macros
   
  \ branch and literal   \ branch and literal
   Code branch   ( -- ) \ unconditional branch    Code branch   ( -- ) \ unconditional branch
     fip ) fip add,      fip ) fip mov,
     next,      next,
    End-Code     End-Code
   

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


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