scan 0.1.0.4 → 0.1.0.5

raw patch · 3 files changed

+7/−4 lines, 3 files

Files

scan.cabal +1/−1
src/Language/Haskell/Scanner.hs +4/−1
src/scan.hs +2/−2

scan.cabal view

@@ -1,7 +1,7 @@ cabal-version:      >= 1.4 build-type:         Simple name:               scan-version:            0.1.0.4+version:            0.1.0.5 license:            BSD3 license-file:       doc/LICENSE category:           Development

src/Language/Haskell/Scanner.hs view

@@ -18,7 +18,8 @@   , Opts (..)   , defaultOpts   , anaPosToks-  , PosTok+  , PosTok(..)+  , Token   , showPosTok   , Diag (..)   , showDiag@@ -253,10 +254,12 @@ -- | messages with positions data Diag = Diag SourcePos String +-- | show parsec positions like hlint does showSourcePos :: SourcePos -> String showSourcePos p = sourceName p ++ ":" ++ shows (sourceLine p) ":"   ++ shows (sourceColumn p) ":" +-- | show the message with its position showDiag :: Diag -> String showDiag (Diag p s) = showSourcePos p ++ ' ' : s

src/scan.hs view

@@ -11,7 +11,7 @@ the Haskell style scanner -} -module Main () where+module Main (main) where  import Control.Monad @@ -35,7 +35,7 @@  -- | the hard-coded version string. version :: String-version = "scan-0.1.0.4 http://projects.haskell.org/style-scanner/"+version = "scan-0.1.0.5 http://projects.haskell.org/style-scanner/"  data Flag =     Help