fixed gvector typo

This commit is contained in:
Ryan Culpepper 2010-11-17 11:49:57 -07:00
parent de9538d1eb
commit c50ab191d6

View File

@ -137,7 +137,7 @@
[[(var ...) (in-gv gv-expr)]
(with-syntax ([gv-expr-c (wrap-expr/c #'gvector? #'gv-expr #:macro #'in-gv)])
(syntax/loc stx
[(var ...) (in-vector gv-expr-c)]))]
[(var ...) (in-gvector gv-expr-c)]))]
[_ #f])))
(define-syntax (for/gvector stx)