diff options
author | Chantal Keller <Chantal.Keller@lri.fr> | 2021-10-14 17:22:48 +0200 |
---|---|---|
committer | Chantal Keller <Chantal.Keller@lri.fr> | 2021-10-14 17:22:48 +0200 |
commit | f74ac52e9c76260b9c87d3972fcb04e7e7e051ad (patch) | |
tree | e9b67577d3d3d334b8bcf45e68677728f2347fc3 /src | |
parent | 969ebaf3fc404b53ecfe6c53c4e232c2097c219d (diff) | |
parent | e332a084fbe56d364df70fd6ec403fdb61f7d624 (diff) | |
download | smtcoq-f74ac52e9c76260b9c87d3972fcb04e7e7e051ad.tar.gz smtcoq-f74ac52e9c76260b9c87d3972fcb04e7e7e051ad.zip |
Merge remote-tracking branch 'origin/coq-8.10' into coq-8.11
Diffstat (limited to 'src')
-rw-r--r-- | src/trace/smtAtom.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/trace/smtAtom.ml b/src/trace/smtAtom.ml index 3e16f6c..9697882 100644 --- a/src/trace/smtAtom.ml +++ b/src/trace/smtAtom.ml @@ -1351,7 +1351,7 @@ module Atom = let c, _ = CoqInterface.decompose_app ty in CoqInterface.eq_constr c (Lazy.force cCompDec) then - (x::[], xs) + ([x], xs) else ([], l) | _ -> (x::l1, l2) |