Add a TR test that I forgot to commit

Relevant to commit 18d4eb5135
This commit is contained in:
Asumu Takikawa 2013-11-04 15:29:11 -05:00
parent c1082c9706
commit 54e3380375

View File

@ -0,0 +1,14 @@
#;
(exn-pred #rx"but got a different a \\(bound in another scope\\)")
#lang typed/racket
;; Test that the error message in this case mentions
;; that the type variables look the same but are
;; different
(: f (All (a) (a -> a)))
(define (f x)
(: g (All (a) (a -> a)))
(define (g y) x)
x)