summaryrefslogtreecommitdiff
path: root/Test/stratifiedinline/bar1.bpl
blob: 845954d5d4e393b8b1b13c9d6285dfa9e065b3c1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
var x: int;
var y: int;

procedure {:inline 1} bar()
modifies y;
{
  y := y + 1;
}

procedure {:inline 1} foo() 
modifies x, y;
{
  x := x + 1;
  call bar();
  call bar();
  x := x + 1;
}

procedure main()
requires x == y;
ensures x != y;
modifies x, y;
{
  call foo();
}