scc

A fork of https://git.simple-cc.org/scc/ for Qute

git clone https://git.8pit.net/scc.git

 1int
 2main(int argc, char *argv[])
 3{
 4        int v[1];
 5        int (*p)[];
 6        int (*f1)(int ,char *[]);
 7        int (*f2)(int ,char *[]);
 8
 9        v[0] = 0;
10        p = &v;
11        f1 = &main;
12        f2 = main;
13        if (argc == 0)
14                return 0;
15        if ((****main)(0, 0))
16                return 2;
17        if ((****f1)(0, 0))
18                return 3;
19        if ((****f2)(0, 0))
20                return 4;
21        if (!(*p)[0])
22                return 0;
23        return 1;
24}