Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/3596d5d1f16a7644e6f5cab7b9fb2c39296661ee >--------------------------------------------------------------- commit 3596d5d1f16a7644e6f5cab7b9fb2c39296661ee Author: Simon Marlow <[email protected]> Date: Fri Sep 21 11:04:05 2012 +0100 whitespace only >--------------------------------------------------------------- compiler/nativeGen/X86/Cond.hs | 50 ++++++++++++++++----------------------- 1 files changed, 21 insertions(+), 29 deletions(-) diff --git a/compiler/nativeGen/X86/Cond.hs b/compiler/nativeGen/X86/Cond.hs index 904a9ce..586dabd 100644 --- a/compiler/nativeGen/X86/Cond.hs +++ b/compiler/nativeGen/X86/Cond.hs @@ -1,15 +1,7 @@ - -{-# OPTIONS -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://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#TabsvsSpaces --- for details - module X86.Cond ( - Cond(..), - condUnsigned, - condToSigned, + Cond(..), + condUnsigned, + condToSigned, condToUnsigned, maybeFlipCond ) @@ -17,24 +9,24 @@ module X86.Cond ( where data Cond - = ALWAYS -- What's really used? ToDo - | EQQ - | GE - | GEU - | GTT - | GU - | LE - | LEU - | LTT - | LU - | NE - | NEG - | POS - | CARRY - | OFLO - | PARITY - | NOTPARITY - deriving Eq + = ALWAYS -- What's really used? ToDo + | EQQ + | GE + | GEU + | GTT + | GU + | LE + | LEU + | LTT + | LU + | NE + | NEG + | POS + | CARRY + | OFLO + | PARITY + | NOTPARITY + deriving Eq condUnsigned :: Cond -> Bool condUnsigned GU = True _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
