diff --git a/lists.lisp b/lists.lisp index d7a437e2e85d465e4625791742e3b17210094749..19721a064f055434006b9c1858c5b50696b38e2f 100644 --- a/lists.lisp +++ b/lists.lisp @@ -103,11 +103,11 @@ argument.") "Modify-macro for NCONC. Concatenates LISTS to place designated by the first argument.") -(define-modify-macro unionf (list) union +(define-modify-macro unionf (list &rest args) union "Modify-macro for UNION. Saves the union of LIST and the contents of the place designated by the first argument to the designated place.") -(define-modify-macro nunionf (list) nunion +(define-modify-macro nunionf (list &rest args) nunion "Modify-macro for NUNION. Saves the union of LIST and the contents of the place designated by the first argument to the designated place. May modify either argument.")