diff --git a/src/th-bool-static/Sidekick_th_bool_static.ml b/src/th-bool-static/Sidekick_th_bool_static.ml index a177b2da..63f69a64 100644 --- a/src/th-bool-static/Sidekick_th_bool_static.ml +++ b/src/th-bool-static/Sidekick_th_bool_static.ml @@ -137,6 +137,7 @@ module Make(A : ARG) : S with module A = A = struct Log.debugf 20 (fun k->k "(@[sidekick.bool.proxy@ :t %a@ :for %a@])" T.pp u T.pp for_); + assert (Ty.equal ty (T.ty u)); u let fresh_lit (self:state) ~for_ ~mk_lit ~pre : Lit.t =