We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent c391d6b commit 28f515bCopy full SHA for 28f515b
kore/src/Kore/Rewrite/SMT/Evaluator.hs
@@ -224,7 +224,7 @@ retryWithScaledTimeout q = do
224
retryOnceWithScaledTimeout :: MonadSMT m => m a -> Integer -> m a
225
retryOnceWithScaledTimeout action scale =
226
-- reinit with scaled timeout to override the original timeout
227
- SMT.localTimeOut (scaleTimeOut scale) $ SMT.reinit >> action
+ SMT.reinit >> SMT.localTimeOut (scaleTimeOut scale) action
228
229
scaleTimeOut :: Integer -> SMT.TimeOut -> SMT.TimeOut
230
scaleTimeOut _ (SMT.TimeOut Unlimited) = SMT.TimeOut Unlimited
0 commit comments