Definition of the defbytelist macro.
Macro:
(defmacro defbytelist (type &key elt-type pred fix equiv parents short long) (cons 'make-event (cons (cons 'defbytelist-fn (cons (cons 'quote (cons type 'nil)) (cons (cons 'quote (cons elt-type 'nil)) (cons (cons 'quote (cons pred 'nil)) (cons (cons 'quote (cons fix 'nil)) (cons (cons 'quote (cons equiv 'nil)) (cons (cons 'quote (cons parents 'nil)) (cons short (cons long '((w state))))))))))) 'nil)))