diff options
| author | Austin Seipp <austin@well-typed.com> | 2014-07-18 22:28:05 -0500 |
|---|---|---|
| committer | Austin Seipp <austin@well-typed.com> | 2014-07-20 16:55:50 -0500 |
| commit | 8707e4597dc3a49a7dd659601cbe98cb451e2f05 (patch) | |
| tree | 62408e4e0d1c9cb62382fb99c377cf09f9580d20 | |
| parent | 25c4629a82af7b31f43af16a7ab0501515fc59d5 (diff) | |
| download | haskell-8707e4597dc3a49a7dd659601cbe98cb451e2f05.tar.gz | |
nativeGen: detabify/dewhitespace SPARC/Cond
Signed-off-by: Austin Seipp <austin@well-typed.com>
| -rw-r--r-- | compiler/nativeGen/SPARC/Cond.hs | 50 |
1 files changed, 21 insertions, 29 deletions
diff --git a/compiler/nativeGen/SPARC/Cond.hs b/compiler/nativeGen/SPARC/Cond.hs index 198e4a7627..da41457950 100644 --- a/compiler/nativeGen/SPARC/Cond.hs +++ b/compiler/nativeGen/SPARC/Cond.hs @@ -1,39 +1,31 @@ - -{-# OPTIONS_GHC -fno-warn-tabs #-} --- The above warning supression flag is a temporary kludge. --- While working on this module you are encouraged to remove it and --- detab the module (please do the detabbing in a separate patch). See --- http://ghc.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#TabsvsSpaces --- for details - module SPARC.Cond ( - Cond(..), - condUnsigned, - condToSigned, - condToUnsigned + Cond(..), + condUnsigned, + condToSigned, + condToUnsigned ) where -- | Branch condition codes. data Cond - = ALWAYS - | EQQ - | GE - | GEU - | GTT - | GU - | LE - | LEU - | LTT - | LU - | NE - | NEG - | NEVER - | POS - | VC - | VS - deriving Eq + = ALWAYS + | EQQ + | GE + | GEU + | GTT + | GU + | LE + | LEU + | LTT + | LU + | NE + | NEG + | NEVER + | POS + | VC + | VS + deriving Eq condUnsigned :: Cond -> Bool |