version 1.165, 2007/02/23 22:33:21
|
version 1.166, 2007/02/24 14:45:53
|
Line 55
|
Line 55
|
\ for backwards compatibility, jaw |
\ for backwards compatibility, jaw |
require compat/strcomp.fs |
require compat/strcomp.fs |
|
|
|
[undefined] outfile-execute [if] |
|
: outfile-execute ( ... xt file-id -- ... ) |
|
\ unsafe replacement |
|
outfile-id >r to outfile-id execute r> to outfile-id ; |
|
[then] |
|
|
warnings off |
warnings off |
|
|
\ redefinitions of kernel words not present in gforth-0.6.1 |
\ redefinitions of kernel words not present in gforth-0.6.1 |