diff options
author | Chantal Keller <Chantal.Keller@lri.fr> | 2022-02-15 18:36:56 +0100 |
---|---|---|
committer | Chantal Keller <Chantal.Keller@lri.fr> | 2022-02-15 18:36:56 +0100 |
commit | 4a2db61b8f59a2871de4f4b69522193ff9440261 (patch) | |
tree | aed51f7e320c57e665748dbae973929725f3cee7 /src/trace/smtAtom.ml | |
parent | 3e5897710dc45c1b0bede79d3d61f4211c5ccb0e (diff) | |
parent | 23ac3ceceb92cdbc2026253c1bae388a2b9b6e18 (diff) | |
download | smtcoq-4a2db61b8f59a2871de4f4b69522193ff9440261.tar.gz smtcoq-4a2db61b8f59a2871de4f4b69522193ff9440261.zip |
Merge remote-tracking branch 'origin/coq-8.12' into coq-8.13
Diffstat (limited to 'src/trace/smtAtom.ml')
-rw-r--r-- | src/trace/smtAtom.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/trace/smtAtom.ml b/src/trace/smtAtom.ml index 9697882..6447ae7 100644 --- a/src/trace/smtAtom.ml +++ b/src/trace/smtAtom.ml @@ -385,7 +385,7 @@ module Op = let index, hval = destruct "destruct on a Rel: called by set in interp_tbl" op in t.(index) <- mk_Tval hval.tparams hval.tres hval.op_val in Hashtbl.iter set reify.tbl; - CoqInterface.mkArray (tval, t) + CoqTerms.mkArray (tval, t) let to_list reify = let set _ op acc = @@ -1435,7 +1435,7 @@ module Atom = let interp_tbl reify = let t = to_array reify (Lazy.force dft_atom) a_to_coq in - CoqInterface.mkArray (Lazy.force catom, t) + CoqTerms.mkArray (Lazy.force catom, t) (** Producing a Coq term corresponding to the interpretation of an atom *) |