type: function (subr) location: built-in source file: xlfio.c and xlprin.c Common LISP compatible: yes supported on: all machines
(princ <expr> [ <destination> ] ) <expr> - an expression <destination> - an optional destination - must be a file pointer or stream, the default is *standard-output*
The PRINC function prints the <expr> to the specified <destination>. The <expr> is printed without a new-line. If <expr> is a string, it will not be printed with quotes around the string. The <expr> is returned as the result. The <destination> may be a file pointer or a stream. If there is no <destination>, *STANDARD-OUTPUT* is the default. The TERPRI function is used to terminate the print lines produced.
(princ 'a) ; prints A without <NL> (princ '(a b)) ; prints (A B) without <NL> (princ 99) ; prints 99 without <NL> (princ "hi") ; prints hi without <NL> ; (setq f (open "f" :direction :output)) ; create file (princ "hi" f) ; returns "hi" (princ 727 f) ; returns 727 (princ "ho" f) ; returns "ho" (close f) ; file contains <hi727ho>
COMMON LISP COMPATIBILITY: Common LISP specifies that print operations with a <destination> of NIL, will go to *STANDARD-OUTPUT*. XLISP does not send the output to *STANDARD-OUTPUT* with a <destination> of NIL. Common LISP also specifies that a <destination> of T will be sent to *TERMINAL-IO*. XLISP does not allow T as a valid argument for <destination>.