diff -rN -u old-cl-def/duplicates.lisp new-cl-def/duplicates.lisp
--- old-cl-def/duplicates.lisp	2011-04-21 22:42:14.000000000 +0000
+++ new-cl-def/duplicates.lisp	2011-04-21 22:42:14.000000000 +0000
@@ -105,10 +105,6 @@
     (labels
         ((fail ()
            (illegal-lambda-list lambda-list))
-         (ensure-list (list)
-           (if (listp list)
-               list
-               (list list)))
          (process-&whole ()
            (assert (eq (first args) '&whole))
            (pop args)