Pascal Bourguignon  <spam@mouse-potato.com> wrote:
+---------------
| rif <rif@mit.edu> writes:
| > I am familiar with the use of macroexpand-1.  However, on both OpenMCL
| > and CMUCL-19a, (macroexpand-1 '(plus 'a 'b)) in the above yields
| >     ('A 'B)
| > NOT 
| >     ((QUOTE A) (QUOTE B))
| > so this approach fails to directly resolve the confusion.
| 
| Is there a standard way to ask the printer to print 'a as (quote a)?
+---------------

Actually, there is! Just set or bind *PRINT-PRETTY* to NIL:

	> (let ((*print-pretty* nil))
	    (print ''a))
	(QUOTE A) 
	'A
	>


-Rob

-----
Rob Warnock			<rpw3@rpw3.org>
627 26th Avenue			<URL:http://rpw3.org/>
San Mateo, CA 94403		(650)572-2607