+ ;; Object query resulting in a list of returned object instances
+ ((and (consp in-phrase)
+ (consp (car in-phrase))
+ (consp (second (car in-phrase)))
+ (eq 'quote (first (second (car in-phrase))))
+ (symbolp (second (second (car in-phrase)))))
+ (ansi-loop::loop-error "object query not yet supported"))
+