Skip to content

Commit

Permalink
make everything compile
Browse files Browse the repository at this point in the history
  • Loading branch information
paweljakubas committed Jun 18, 2019
1 parent 386bb4b commit 2e6ba01
Show file tree
Hide file tree
Showing 3 changed files with 37 additions and 2 deletions.
1 change: 1 addition & 0 deletions lib/http-bridge/cardano-wallet-http-bridge.cabal
Original file line number Diff line number Diff line change
Expand Up @@ -64,6 +64,7 @@ library
Cardano.Wallet.HttpBridge.Transaction
Data.Packfile
Servant.Extra.ContentTypes
Paths_cardano_wallet_http_bridge

test-suite unit
default-language:
Expand Down
32 changes: 31 additions & 1 deletion lib/jormungandr/cardano-wallet-jormungandr.cabal
Original file line number Diff line number Diff line change
Expand Up @@ -111,19 +111,36 @@ test-suite integration
ghc-options:
-Werror
build-depends:
async
aeson
, aeson-qq
, async
, base
, bytestring
, cardano-wallet-core
, cardano-wallet-http-bridge
, cardano-wallet-jormungandr
, cardano-wallet-launcher
, command
, cryptonite
, deepseq
, directory
, exceptions
, generic-lens
, hspec
, hspec-expectations-lifted
, http-api-data
, http-client
, http-types
, persistent-sqlite
, process
, QuickCheck
, retry
, servant
, template-haskell
, temporary
, text
, transformers
, warp
type:
exitcode-stdio-1.0
hs-source-dirs:
Expand All @@ -134,3 +151,16 @@ test-suite integration
Cardano.Faucet
Cardano.LauncherSpec
Cardano.Wallet.Jormungandr.NetworkSpec
Test.Integration.Faucet
Test.Integration.Framework.DSL
Test.Integration.Framework.Request
Test.Integration.Framework.TestData
Test.Integration.Scenario.API.Addresses
Test.Integration.Scenario.API.Transactions
Test.Integration.Scenario.API.Wallets
Test.Integration.Scenario.CLI.Addresses
Test.Integration.Scenario.CLI.Mnemonics
Test.Integration.Scenario.CLI.Server
Test.Integration.Scenario.CLI.Transactions
Test.Integration.Scenario.CLI.Wallets
Test.Integration.Scenario.CLI.Port
6 changes: 5 additions & 1 deletion lib/jormungandr/test/integration/Cardano/Faucet.hs
Original file line number Diff line number Diff line change
Expand Up @@ -11,6 +11,8 @@ import Cardano.Wallet.Primitive.Mnemonic
( mkMnemonic )
import Control.Concurrent.MVar
( newMVar )
import Data.Text
( Text )
import Test.Integration.Faucet
( Faucet (..) )

Expand All @@ -19,7 +21,9 @@ import Test.Integration.Faucet
-- integration tests scenarios.
initFaucet :: IO Faucet
initFaucet = do
wallets <- mkMnemonic @15 (map fst mnemonicsAdresses)
let wallets =
map (either (error "cannot retrieve mnemonics") id . mkMnemonic @15)
(map fst mnemonicsAdresses)
Faucet <$> newMVar wallets

mnemonicsAdresses :: [([Text], Text)]
Expand Down

0 comments on commit 2e6ba01

Please sign in to comment.