We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent e2d1fcf commit a7d33fcCopy full SHA for a7d33fc
mechanization/spec/Semantics.v
@@ -512,15 +512,15 @@ Module Semantics. Section main.
512
(*>> 9. If greedy is false, then <<*)
513
if greedy is false then
514
(*>> a. Let z be c(x). <<*)
515
- let! z =<< c x in
+ let z := c x in
516
(*>> b. If z is not failure, return z. <<*)
517
if z != failure
518
then z else
519
(*>> c. Return m(xr, d). <<*)
520
m xr d
521
else
522
(*>> 10. Let z be m(xr, d). <<*)
523
- let! z =<< m xr d in
+ let z := m xr d in
524
(*>> 11. If z is not failure, return z. <<*)
525
526
0 commit comments