@@ -114,7 +114,7 @@ data JSONPathElement = Key Text
114 | Index {-# UNPACK #-} !Int
114 | Index {-# UNPACK #-} !Int
115 -- ^ JSON path element of an index into an
115 -- ^ JSON path element of an index into an
116 -- array, \"array[index]\".
116 -- array, \"array[index]\".
117− deriving (Eq, Show, Typeable)
117+ deriving (Eq, Show, Typeable, Ord)
118type JSONPath = [JSONPathElement]
118type JSONPath = [JSONPathElement]
120-- | The internal result of running a 'Parser'.
120-- | The internal result of running a 'Parser'.