Vc: remove an overzealous assertion

4eaa93c2 · Andrei Paskevich · 10e4b2f1 · 4eaa93c2
Commit 4eaa93c2 authored Jan 06, 2017 by Andrei Paskevich
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 2 deletions

src/mlw/vc.ml src/mlw/vc.ml +1 -2

No files found.
--- a/src/mlw/vc.ml
+++ b/src/mlw/vc.ml
@@ -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