summaryrefslogtreecommitdiff
path: root/test/regress/regress1/strings/issue5520-re-consume.smt2
blob: 3fc4fe8e59cfdcb4e25d78b890b541d04ae40bb6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
; COMMAND-LINE: --strings-exp
; EXPECT: sat
(set-logic QF_S)
(set-info :status sat)
(declare-fun x () String)
(assert
 (not
 (str.in_re (str.++ "a" x "ca")
  (re.*
  (re.++ (re.union (str.to_re "a") (str.to_re "b"))
   (re.union (re.* (str.to_re "a")) (str.to_re "b") (str.to_re "c")))))))
(check-sat)
generated by cgit on debian on lair
contact matthew@masot.net with questions or feedback