diff --git a/pkgs/racket-doc/scribblings/guide/pattern-macros.scrbl b/pkgs/racket-doc/scribblings/guide/pattern-macros.scrbl
index a9e790d4a1..48440d9c2b 100644
--- a/pkgs/racket-doc/scribblings/guide/pattern-macros.scrbl
+++ b/pkgs/racket-doc/scribblings/guide/pattern-macros.scrbl
@@ -453,11 +453,11 @@ Step-by-step, expansion proceeds as follows:
 @racketblock[
 (define-for-cbr do-f (a b)
   () (swap a b))
-=> (define-for-cbr do-f (b)
+(unsyntax @tt{=>}) (define-for-cbr do-f (b)
      ([a get_1 put_1]) (swap a b))
-=> (define-for-cbr do-f ()
+(unsyntax @tt{=>}) (define-for-cbr do-f ()
      ([a get_1 put_1] [b get_2 put_2]) (swap a b))
-=> (define (do-f get_1 get_2 put_1 put_2)
+(unsyntax @tt{=>}) (define (do-f get_1 get_2 put_1 put_2)
      (define-get/put-id a get_1 put_1)
      (define-get/put-id b get_2 put_2)
      (swap a b))