Index: /trunk/ccl/xdump/xfasload.lisp
===================================================================
--- /trunk/ccl/xdump/xfasload.lisp	(revision 248)
+++ /trunk/ccl/xdump/xfasload.lisp	(revision 249)
@@ -160,5 +160,5 @@
   #(+-2 --2 *-2 /-2 =-2 /=-2 >-2 >=-2 <-2 <=-2 eql length sequence-type
         assq memq logbitp logior-2 logand-2 ash 
-        %negate logxor-2 %aref1 %aset1 list-length
+        %negate logxor-2 %aref1 %aset1
         ; add more
         )