*print-case*

Type:	-	system variable
Source:	-	xlprin.c

Syntax

 *print-case*

Description

*print-case* is a system variable that allows a user to specify how symbols are to be printed by XLISP. If *print-case* is set to ':downcase', all symbols will be printed in lower case characters. If *print-case* is set to ':upcase', all symbols will be printed in upper case characters. If *print-case* is set to anything other than ':upcase' or ':downcase', all symbols will be printed in upper case characters. The default value for *print-case* is ':upcase'.

Examples

(setq *print-case* :downcase)  ; returns :downcase
(setq a 'b)                    ; returns b

(setq *print-case* 'foo)       ; returns FOO
(setq a 'b)                    ; returns B

(setq *print-case* :upcase)    ; returns :UPCASE
(setq a 'b)                    ; returns B

Common Lisp: Common LISP supports a third keyword ':capitalize' to print the first character of symbol names in upper-case. XLISP does not support this. In XLISP, if *print-case* is set to ':capitalize', all characters in symbols names will be printed in upper-case characters.

See the *print-case* system variable in the XLISP 2.0 manual.

  Back to Top