diff --git a/pkgs/racket-doc/scribblings/reference/reader-example.rkt b/pkgs/racket-doc/scribblings/reference/reader-example.rkt
index 5cff915f99..7596ad235d 100644
--- a/pkgs/racket-doc/scribblings/reference/reader-example.rkt
+++ b/pkgs/racket-doc/scribblings/reference/reader-example.rkt
@@ -74,8 +74,8 @@
                                                              [(integer? v) v]
                                                              [(real? v) `(/ ,(numerator v)
                                                                             ,(denominator v))]
-                                                             [(complex? v) `(make-complex ,(loop (real-part v))
-                                                                                          ,(loop (imag-part v)))])))]
+                                                             [(complex? v) `(make-rectangular ,(loop (real-part v))
+                                                                                              ,(loop (imag-part v)))])))]
                                                      [(list? v) `(list ,@(map loop v))]
                                                      [(vector? v) `(vector ,@(map loop (vector->list v)))]
                                                      [(box? v) `(box ,(loop (unbox v)))]