modern-compiler-ml/tiger/testcases/test38.tig

10 lines
200 B
Text
Raw Normal View History

/* This is illegal, since there are two types with the same name
in the same (consecutive) batch of mutually recursive types.
See also test47 */
let
type a = int
type a = string
in
0
end