test48.tig

一个FREE编译器原码

/* This is legal.  The second function "g" simply hides the first one.
   Because of the intervening variable declaration, the two "g" functions
   are not in the same  batch of mutually recursive functions. 
   See also test39 */
let
	function g(a:int):int = a
	type t = int
	function g(a:int):int = a
in
	0
end