summaryrefslogtreecommitdiff
path: root/Test/stratifiedinline/bar11.bpl
blob: b25d84515a959dfc38e4dce740cfec3617754269 (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
27
28
29
30
31
32
33
// RUN: %boogie -stratifiedInline:1 -vc:i "%s" > "%t"
// RUN: %diff "%s.expect" "%t"
var x: int;
var y: int;
procedure boogie_si_record_int(x:int);

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

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

procedure {:entrypoint} main()
modifies x, y;
{
  assume x == 0;
  assume x == y;
  call foo();
  assume x == y;
}