[hcoop/debian/mlton.git] / regression / fail / tyvar-scope.1.sml

fun 'a f (x: 'a) =
   let
      fun 'a g (y: 'a) = y
   in
      ()
   end
Commit	Line	Data
7f918cf1 CE	1	fun 'a f (x: 'a) =
	2	let
	3	fun 'a g (y: 'a) = y
	4	in
	5	()
	6	end