macro_name: IN-PACKAGE

library: advanced-readtable

call_form: (in-package)

status: expansion-error

error:
Error while parsing arguments to DEFMACRO IN-PACKAGE:
  too few elements in
    ()
  to satisfy lambda list
    (DESIGNATOR):
  exactly 1 expected, but got 0


call_form: (in-package nil)

expanded: (common-lisp:in-package #A((3) base-char . "NIL"))

status: verified


call_form: (in-package nil nil)

error:
Error while parsing arguments to DEFMACRO IN-PACKAGE:
  too many elements in
    (NIL NIL)
  to satisfy lambda list
    (DESIGNATOR):
  exactly 1 expected, but got 2


call_form: (in-package nil (progn))

error:
Error while parsing arguments to DEFMACRO IN-PACKAGE:
  too many elements in
    (NIL (PROGN))
  to satisfy lambda list
    (DESIGNATOR):
  exactly 1 expected, but got 2


call_form: (in-package nil :key nil)

error:
Error while parsing arguments to DEFMACRO IN-PACKAGE:
  too many elements in
    (NIL :KEY NIL)
  to satisfy lambda list
    (DESIGNATOR):
  exactly 1 expected, but got 3


call_form: (in-package 'lol-gen::some-name)

error: 'LOL-GEN::SOME-NAME is not a string designator.


macro_name: SET-HANDLER

call_form: (set-handler)

error:
Error while parsing arguments to DEFMACRO SET-HANDLER:
  too few elements in
    ()
  to satisfy lambda list
    (HANDLER-LIST KEY FUNCTION):
  exactly 3 expected, but got 0


call_form: (set-handler nil)

error:
Error while parsing arguments to DEFMACRO SET-HANDLER:
  too few elements in
    (NIL)
  to satisfy lambda list
    (HANDLER-LIST KEY FUNCTION):
  exactly 3 expected, but got 1


call_form: (set-handler nil nil)

error:
Error while parsing arguments to DEFMACRO SET-HANDLER:
  too few elements in
    (NIL NIL)
  to satisfy lambda list
    (HANDLER-LIST KEY FUNCTION):
  exactly 3 expected, but got 2


call_form: (set-handler nil (progn))

error:
Error while parsing arguments to DEFMACRO SET-HANDLER:
  too few elements in
    (NIL (PROGN))
  to satisfy lambda list
    (HANDLER-LIST KEY FUNCTION):
  exactly 3 expected, but got 2


call_form: (set-handler nil :key nil)

expanded:
(let ((key :key) (function nil))
  (let ((found (assoc key nil :test #'equal)))
    (if found
        (setf (cdr found) function)
        (prog1 function (push (cons key function) nil)))))


call_form: (set-handler 'lol-gen::some-name)

error:
Error while parsing arguments to DEFMACRO SET-HANDLER:
  too few elements in
    ('LOL-GEN::SOME-NAME)
  to satisfy lambda list
    (HANDLER-LIST KEY FUNCTION):
  exactly 3 expected, but got 1


macro_name: DEFPACKAGE

call_form: (defpackage)

error:
Error while parsing arguments to DEFMACRO DEFPACKAGE:
  too few elements in
    ()
  to satisfy lambda list
    (PACKAGE &REST OPTIONS):
  at least 1 expected, but got 0


call_form: (defpackage nil)

expanded: (prog1 (common-lisp:defpackage nil))


call_form: (defpackage nil nil)

expanded:
(prog1
    (common-lisp:defpackage nil
      (nil)))


call_form: (defpackage nil (progn))

expanded:
(prog1
    (common-lisp:defpackage nil
      (progn)))


call_form: (defpackage nil :key nil)

error:
The value
  :KEY
is not of type
  LIST


call_form: (defpackage 'lol-gen::some-name)