diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/Expr/Evaluate2.pc | 5 | ||||
| -rw-r--r-- | test/Expr/Parser/Simplify.pc | 5 |
2 files changed, 7 insertions, 3 deletions
diff --git a/test/Expr/Evaluate2.pc b/test/Expr/Evaluate2.pc index 0b50a0bd..d62241f0 100644 --- a/test/Expr/Evaluate2.pc +++ b/test/Expr/Evaluate2.pc @@ -1,6 +1,5 @@ # RUN: %kleaver -evaluate %s > %t.log -# RUN: grep "Query 0: INVALID" %t.log +# RUN: grep "Query 0: VALID" %t.log # XFAIL: * -(query [false] true) - +(query [false] false) diff --git a/test/Expr/Parser/Simplify.pc b/test/Expr/Parser/Simplify.pc index e89d79ff..1a853b16 100644 --- a/test/Expr/Parser/Simplify.pc +++ b/test/Expr/Parser/Simplify.pc @@ -33,3 +33,8 @@ array a[64] : w32 -> w8 = symbolic # RUN: grep \"(Not (Eq 1 (Read w8 1 a))))\" %t2 (query [] false [(Not (Or (Eq 0 (Read w8 0 a)) (Eq 1 (Read w8 1 a))))]) + +# Check -- false == X ==> !X +# RUN: grep -A 2 \"# Query 7\" %t > %t2 +# RUN: grep \"(query .. false .(Not (Extract 1 (Read w8 0 a))).)\" %t2 +(query [] false [(Eq (Extract w1 1 (Read w8 0 a)) false)]) |