File: t7.c

package info (click to toggle)
smlnj 110.79-8
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, sid
  • size: 82,564 kB
  • sloc: ansic: 32,532; asm: 6,314; sh: 2,296; makefile: 1,821; perl: 1,170; pascal: 295; yacc: 190; cs: 78; python: 77; lisp: 19
file content (44 lines) | stat: -rw-r--r-- 503 bytes parent folder | download | duplicates (4)
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
int (**x[4]) (int,int,int);

int (*(*y)[10]) (int,int,int);

extern int (nar) (int x,int y,int z);

int nar (int x,int y,int z) {
  return 3;
}

typedef int bar;

static int g;

static int narn (int x,int y,int z) {
  return (x+y+z);
}

void main ()
{ int (**x1) (int,int,int);
  int (*x2) (int,int,int);

  int (**y1) (int,int,int);
  int (*y2) (int,int,int);

  int i,j;

  *x[1] = &nar;
  x1 = x[1];
  x2 = *x1;

  
  y1 = *y;
  y2 = y1[0];


  i = (*x2) (4,5,6);
  j = (*y2)(4,5,6);
  return;
}