aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorChantal Keller <Chantal.Keller@lri.fr>2021-10-14 17:22:22 +0200
committerChantal Keller <Chantal.Keller@lri.fr>2021-10-14 17:22:22 +0200
commite332a084fbe56d364df70fd6ec403fdb61f7d624 (patch)
treeaeb009f6e9fc5715f155af9b684aa5abc6d1fe25 /src
parente6de8a2ed219f11193174220047cefb66b18bdd1 (diff)
parent189b6a17e6dbf2f7f6a396fc81cd384952211091 (diff)
downloadsmtcoq-e332a084fbe56d364df70fd6ec403fdb61f7d624.tar.gz
smtcoq-e332a084fbe56d364df70fd6ec403fdb61f7d624.zip
Merge remote-tracking branch 'origin/master' into coq-8.10
Diffstat (limited to 'src')
-rw-r--r--src/trace/smtAtom.ml2
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)