Skip to content

Commit 0049cee

Browse files
Revert "Merge branch 'gergely/vasil' of https://github.com/mlabs-haskell/plutip into gergely/vasil"
This reverts commit fd6a3a1, reversing changes made to a6c487f.
1 parent fd6a3a1 commit 0049cee

File tree

3 files changed

+7
-11
lines changed

3 files changed

+7
-11
lines changed

flake.lock

Lines changed: 4 additions & 4 deletions
Some generated files are not rendered by default. Learn more about customizing how changed files appear on GitHub.

flake.nix

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -11,7 +11,7 @@
1111
flake = false;
1212
};
1313
bot-plutus-interface.url =
14-
"github:mlabs-haskell/bot-plutus-interface?rev=d62bb6ee68c2be7fa5bc1afb9f6d6902c7bd400b";
14+
"github:mlabs-haskell/bot-plutus-interface?rev=6cc0d239a53d4cb90d83c5e13cf07fbbd9f97f3b";
1515
};
1616

1717
outputs =

src/Test/Plutip/Internal/LocalCluster.hs

Lines changed: 2 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -257,7 +257,7 @@ waitForRelayNode trCluster rn =
257257
tip <- getTip
258258
case tip of
259259
(ChainTip (SlotNo _) _ _) -> pure ()
260-
a -> throwString $ "Timeout waiting for node to start. Last 'tip' response:\n" <> show a
260+
_ -> throwString "Timeout waiting for node to start"
261261
pure ()
262262

263263
-- | Launch the chain index in a separate thread.
@@ -285,15 +285,11 @@ launchChainIndex conf (RunningNode sp _block0 (netParams, _vData) _) dir = do
285285

286286
waitForChainIndex port = do
287287
let policy = constantDelay 500000 <> limitRetries 50
288-
let policy = constantDelay 1_000_000 <> limitRetries 60
289288
recoverAll policy $ \_ -> do
290289
tip <- queryTipWithChIndex port
291290
case tip of
292291
Right (Tip (Slot _) _ _) -> pure ()
293-
a ->
294-
throwString $
295-
"Timeout waiting for chain-index to start indexing. Last response:\n"
296-
<> show a
292+
_ -> throwString "Timeout waiting for chain-index to start"
297293

298294
queryTipWithChIndex port = do
299295
manager' <- newManager defaultManagerSettings

0 commit comments

Comments
 (0)