White space only
authorSimon Peyton Jones <simonpj@microsoft.com>
Tue, 15 Jan 2013 14:54:37 +0000 (14:54 +0000)
committerSimon Peyton Jones <simonpj@microsoft.com>
Tue, 15 Jan 2013 14:54:37 +0000 (14:54 +0000)
compiler/codeGen/StgCmmTicky.hs

index ffa5168..2bca544 100644 (file)
@@ -410,6 +410,6 @@ showTypeCategory ty
          else if isPrimTyCon tycon {- array, we hope -}   then 'A'     -- Bogus
          else if isEnumerationTyCon tycon                 then 'E'
          else if isTupleTyCon tycon                       then 'T'
-         else if isJust (tyConSingleDataCon_maybe tycon)       then 'S'
+         else if isJust (tyConSingleDataCon_maybe tycon)  then 'S'
          else if utc == listTyConKey                      then 'L'
          else 'M' -- oh, well...