like in, but quotes choices
(defmacro inq (obj &rest choices) "like in, but quotes choices" `(in ,obj ,@(loop for c in choices collect `',c)))