adjust test case for improved ->i handling in check syntax

This commit is contained in:
Robby Findler 2013-02-27 21:29:59 -06:00
parent b0ed3b49e0
commit 0d3fc7db93

View File

@ -973,7 +973,9 @@
("f" lexically-bound) ("f" lexically-bound)
(" (" default-color) (" (" default-color)
("->i" imported) ("->i" imported)
(" ((p? " default-color) (" ((" default-color)
("p?" lexically-bound)
(" " default-color)
("any/c" imported) ("any/c" imported)
(")) (_ (" default-color) (")) (_ (" default-color)
("p?" lexically-bound) ("p?" lexically-bound)
@ -987,7 +989,7 @@
("a" lexically-bound) ("a" lexically-bound)
(") 1)" default-color)) (") 1)" default-color))
(list '((82 83) (37 38)) (list '((82 83) (37 38))
'((61 63) (65 67)) '((46 48) (61 63) (65 67))
'((6 12) (14 21) (40 43) (49 54) (74 80)))) '((6 12) (14 21) (40 43) (49 54) (74 80))))
(build-test "#lang racket/base\n(define red 1)\n(module+ test red)" (build-test "#lang racket/base\n(define red 1)\n(module+ test red)"