bugfix in CC

This commit is contained in:
Simon Cruanes 2022-08-12 23:07:32 -04:00
parent 0e5bde0f40
commit 7bbe70b060
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4

View file

@ -495,6 +495,7 @@ module Make (A : ARG) :
Vec.clear cc.combine;
Event.emit cc.on_conflict { cc; th; c = e };
Stat.incr cc.count_conflict;
Vec.clear cc.res_acts;
raise (E_confl (Conflict (e, p)))
let[@inline] all_classes self : repr Iter.t =