Skip to content

Commit

Permalink
cardano-testnet-test: adapt tests to API change
Browse files Browse the repository at this point in the history
  • Loading branch information
smelc committed Jan 25, 2024
1 parent 4392039 commit 473f455
Show file tree
Hide file tree
Showing 8 changed files with 8 additions and 8 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -66,7 +66,7 @@ hprop_transaction = H.integrationRetryWorkspace 0 "babbage-transaction" $ \tempA
{ testnetMagic
, poolNodes
, wallets
} <- cardanoTestnet options conf
} <- cardanoTestnet options conf Nothing Nothing Nothing

poolNode1 <- H.headM poolNodes

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -62,7 +62,7 @@ hprop_stakeSnapshot = H.integrationRetryWorkspace 2 "conway-stake-snapshot" $ \t
TestnetRuntime
{ testnetMagic
, poolNodes
} <- cardanoTestnet options conf
} <- cardanoTestnet options conf Nothing Nothing Nothing

poolNode1 <- H.headM poolNodes

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -66,7 +66,7 @@ hprop_kes_period_info = H.integrationRetryWorkspace 2 "kes-period-info" $ \tempA
, cardanoNodeEra = AnyCardanoEra era -- TODO: We should only support the latest era and the upcoming era
}

runTime@TestnetRuntime { testnetMagic, wallets } <- cardanoTestnet cTestnetOptions conf
runTime@TestnetRuntime { testnetMagic, wallets } <- cardanoTestnet cTestnetOptions conf Nothing Nothing Nothing
execConfig <- H.headM (poolSprockets runTime) >>= H.mkExecConfig tempBaseAbsPath

-- First we note all the relevant files
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -54,7 +54,7 @@ hprop_querySlotNumber = H.integrationRetryWorkspace 2 "query-slot-number" $ \tem
tr@TestnetRuntime
{ testnetMagic
, poolNodes
} <- cardanoTestnet options conf
} <- cardanoTestnet options conf Nothing Nothing Nothing
ShelleyGenesis{sgSlotLength, sgEpochLength} <- H.noteShowM $ shelleyGenesis tr
startTime <- H.noteShowM $ getStartTime tempAbsBasePath' tr

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -51,7 +51,7 @@ prop_foldBlocks = H.integrationRetryWorkspace 2 "foldblocks" $ \tempAbsBasePath'
, cardanoNodeEra = AnyCardanoEra era -- TODO: We should only support the latest era and the upcoming era
}

runtime <- cardanoTestnet options conf
runtime <- cardanoTestnet options conf Nothing Nothing Nothing

-- Get socketPath
socketPathAbs <- do
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -68,7 +68,7 @@ hprop_ledger_events_propose_new_constitution = H.integrationWorkspace "propose-n
, poolNodes
, wallets
}
<- cardanoTestnet fastTestnetOptions conf
<- cardanoTestnet fastTestnetOptions conf Nothing Nothing Nothing

poolNode1 <- H.headM poolNodes

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -53,7 +53,7 @@ hprop_ledger_events_sanity_check = H.integrationWorkspace "ledger-events-sanity-
}

!testnetRuntime
<- cardanoTestnet fastTestnetOptions conf
<- cardanoTestnet fastTestnetOptions conf Nothing Nothing Nothing
NodeRuntime{nodeSprocket} <- H.headM $ poolRuntime <$> poolNodes testnetRuntime
let socketName' = IO.sprocketName nodeSprocket
socketBase = IO.sprocketBase nodeSprocket -- /tmp
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -77,7 +77,7 @@ hprop_transaction = H.integrationRetryWorkspace 0 "submit-api-babbage-transactio
, testnetMagic
, poolNodes
, wallets
} <- cardanoTestnet options conf
} <- cardanoTestnet options conf Nothing Nothing Nothing

poolNode1 <- H.headM poolNodes

Expand Down

0 comments on commit 473f455

Please sign in to comment.