hsimport 0.1.1 → 0.2

raw patch · 4 files changed

+7/−3 lines, 4 files

Files

HsImport/Args.hs +1/−1
HsImport/ImportSpec.hs +2/−1
hsimport.cabal +1/−1
tests/Main.hs +3/−0

HsImport/Args.hs view

@@ -29,5 +29,5 @@    &= helpArg [explicit, name "help", name "h"]    &= versionArg [explicit, name "version", name "v", summary versionInfo]    where-      versionInfo = "hsimport version 0.1.1"+      versionInfo = "hsimport version 0.2"       summaryInfo = ""

HsImport/ImportSpec.hs view

@@ -14,6 +14,7 @@ import qualified Language.Haskell.Exts as HS import qualified HsImport.Args as Args import HsImport.Args (HsImportArgs)+import HsImport.Parse (parseFile)  data ImportSpec = ImportSpec     { _sourceFile     :: FilePath@@ -31,7 +32,7 @@ hsImportSpec args    | Just error <- checkArgs args = return $ Left error    | otherwise = do-      result <- HS.parseFile $ Args.inputSrcFile args+      result <- parseFile $ Args.inputSrcFile args       case result of            HS.ParseOk modul -> return $ Right $               ImportSpec (Args.inputSrcFile args) modul

hsimport.cabal view

@@ -1,5 +1,5 @@ Name:          hsimport-Version:       0.1.1+Version:       0.2 License:       BSD3 License-file:  LICENSE Author:        Daniel Trstenjak

tests/Main.hs view

@@ -33,6 +33,9 @@    , hsImportTest "ModuleTest16" "Control.Monad" ""    , hsImportTest "ModuleTest17" "Control.Monad" ""    , hsImportTest "ModuleTest18" "Control.Monad" ""+   , hsImportTest "ModuleTest19" "Control.Monad" ""+   , hsImportTest "ModuleTest20" "Control.Monad" ""+   , hsImportTest "ModuleTest21" "Control.Monad" ""    ]