From: Morgan Deters <mdeters@cs.nyu.edu>
Date: Fri, 17 May 2013 12:51:36 +0000 (-0400)
Subject: Fixed "success" response to (push N) / (pop N) with N > 1.
X-Git-Tag: cvc5-1.0.0~7287^2~113^2~11
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=5ad796d0ddaa9c6f2ad98d2680babb7776a5f9b0;p=cvc5.git

Fixed "success" response to (push N) / (pop N) with N > 1.

Thanks to David Cok for reporting this issue.
---

diff --git a/src/parser/smt2/Smt2.g b/src/parser/smt2/Smt2.g
index 8dcde2483..76708807f 100644
--- a/src/parser/smt2/Smt2.g
+++ b/src/parser/smt2/Smt2.g
@@ -314,7 +314,9 @@ command returns [CVC4::Command* cmd = NULL]
           CommandSequence* seq = new CommandSequence();
           do {
             PARSER_STATE->pushScope();
-            seq->addCommand(new PushCommand());
+            Command* c = new PushCommand();
+            c->setMuted(n > 1);
+            seq->addCommand(c);
           } while(--n > 0);
           cmd = seq;
         }
@@ -337,7 +339,9 @@ command returns [CVC4::Command* cmd = NULL]
           CommandSequence* seq = new CommandSequence();
           do {
             PARSER_STATE->popScope();
-            seq->addCommand(new PopCommand());
+            Command* c = new PopCommand();
+            c->setMuted(n > 1);
+            seq->addCommand(c);
           } while(--n > 0);
           cmd = seq;
         }