--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/tests/equiv.lac Sun Jun 08 14:42:12 2008 -0400 @@ -0,0 +1,3 @@ +type t1 = {A : int, B : float} +type t2 = {B : float, A : int} +val e1 : t1 -> t2 = fn x => x