Fixed typo in overload.tr.

This commit is contained in:
bringert committed 2005-11-30 13:18:43 +00:00
1 parent b846b4c4fd
commit b6ee983432
1 file changed
+1 -1
+1 -1
View File
@@ -93,7 +93,7 @@ Ord : Type -> Type
Ord A = sig { compare : A -> A -> Ordering }
compare : (A : Type) -> Ord A -> A -> A -> Ordering
compare _ d = compare
compare _ d = d.compare
ordOp : (Ordering -> Bool) -> (A : Type) -> Ord A -> A -> A -> Bool
ordOp f A d x y = f (compare A d x y)