diff --git a/collects/racket/private/reverse.rkt b/collects/racket/private/reverse.rkt
index 42def93b1b..8cd4541656 100644
--- a/collects/racket/private/reverse.rkt
+++ b/collects/racket/private/reverse.rkt
@@ -7,7 +7,7 @@
                       (lambda (l)
                         (if (list? l) 
                             (void)
-                            (raise-type-error 'reverse "list"))
+                            (raise-type-error 'reverse "list" l))
                         (letrec-values ([(loop)
                                          (lambda (a l)
                                            (if (null? l)