[tiger.ml.git] / compiler / testcases / test38.tig

/* 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
Commit	Line	Data
38ffcb1f SK	1	/* This is illegal, since there are two types with the same name
	2	in the same (consecutive) batch of mutually recursive types.
	3	See also test47 */
	4	let
	5	type a = int
	6	type a = string
	7	in
	8	0
	9	end