Index: src/org/armedbear/lisp/arglist.java
===================================================================
--- src/org/armedbear/lisp/arglist.java	(revision 12040)
+++ src/org/armedbear/lisp/arglist.java	(working copy)
@@ -64,7 +64,7 @@
 
     // ### arglist
     private static final Primitive ARGLIST =
-        new Primitive("arglist", PACKAGE_EXT, true)
+        new Primitive("arglist", PACKAGE_EXT, true, "extended-function-designator")
     {
         @Override
         public LispObject execute(LispObject arg) throws ConditionThrowable