12 lines
175 B
Plaintext
12 lines
175 B
Plaintext
;; -*- mode: lisp-data -*-
|
|
|
|
(fset 'test (lambda () (print print-circular)))
|
|
|
|
(print print-circular)
|
|
|
|
(let ((print-circular nil)
|
|
(b t))
|
|
(test))
|
|
|
|
(print print-circular)
|