diff options
author | dos-reis <gdr@axiomatics.org> | 2011-07-04 04:39:13 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2011-07-04 04:39:13 +0000 |
commit | dc5f09ca9fe80896ec7fd8677a3e517ce9213285 (patch) | |
tree | a99f1bd7f2174ea4d71a3edb7fdfcc085483c3b6 /src/interp/vmlisp.lisp | |
parent | 67a9b503724a4390abf08baa367959713483f363 (diff) | |
download | open-axiom-dc5f09ca9fe80896ec7fd8677a3e517ce9213285.tar.gz |
* interp/vmlisp.lisp (PRINTEXP): Remove.
* interp/br-data.boot: Use writeString, writeChar, and writeLine.
* interp/c-util.boot: Likewise.
* interp/diagnostics.boot: Likewise.
* interp/fortcall.boot: Likewise.
* interp/i-output.boot: Likewise.
* interp/i-syscmd.boot: Likewise.
* interp/i-util.boot: Likewise.
* interp/lisplib.boot: Likewise.
* interp/msgdb.boot: Likewise.
* interp/newfort.boot: Likewise.
* interp/record.boot: Likewise.
* interp/g-opt.boot ($VMsideEffectFreeOperators): Include
%writeString, %writeNewline, %writeLine.
* interp/lisp-backend.boot: Translate them.
Diffstat (limited to 'src/interp/vmlisp.lisp')
-rw-r--r-- | src/interp/vmlisp.lisp | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/src/interp/vmlisp.lisp b/src/interp/vmlisp.lisp index 0f3d1f2f..24e904c1 100644 --- a/src/interp/vmlisp.lisp +++ b/src/interp/vmlisp.lisp @@ -1261,8 +1261,6 @@ (define-function 'prin2cvec #'princ-to-string) (define-function 'stringimage #'princ-to-string) -(define-function 'printexp #'princ) - (defun |F,PRINT-ONE| (form &optional (stream |$OutputStream|)) (declare (ignore stream)) (let ((*print-level* 4) (*print-length* 4)) |