git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Merge pull request #1689 from passy/psc-publish-test
368fce2Phil Freeman
psc-publish/tests/Test.hs+9−1
compare with golang
unifiedsplit
@@ -19,9 +19,11 @@ import qualified Data.ByteString.Lazy as BL
19import Data.ByteString.Lazy (ByteString)
19import Data.ByteString.Lazy (ByteString)
20import qualified Data.Aeson as A
20import qualified Data.Aeson as A
21import Data.Aeson.BetterErrors
21import Data.Aeson.BetterErrors
22+import Data.Version
22
23
23import Main
24import Main
24import Language.PureScript.Docs
25import Language.PureScript.Docs
26+import Language.PureScript.Publish
25
27
26pkgName = "purescript-prelude"
28pkgName = "purescript-prelude"
27packageUrl = "https://github.com/purescript/" ++ pkgName
29packageUrl = "https://github.com/purescript/" ++ pkgName
@@ -50,11 +52,17 @@ bowerInstall =
50 pushd packageDir $
52 pushd packageDir $
51 readProcess "bower" ["install"] "" >>= putStr
53 readProcess "bower" ["install"] "" >>= putStr
52
54
55+testRunOptions :: PublishOptions
56+testRunOptions = defaultPublishOptions
57+ { publishGetVersion = return testVersion
58+ }
59+ where testVersion = ("v999.0.0", Version [999,0,0] [])
60+
53getPackage :: IO UploadedPackage
61getPackage :: IO UploadedPackage
54getPackage = do
62getPackage = do
55 clonePackage
63 clonePackage
56 bowerInstall
64 bowerInstall
57− pushd packageDir preparePackage
65+ pushd packageDir $ preparePackage testRunOptions
58
66
59data TestResult
67data TestResult
60 = ParseFailed String
68 = ParseFailed String