mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-09 20:55:39 -05:00
fix(lia): problems with only integer constants are not incomplete
This commit is contained in:
parent
8410a57f1a
commit
44af0afd59
1 changed files with 4 additions and 1 deletions
|
|
@ -42,7 +42,10 @@ module Make(A : ARG) : S with module A = A = struct
|
|||
let st = create ~stat (SI.proof si) (SI.tst si) (SI.ty_st si) in
|
||||
|
||||
SI.on_preprocess si (fun _si _ t ->
|
||||
if A.has_ty_int t then (
|
||||
let is_int_const t = match A.view_as_lia t with
|
||||
| LIA_const _ -> true | _ -> false in
|
||||
if A.has_ty_int t && not (is_int_const t) then (
|
||||
Log.debugf 10 (fun k->k "lia: has ty int %a" T.pp t);
|
||||
SI.declare_pb_is_incomplete si; (* TODO: remove *)
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue