File: sep.i

package info (click to toggle)
frama-c 20161101%2Bsilicon%2Bdfsg-5
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 42,324 kB
  • ctags: 35,695
  • sloc: ml: 200,142; ansic: 31,465; makefile: 2,334; sh: 1,643; lisp: 259; python: 85; asm: 26
file content (46 lines) | stat: -rw-r--r-- 849 bytes parent folder | download
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
/* run.config*
   OPT: -val @VALUECONFIG@ -slevel 10 -lib-entry -main f1 -separate-n 0 -separate-of 3
   OPT: -val @VALUECONFIG@ -slevel 10 -lib-entry -main f1 -separate-n 1 -separate-of 3 
   OPT: -val @VALUECONFIG@ -slevel 10 -lib-entry -main f1 -separate-n 2 -separate-of 3 
   OPT: -val @VALUECONFIG@ -slevel 10 -lib-entry -main f1 -separate-n 3 -separate-of 3 
   OPT: -val @VALUECONFIG@ -slevel 10 -lib-entry -main f1 -val-split-return auto
*/
int index;
int tab[5];

//@ ensures \result==0 || \result==-1 || \result==1 ;
extern int init2(void);

int init1(void)
{
	int res;

	res = init2();

	if (res == 0)
	{
		index=0;
	}
	else
	  {
	    if (res == 1)
	      {
		res = 0;
		index = 0;
	      }
	  }

	return res;
}

//@ requires 0<=n<5;
int f1(int n)
{
	int res;

	res = init1();

	if (res == 0)
		return tab[index+n];
        return -1;
}