Index: /trunk/ccl/level-1/l1-typesys.lisp
===================================================================
--- /trunk/ccl/level-1/l1-typesys.lisp	(revision 397)
+++ /trunk/ccl/level-1/l1-typesys.lisp	(revision 398)
@@ -18,6 +18,5 @@
 ;; This is a hacked-up version of the CMU CL type system.
 
-(eval-when (:load-toplevel)
-  (require "SEQUENCES"))
+