scc

simple C compiler
git clone git://git.2f30.org/scc
Log | Files | Refs | README | LICENSE

0130-mulpars.c (216B)

      1 int
      2 f2(int c, int b)
      3 {
      4 	return c - b;
      5 }
      6 
      7 int (*
      8 f1(int a, int b))(int c, int b)
      9 {
     10 	if (a != b)
     11 		return f2;
     12 	return 0;
     13 }
     14 
     15 int
     16 main()
     17 {
     18 	int (* (*p)(int a, int b))(int c, int d) = f1;
     19 
     20 
     21 	return (*(*p)(0, 2))(2, 2);
     22 }