mescc: Tinycc support: pointer arithmetic with variable.
[mes.git] / scaffold / tests / 76-pointer-arithmetic.c
1 /* -*-comment-start: "//";comment-end:""-*-
2  * Mes --- Maxwell Equations of Software
3  * Copyright © 2017 Jan Nieuwenhuizen <janneke@gnu.org>
4  *
5  * This file is part of Mes.
6  *
7  * Mes is free software; you can redistribute it and/or modify it
8  * under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 3 of the License, or (at
10  * your option) any later version.
11  *
12  * Mes is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with Mes.  If not, see <http://www.gnu.org/licenses/>.
19  */
20
21 #include "30-test.i"
22 #include <stdio.h>
23
24 char *list[2] = {"foo\n", "bar\n"};
25
26 struct foo {
27   int a;
28   int b;
29   int c;
30 };
31
32 int
33 test ()
34 {
35   char *pc = 0;
36   void *pv = 0;
37   int *pi = 0;
38   char **ppc = 0;
39   void **ppv = 0;
40   int **ppi = 0;
41
42   if (++pc != 1) return 1;
43   if (++pv != 1) return 2;
44   if (++pi != 4) return 3;
45   if (++ppc != 4) return 4;
46   if (++ppv != 4) return 5;
47   if (++ppi != 4) return 6;
48   if (pc + 1 != 2) return 7;
49   if (pv + 1 != 2) return 8;
50   if (pi + 1 != 8) return 9;
51   if (ppc + 1 != 8) return 10;
52   if (ppv + 1 != 8) return 11;
53   if (ppi + 1 != 8) return 12;
54
55   char **p = list;
56   ++*p;
57   eputs (*p);
58   if (strcmp (*p, "oo\n")) return 13;
59   --*p;
60   eputs (*p);
61   if (strcmp (*p, "foo\n")) return 14;
62
63   struct foo* pfoo = 0;
64   eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
65   pfoo++;
66   eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
67   if (pfoo != 12) return 15;
68
69   pfoo--;
70   eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
71   if (pfoo) return 16;
72
73   pfoo++;
74   eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
75   if (pfoo != 12) return 17;
76
77   int one = 1;
78   pfoo = pfoo - one;
79   eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
80   if (pfoo) return 18;
81
82   pfoo = pfoo + one;
83   eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
84   if (pfoo != 12) return 19;
85
86   pfoo -= one;
87   eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
88   if (pfoo) return 20;
89
90   pfoo += one;
91   eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
92   if (pfoo != 12) return 21;
93
94   return 0;
95 }