1/* Compiler Test Generator Program.
2   Copyright (C) 1989 FSF.  */
3
4
5#define E0 ((type *)10000000)
6#define reg0 r0
7#define indreg0 (*p0)
8#define imm0 22
9#define limm0 ((type)(int)&glob0)
10#define adr0 (*E0)
11#define adrreg0 (p0[10000000])
12#define adrx0 (E0[x0])
13#define regx0 (p0[x0])
14
15#define E1 ((type *)11111111)
16#define reg1 r1
17#define indreg1 (*p1)
18#define imm1 33
19#define limm1 ((type)(int)&glob1)
20#define adr1 (*E1)
21#define adrreg1 (p1[1111111/4])
22#define adrx1 (E1[x1])
23#define regx1 (p1[x1])
24
25int glob0, glob1;
26
27#define type double
28
29char *a0[] = {"reg0", "indreg0", "imm0", "limm0",
30		"adr0", "adrreg0", "adrx0", "regx0"};
31char *a1[] = {"reg1", "indreg1", "imm1", "limm1",
32		"adr1", "adrreg1", "adrx1", "regx1"};
33
34main_compare ()
35{
36  int i0, i1;
37
38  for (i0 = 0;  i0 < 8;  i0++)
39    {
40      for (i1 = 0;  i1 < 8;  i1++)
41	{
42	  printf ("%s%s_cmp (r0, r1, x0, x1, p0, p1)\n", a0[i0], a1[i1]);
43	  printf ("type r0, r1;  type *p0, *p1;\n");
44	  printf ("{if (%s <= %s) return 1; else return 0;}\n\n",
45		  a0[i0], a1[i1], a0[i0]);
46	}
47    }
48}
49
50main_assign ()
51{
52  int i0, i1;
53
54  for (i0 = 0;  i0 < 8;  i0++)
55    {
56      if (i0 < 2 || i0 > 3)
57      for (i1 = 0;  i1 < 8;  i1++)
58	{
59	  printf ("%s%s_set (r0, r1, x0, x1, p0, p1)\n", a0[i0], a1[i1]);
60	  printf ("type r0, r1;  type *p0, *p1;\n");
61	  printf ("{%s = %s;  }\n\n",
62		  a0[i0], a1[i1]);
63	}
64    }
65}
66
67main () {main_assign ();}
68