From cfa10d5f3079bd45351f3a2d5b3fcccb7214fe50 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Wed, 28 Apr 2021 20:29:46 -0600
Subject: [PATCH] fix typo in `in-value` change

Thanks to @yjqww6
---
 racket/collects/racket/private/for.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/racket/collects/racket/private/for.rkt b/racket/collects/racket/private/for.rkt
index 216fefec34..6c40547f1f 100644
--- a/racket/collects/racket/private/for.rkt
+++ b/racket/collects/racket/private/for.rkt
@@ -2309,7 +2309,7 @@
     (lambda () #'in-value)
     (lambda (stx)
       (syntax-case stx ()
-        [[<(id) (_ expr)]
+        [[(id) (_ expr)]
          #'[(id) (:do-in ([(id*) expr]) #t () #t ([(id) id*]) #t #f ())]]
         [_ #f])))