diff options
author | Luite Stegeman <stegeman@gmail.com> | 2014-11-18 22:21:44 -0600 |
---|---|---|
committer | Austin Seipp <austin@well-typed.com> | 2014-11-19 17:03:06 -0600 |
commit | b047733881cfd4b1d83dd856697c797701ee282a (patch) | |
tree | d99e1864fc9676f89d28f877b94af862e65fdde5 | |
parent | b3df5f6b2562ffec4bb2fb486032903b8de5f475 (diff) | |
download | haskell-b047733881cfd4b1d83dd856697c797701ee282a.tar.gz |
add missing instances for Loc and a few missing Eq instances
Summary: This adds a few missing instances that can be automatically derived
Reviewers: hvr, goldfire, austin
Reviewed By: goldfire, austin
Subscribers: thomie, carter
Differential Revision: https://phabricator.haskell.org/D495
-rw-r--r-- | libraries/template-haskell/Language/Haskell/TH/Syntax.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/libraries/template-haskell/Language/Haskell/TH/Syntax.hs b/libraries/template-haskell/Language/Haskell/TH/Syntax.hs index 98130955b1..8c95045539 100644 --- a/libraries/template-haskell/Language/Haskell/TH/Syntax.hs +++ b/libraries/template-haskell/Language/Haskell/TH/Syntax.hs @@ -878,6 +878,7 @@ data Loc , loc_module :: String , loc_start :: CharPos , loc_end :: CharPos } + deriving( Show, Eq, Data, Typeable, Generic ) type CharPos = (Int, Int) -- ^ Line and character position @@ -952,13 +953,13 @@ data Info | TyVarI -- Scoped type variable Name Type -- What it is bound to - deriving( Show, Data, Typeable, Generic ) + deriving( Show, Eq, Data, Typeable, Generic ) -- | Obtained from 'reifyModule' in the 'Q' Monad. data ModuleInfo = -- | Contains the import list of the module. ModuleInfo [Module] - deriving( Show, Data, Typeable, Generic ) + deriving( Show, Eq, Data, Typeable, Generic ) {- | In 'ClassOpI' and 'DataConI', name of the parent class or type |