diff --git a/racket/collects/racket/private/class-c-old.rkt b/racket/collects/racket/private/class-c-old.rkt
index c4cfddb0ab..3790e11ae9 100644
--- a/racket/collects/racket/private/class-c-old.rkt
+++ b/racket/collects/racket/private/class-c-old.rkt
@@ -1341,7 +1341,8 @@
                        [old-classes (reverse old-classes)])
               (cond
                 [(null? projs) (list class)]
-                [else (loop ((car projs) class) (cdr ctcs) (cdr projs) '() '())]))))
+                [else (cons class
+                            (loop ((car projs) class) (cdr ctcs) (cdr projs) '() '()))]))))
          
          (impersonate-struct
           interposed-val object-ref