Commit 4eaa93c2 authored by Andrei Paskevich's avatar Andrei Paskevich

Vc: remove an overzealous assertion

parent 10e4b2f1
......@@ -831,8 +831,7 @@ let reflow vc_wp k =
| Some (q, _) -> Kseq (Kaxiom k, 0, q)
| None -> Kaxiom k end
| Ktag ((WP|SP) as tag, k) ->
assert (Mint.is_empty q);
Ktag (tag, push k q)
Ktag (tag, push k Mint.empty)
| Ktag (Push _, _) ->
assert false (* cannot happen *)
in
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment