diff options
Diffstat (limited to 'src/interp/lisp-backend.boot')
| -rw-r--r-- | src/interp/lisp-backend.boot | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/interp/lisp-backend.boot b/src/interp/lisp-backend.boot index a6fe5da7..7bbbb22f 100644 --- a/src/interp/lisp-backend.boot +++ b/src/interp/lisp-backend.boot @@ -602,7 +602,12 @@ for x in [ ['%leave, :'RETURN], ['%otherwise,:'T], ['%funcall, :'FUNCALL], - ['%when, :'COND] + ['%when, :'COND], + + -- I/O stream functions + ['%writeString, :'WRITE_-STRING], + ['%writeNewline, :'TERPRI], + ['%writeLine, :'WRITE_-LINE] ] repeat property(first x,'%Rename) := rest x ++ Table of opcode-expander pairs. |