summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adam@chlipala.net>2011-12-29 14:12:03 -0500
committerGravatar Adam Chlipala <adam@chlipala.net>2011-12-29 14:12:03 -0500
commit8d6870717691d2ba46e518c8d1687236019368d1 (patch)
treec952c50d84aa3510057f79a404bbc4eeb37666b7 /lib
parent4489a47a9f033309663b611f04c4e03d5a00dec2 (diff)
Rename [Top.id] to avoid clash with [Basis.id]
Diffstat (limited to 'lib')
-rw-r--r--lib/ur/top.ur2
-rw-r--r--lib/ur/top.urs2
2 files changed, 2 insertions, 2 deletions
diff --git a/lib/ur/top.ur b/lib/ur/top.ur
index 2741aa28..e504204e 100644
--- a/lib/ur/top.ur
+++ b/lib/ur/top.ur
@@ -51,7 +51,7 @@ end
fun not b = if b then False else True
-con id = K ==> fn t :: K => t
+con ident = K ==> fn t :: K => t
con record (t :: {Type}) = $t
con fst = K1 ==> K2 ==> fn t :: (K1 * K2) => t.1
con snd = K1 ==> K2 ==> fn t :: (K1 * K2) => t.2
diff --git a/lib/ur/top.urs b/lib/ur/top.urs
index 75d85fcd..489e744d 100644
--- a/lib/ur/top.urs
+++ b/lib/ur/top.urs
@@ -22,7 +22,7 @@ end
val not : bool -> bool
(* Type-level identity function *)
-con id = K ==> fn t :: K => t
+con ident = K ==> fn t :: K => t
(* Type-level function which yields the value-level record
described by the given type-level record *)