diff --git a/racket/collects/racket/private/class-c-old.rkt b/racket/collects/racket/private/class-c-old.rkt
index 078a72a4c0..d60fc12fe6 100644
--- a/racket/collects/racket/private/class-c-old.rkt
+++ b/racket/collects/racket/private/class-c-old.rkt
@@ -1540,11 +1540,11 @@
     (fail '(expected: "an object" given: "~e") obj))
   (let ([cls (object-ref/unwrap obj)])
     (let ([method-ht (class-method-ht cls)])
-      (for ([m methods])
+      (for ([m (in-list methods)])
         (unless (hash-ref method-ht m #f)
           (fail "no public method ~a" m))))
     (let ([field-ht (class-field-ht cls)])
-      (for ([m fields])
+      (for ([m (in-list fields)])
         (unless (hash-ref field-ht m #f)
           (fail "no public field ~a" m)))))
   #t)