Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | Download | RSS feed

  1.  
  2. \ from gforth
  3. : REPLACE-WORD ( by-xt what-xt )
  4.     [ HEX ] E9 [ DECIMAL ] OVER C!  \ JMP ...
  5.     1+ DUP >R
  6.     CELL+ -
  7.     R> !
  8. ;
  9.