Fix real to int for parameterized kinds (#4016)

diff --git a/src/preprocessing/passes/real_to_int.cpp b/src/preprocessing/passes/real_to_int.cpp
index cc98726c6f9d8499c969a1b5e04f2ae343f020ea..f50cecd1bec3b1f5f76827a20a5c2422c3079de3 100644 (file)
--- a/src/preprocessing/passes/real_to_int.cpp
+++ b/src/preprocessing/passes/real_to_int.cpp
@@ -151,6 +151,10 @@ Node RealToInt::realToIntInternal(TNode n, NodeMap& cache, std::vector<Node>& va
         }
         if (childChanged)
         {
+          if (n.getMetaKind() == kind::metakind::PARAMETERIZED)
+          {
+            children.insert(children.begin(), n.getOperator());
+          }
           ret = NodeManager::currentNM()->mkNode(n.getKind(), children);
         }
       }

diff --git a/test/regress/CMakeLists.txt b/test/regress/CMakeLists.txt
index 1ca43b2fe3533b1bffd2d3dbfcc24e40feef60e3..62c9c87b1c19ddf78289e02ce92b083c8c05cfcb 100644 (file)
--- a/test/regress/CMakeLists.txt
+++ b/test/regress/CMakeLists.txt
@@ -579,6 +579,7 @@ set(regress_0_tests
   regress0/nl/issue3719.smt2
   regress0/nl/issue3729-cm-solved-tf.smt2
   regress0/nl/issue3959.smt2
+  regress0/nl/issue4007-rint-uf.smt2
   regress0/nl/magnitude-wrong-1020-m.smt2
   regress0/nl/mult-po.smt2
   regress0/nl/nia-wrong-tl.smt2

diff --git a/test/regress/regress0/nl/issue4007-rint-uf.smt2 b/test/regress/regress0/nl/issue4007-rint-uf.smt2
new file mode 100644 (file)
index 0000000..9d9a752
--- /dev/null
+++ b/test/regress/regress0/nl/issue4007-rint-uf.smt2
@@ -0,0 +1,8 @@
+; COMMAND-LINE: --solve-real-as-int
+; EXPECT: sat
+(set-logic QF_UFNIRA)
+(set-info :status sat)
+(declare-fun f (Real) Int)
+(declare-fun a () Real)
+(assert (= (f a) 0))
+(check-sat)