X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=tests%2Ftype.impure.lisp;h=1e5acd9d6c9baa7616dbc2a3d700cd60658397b2;hb=64d420902d31cb87ea752f09b314e4767816a9c9;hp=da30191cdad6d978006844f5dd941ef1e4cbdb8b;hpb=0aecc2b20142e08068c3434273500131cb13fe2d;p=sbcl.git

diff --git a/tests/type.impure.lisp b/tests/type.impure.lisp
index da30191..1e5acd9 100644
--- a/tests/type.impure.lisp
+++ b/tests/type.impure.lisp
@@ -371,7 +371,6 @@
                                                    'fundamental-stream))
                     (mapcar #'find-class '(fundamental-stream
                                            standard-object
-                                           sb-pcl::std-object
                                            sb-pcl::slot-object
                                            stream
                                            t))))
@@ -379,7 +378,6 @@
                                                    'fundamental-stream))
                     (mapcar #'find-class '(fundamental-stream
                                            standard-object
-                                           sb-pcl::std-object
                                            sb-pcl::slot-object stream
                                            t))))
      (assert (subtypep (find-class 'stream) (find-class t)))