diff options
Diffstat (limited to 'test/regress')
-rw-r--r-- | test/regress/regress0/strings/Makefile.am | 3 | ||||
-rw-r--r-- | test/regress/regress0/strings/repl-empty-sem.smt2 | 11 |
2 files changed, 13 insertions, 1 deletions
diff --git a/test/regress/regress0/strings/Makefile.am b/test/regress/regress0/strings/Makefile.am index f4dc8ebf7..41c500170 100644 --- a/test/regress/regress0/strings/Makefile.am +++ b/test/regress/regress0/strings/Makefile.am @@ -86,7 +86,8 @@ TESTS = \ cmu-inc-nlpp-071516.smt2 \ strings-index-empty.smt2 \ bug768.smt2 \ - username_checker_min.smt2 + username_checker_min.smt2 \ + repl-empty-sem.smt2 FAILING_TESTS = diff --git a/test/regress/regress0/strings/repl-empty-sem.smt2 b/test/regress/regress0/strings/repl-empty-sem.smt2 new file mode 100644 index 000000000..61f70bc23 --- /dev/null +++ b/test/regress/regress0/strings/repl-empty-sem.smt2 @@ -0,0 +1,11 @@ +; COMMAND-LINE: --strings-exp +; EXPECT: unsat +(set-logic ALL) +(set-info :status unsat) +(declare-fun x () String) +(declare-fun z () String) +(assert (= (str.len z) 0)) +(assert (= (str.replace "ab" z "c") x)) +(declare-fun y () String) +(assert (= x (str.++ "c" y))) +(check-sat) |