grinder suggestion

[David Vinayak Wallace <Gumby at MC>]

In Symbolics 3600 Zwei in System 242.356, Hardcopy 20.10, FEP 18, on Lisp Machine Jimi Hendrix:

Would it be hard to make the tab indenter and grinder understand about
quoted lists?  That is I want say the memq to grind like this
      (unless (memq (car prop) '(cref-line parse-line name filetype
				 begin-file begin-page end-page end-file))
	(ferror "No such property: ~s" (car prop))))
 not

      (unless (memq (car prop) '(cref-line parse-line name filetype
					   begin-file begin-page end-page end-file))
	(ferror "No such property: ~s" (car prop))))