Skip to content

Commit 985fcbc

Browse files
committed
Correct comments
1 parent 10f6b18 commit 985fcbc

File tree

2 files changed

+3
-3
lines changed

2 files changed

+3
-3
lines changed

booster/library/Booster/JsonRpc.hs

+1-1
Original file line numberDiff line numberDiff line change
@@ -166,7 +166,7 @@ respond stateVar request =
166166

167167
case evaluatedInitialPattern of
168168
(Left ApplyEquations.SideConditionFalse{}, _) -> do
169-
-- input pattern's constrains are Bottom, return Bottom
169+
-- input pattern's constraints are Bottom, return Vacuous
170170
stop <- liftIO $ getTime Monotonic
171171
pure $
172172
execResponse

booster/library/Booster/Pattern/ApplyEquations.hs

+2-2
Original file line numberDiff line numberDiff line change
@@ -479,15 +479,15 @@ evaluatePattern' pat@Pattern{term, ceilConditions} = withPatternContext pat $ do
479479
throw . SideConditionFalse . collapseAndBools $ pat.constraints
480480
Left SMT.SMTSolverUnknown{} -> do
481481
-- unlikely case of an Unknown response to a consistency check.
482-
-- What to do here? continue for now to preserver the old behaviour.
482+
-- continue to preserver the old behaviour.
483483
withContext CtxConstraint . logWarn . Text.pack $
484484
"Constraints consistency UNKNOWN: " <> show consistent
485485
continue
486486
Left other ->
487487
-- fail hard on SMT error other than @SMT.SMTSolverUnknown@
488488
liftIO $ Exception.throw other
489489
Right True -> do
490-
-- constrains are consistent, continue
490+
-- constraints are consistent, continue
491491
continue
492492
where
493493
continue = do

0 commit comments

Comments
 (0)