Mercurial > urweb
diff tests/modproj.ur @ 244:71bafe66dbe1
Laconic -> Ur
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sun, 31 Aug 2008 08:32:18 -0400 |
parents | tests/modproj.lac@02f42e9a1825 |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/tests/modproj.ur Sun Aug 31 08:32:18 2008 -0400 @@ -0,0 +1,23 @@ +signature S1 = sig + type t + val zero : t +end +signature S2 = sig + type t = int + val zero : t +end +structure S = struct + type t = int + val zero = 0 +end +structure S1 : S1 = S +structure S2 : S2 = S + +type t = S1.t +val zero : t = S1.zero + +type t = S2.t +val zero : int = S2.zero + +structure T = S1 +val main : S1.t = T.zero