# Pastebin cCuD2vsr
gdl-user> (list *print-lines* *print-miser-width* *print-pprint-dispatch* *print-right-margin* *print-level* *print-length* *print-lines* *print-circle* *print-escape* *print-pretty*)
(nil nil #<excl::pprint-dispatch-struct @ #x100033e442> nil nil nil nil
 nil t t)
gdl-user> (with-standard-io-syntax (list *print-lines* *print-miser-width* *print-pprint-dispatch* *print-right-margin* *print-level* *print-length* *print-lines* *print-circle* *print-escape* *print-pretty*))
(nil nil #<excl::pprint-dispatch-struct @ #x10003419a2> nil nil nil nil
 nil t nil)
gdl-user>