blob: 18eaef33669f30efd2039a0627d9c585f88839c0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
// RUN: %boogie "-proverLog:%T/expand2.sx" "%s" > "%t"
// RUN: %diff "%s.expect" "%t"
// RUN: %OutputCheck "--file-to-check=%T/expand2.sx" "%s"
function {:inline true} xxgz(x:int) returns(bool)
{ x > 0 }
function {:inline true} xxf1(x:int,y:bool) returns(int)
{ x + 1 }
axiom (forall z:int :: z>12 ==> xxgz(z));
axiom (forall y:int, x:bool :: xxf1(y, x) > 1 ==> y > 0);
procedure foo()
{
// CHECK-NOT-L: xxgz
assert xxgz(12);
// CHECK-NOT-L: xxf1
assert xxf1(3,true) == 4;
}
|
