Adding failing regression for ite type computation.

diff --git a/test/regress/regress0/Makefile.am b/test/regress/regress0/Makefile.am
index 881664e83c12405d0f6eeb135f70935f1481bfa5..db9b4d07f2bac7cc183aff7db07dbe16893117b1 100644 (file)
--- a/test/regress/regress0/Makefile.am
+++ b/test/regress/regress0/Makefile.am
@@ -97,7 +97,8 @@ BUG_TESTS = \
        bug239.smt \
        buggy-ite.smt2 \
        bug303.smt2 \
-       bug310.cvc
+       bug310.cvc \
+       bug339.smt2
 
 TESTS =        $(SMT_TESTS) $(SMT2_TESTS) $(CVC_TESTS) $(BUG_TESTS)
 

diff --git a/test/regress/regress0/bug339.smt2 b/test/regress/regress0/bug339.smt2
new file mode 100644 (file)
index 0000000..bb03cf9
--- /dev/null
+++ b/test/regress/regress0/bug339.smt2
@@ -0,0 +1,15 @@
+(set-logic QF_LRA)
+(set-info :status sat)
+
+(declare-fun x () Real)
+(declare-fun P () Bool)
+
+(assert
+ (let ((y (ite P 1 x)))
+   (and (not (= y 1))
+        (> y 0)
+        (<= y 1))))
+
+(check-sat)
+
+(exit)