summaryrefslogtreecommitdiff
path: root/Test/doomed/doomed.bpl
blob: 77eec2495c237ba0359e5a63f36c44685c9e8fd8 (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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69

procedure evilrequires(x:int)
  requires x>0;
{
  var y : int;

  if(x<0) {
    y := 1;
  } else {
    y := 2;
  }
}


procedure evilbranch(x:int)
{
  var y : int;

  if(x<0) {
    y := 1;
  } else {
    y := 2;
  }
  assert y!=2;
}


procedure evilloop(x:int)
{
  var y : int;
  y:=x;
  while (y<100) {
     y := y -1;
  }
}

procedure evilpath(x:int)
{
  var y : int;
  y:=0;
  if (x>10) {
    y:=3;
  } else {
    assert y!=0;
  }
}

procedure evilcondition(x:int)
{
  var y : int;
  y:=0;
  if (x!=0) {
    y:=3;
  } else {
    assert x!=0;
  }
}

procedure evilensures(x:int) returns  ($result: int)
  ensures $result>0;
{
  var y : int;

  if(x<0) {
    y := 1;
  } else {
    $result:=-1;
  }
}