File: test44.ci

package info (click to toggle)
clif 0.90.2-3
  • links: PTS
  • area: main
  • in suites: slink
  • size: 4,336 kB
  • ctags: 2,815
  • sloc: ansic: 29,914; yacc: 4,338; lex: 644; makefile: 373; sh: 48
file content (27 lines) | stat: -rw-r--r-- 388 bytes parent folder | download | duplicates (7)
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
int a;
int
b (int a)
{
  int b;
  
  b = 2 * a;
  {
    double a;

    printf ("input double a\n");
    scanf ("%lf", a);
    printf ("double a = %g\n", a);
    a = a + b;
    printf ("double a = %g\n", a);
  }
  printf ("function a = %d\n", a);
  printf ("function b = %d\n", b);
  return b;
}

printf ("input int a\n");
scanf ("%d", a);

a = b (a);
printf ("global a = %d\n", a);
exit;