From a1ff6ade0963df5c34f1fab8243848f74b28ce90 Mon Sep 17 00:00:00 2001
From: John Ericson <John.Ericson@Obsidian.Systems>
Date: Mon, 4 Jan 2021 00:53:42 +0000
Subject: [PATCH] Add `Ord (Tree a)` instance.

I assume this is an oversight because we do have `Ord1 Tree`.

Some of you may be interested in knowing that I caught this due to
trying out the the changes discusssed in the thread that began in
https://mail.haskell.org/pipermail/libraries/2020-March/030306.html.
---
 containers/src/Data/Tree.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/containers/src/Data/Tree.hs b/containers/src/Data/Tree.hs
index 697697560..0bc7c0c60 100644
--- a/containers/src/Data/Tree.hs
+++ b/containers/src/Data/Tree.hs
@@ -97,6 +97,7 @@ data Tree a = Node {
     }
 #ifdef __GLASGOW_HASKELL__
   deriving ( Eq
+           , Ord -- ^ @since 0.6.5
            , Read
            , Show
            , Data
@@ -104,7 +105,7 @@ data Tree a = Node {
            , Generic1 -- ^ @since 0.5.8
            )
 #else
-  deriving (Eq, Read, Show)
+  deriving (Eq, Ord, Read, Show)
 #endif
 
 -- | This type synonym exists primarily for historical