2
;;;; Author: Paul Dietz
3
;;;; Created: Thu Jun 3 06:25:52 2004
4
;;;; Contains: Tests of initial values of printer control variables
8
(deftest print-base.init.1
12
(deftest print-radix.init.1
16
(deftest print-case.init.1
20
(deftest print-circle.init.1
24
(deftest print-escape.init.1
25
(notnot *print-escape*)
28
(deftest print-gensym.init.1
29
(notnot *print-gensym*)
32
(deftest print-level.init.1
36
(deftest print-length.init.1
40
(deftest print-lines.init.1
44
(deftest print-readably.init.1
48
(deftest print-right-margin.init.1