[commit: ghc] master: Remove Ord Class (70e0a56)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/70e0a5644b8c20f70d6349cb4e0a0f0f1c06f5a0/ghc

>---------------------------------------------------------------

commit 70e0a5644b8c20f70d6349cb4e0a0f0f1c06f5a0
Author: Bartosz Nitka <niteria at gmail.com>
Date:   Thu Jun 9 04:48:15 2016 -0700

    Remove Ord Class
    
    It was implemented in terms of Unique which is nondeterministic
    
    GHC Trac: #4012


>---------------------------------------------------------------

70e0a5644b8c20f70d6349cb4e0a0f0f1c06f5a0
 compiler/types/Class.hs | 7 -------
 1 file changed, 7 deletions(-)

diff --git a/compiler/types/Class.hs b/compiler/types/Class.hs
index 93cc72f..27afe4d 100644
--- a/compiler/types/Class.hs
+++ b/compiler/types/Class.hs
@@ -279,13 +279,6 @@ instance Eq Class where
     c1 == c2 = classKey c1 == classKey c2
     c1 /= c2 = classKey c1 /= classKey c2
 
-instance Ord Class where
-    c1 <= c2 = classKey c1 <= classKey c2
-    c1 <  c2 = classKey c1 <  classKey c2
-    c1 >= c2 = classKey c1 >= classKey c2
-    c1 >  c2 = classKey c1 >  classKey c2
-    compare c1 c2 = classKey c1 `compare` classKey c2
-
 instance Uniquable Class where
     getUnique c = classKey c