language-c 0.3.2 → 0.3.2.1

raw patch · 3 files changed

+10/−11 lines, 3 files

Files

language-c.cabal +1/−1
src/Language/C/Analysis/Debug.hs +0/−1
src/Language/C/Syntax/Constants.hs +9/−9

language-c.cabal view

@@ -1,5 +1,5 @@ Name:           language-c-Version:        0.3.2+Version:        0.3.2.1 Cabal-Version:  >= 1.2.3 Build-Type:     Simple License:        BSD3

src/Language/C/Analysis/Debug.hs view

@@ -25,7 +25,6 @@ import Language.C.Pretty import Language.C.Syntax -import Data.Generics import Text.PrettyPrint.HughesPJ import Data.Map (Map) ; import qualified Data.Map as Map

src/Language/C/Syntax/Constants.hs view

@@ -34,11 +34,11 @@  -- | C char constants (abstract) data CChar = CChar-              {-# UNPACK #-} !Char-              {-# UNPACK #-} !Bool  -- wide flag+              !Char+              !Bool  -- wide flag            | CChars-                              [Char] -- multi-character character constant-              {-# UNPACK #-} !Bool   -- wide flag+              [Char] -- multi-character character constant+              !Bool   -- wide flag            deriving (Eq,Ord,Data,Typeable)  instance Show CChar where@@ -98,9 +98,9 @@ {-# SPECIALIZE testFlag :: CIntFlag -> Flags CIntFlag -> Bool #-}  data CInteger = CInteger-                 {-# UNPACK #-} !Integer-                 {-# UNPACK #-} !CIntRepr-                 {-# UNPACK #-} !(Flags CIntFlag)  -- integer flags+                 !Integer+                 !CIntRepr+                 !(Flags CIntFlag)  -- integer flags                  deriving (Eq,Ord,Data,Typeable) instance Show CInteger where     showsPrec _ (CInteger i repr flags) = showInt i . showString (concatMap showIFlag [FlagUnsigned .. ]) where@@ -141,8 +141,8 @@  -- | Floats (represented as strings) data CFloat = CFloat-                {-# UNPACK #-} !String-                 deriving (Eq,Ord,Data,Typeable)+               !String+               deriving (Eq,Ord,Data,Typeable) instance Show CFloat where   showsPrec _ (CFloat internal) = showString internal