OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [20020919-1.c] - Blame information for rev 774

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 689 jeremybenn 
/* Copyright (C) 2002  Free Software Foundation.
2 
   by Hans-Peter Nilsson  <hp@axis.com>
3 
 
4 
   Making sure that asm clobbers conflicting with asm-declared input
5 
   operands are detected: ``You may not write a clobber description in a
6 
   way that overlaps with an input or output operand''.
7 
 
8 
   You must be this tall ---> fit two long longs in asm-declared registers
9 
   to enter this amusement.  */
10 
 
11 
/* { dg-do compile { target alpha*-*-* cris-*-* crisv32-*-* i?86-*-* mmix-*-* powerpc*-*-* rs6000-*-* x86_64-*-* } } */
12 
/* { dg-options "-O2" } */
13 
 
14 
/* Constructed examples; input/output (same register), output, input, and
15 
   input and output (different registers).  */
16 
 
17 
/* The long longs are used to test overlap overlap for multi-register
18 
   registers.  REG2 and REG4 must be the second halves (defined as
19 
   higher-numbered parts) of REG1 and REG3 respectively when two registers
20 
   are needed.  */
21 
 
22 
#if defined (__alpha__)
23 
# define REG1 "$1"
24 
# define REG2 "$2"
25 
#elif defined (__CRIS__)
26 
# define REG1 "r10"
27 
# define REG2 "r11"
28 
# define REG3 "r12"
29 
# define REG4 "r13"
30 
# define REG5 "r9"
31 
#elif defined (__i386__)
32 
# define REG1 "%eax"
33 
# define REG2 "%edx"
34 
/* On Darwin -fpic is on by default, so don't use %ebx. */
35 
# define REG3 "%esi"
36 
# define REG4 "%edi"
37 
#elif defined (__MMIX__)
38 
# define REG1 "$8"
39 
# define REG2 "$9"
40 
#elif defined (__powerpc__) || defined (__PPC__) || defined (__ppc__) \
41 
        || defined (__POWERPC__) || defined (PPC) || defined (_IBMR2) \
42 
        || defined (__ppc)
43 
# define REG1 "6"
44 
# define REG2 "7"
45 
# if !defined(__powerpc64__) && !defined(__LP64__)
46 
#  define REG3 "8"
47 
#  define REG4 "9"
48 
# endif
49 
#elif defined (__x86_64__)
50 
# define REG1 "rax"
51 
# define REG2 "rdx"
52 
#endif
53 
 
54 
/* For readability of the tests.  */
55 
#ifdef REG3
56 
# define REG1a REG1
57 
# define REG1b REG2
58 
# define REG2a REG3
59 
# define REG2b REG4
60 
#else
61 
# define REG1a REG1
62 
# define REG1b REG1
63 
# define REG2a REG2
64 
# define REG2b REG2
65 
#endif
66 
 
67 
/* REG5 is just another reg if there is one; the difference to REG4 is to
68 
   keep the original set of registers for CRIS.  */
69 
#ifndef REG5
70 
#define REG5 REG2b
71 
#endif
72 
 
73 
void *
74 
foo (void *p)
75 
{
76 
  register void *q asm (REG1) = p;
77 
  asm ("foo1 %0" : "=r" (q) : "0" (q) : REG1); /* { dg-error "conflict" } */
78 
  return q;
79 
}
80 
 
81 
void *
82 
nfoo (void *p)
83 
{
84 
  register void *q asm (REG1) = p;
85 
  asm ("foo1 %0" : "=r" (q) : "0" (q) : REG2);
86 
  return q;
87 
}
88 
 
89 
long long
90 
foolla (long long llp)
91 
{
92 
  register long long ll asm (REG1a) = llp;
93 
  asm ("foo1a %0" : "=r" (ll) : "0" (ll) : REG1a); /* { dg-error "conflict" } */
94 
  return ll;
95 
}
96 
 
97 
long long
98 
nfoolla (long long llp)
99 
{
100 
  register long long ll asm (REG1a) = llp;
101 
  asm ("foo1a %0" : "=r" (ll) : "0" (ll) : REG2a);
102 
  return ll;
103 
}
104 
 
105 
long long
106 
foollb (long long llp)
107 
{
108 
  register long long ll asm (REG1a) = llp;
109 
  asm ("foo1b %0" : "=r" (ll) : "0" (ll) : REG1b); /* { dg-error "conflict" } */
110 
  return ll;
111 
}
112 
 
113 
void *
114 
bar (void *p)
115 
{
116 
  register void *q asm (REG1);
117 
  register void *w asm (REG2) = p;
118 
  asm ("bar1 %1,%0" : "=r" (q) : "r" (w) : REG1); /* { dg-error "conflict" } */
119 
  return q;
120 
}
121 
 
122 
long long
123 
barlla (long long llp)
124 
{
125 
  register long long ll asm (REG1a);
126 
  register long long mm asm (REG2a) = llp;
127 
  asm ("bar1a %1,%0" : "=r" (ll) : "r" (mm) : REG1b); /* { dg-error "conflict" } */
128 
  return ll;
129 
}
130 
 
131 
long long
132 
barllb (long long llp)
133 
{
134 
  register long long ll asm (REG1a);
135 
  register long long mm asm (REG2a) = llp;
136 
  asm ("bar1b %1,%0" : "=r" (ll) : "r" (mm) : REG2b); /* { dg-error "conflict" } */
137 
  return ll;
138 
}
139 
 
140 
void *
141 
foobar (void *p)
142 
{
143 
  register void *q asm (REG1);
144 
  register void *w asm (REG2) = p;
145 
  asm ("foobar1 %1,%0" : "=r" (q) : "r" (w) : REG2); /* { dg-error "conflict" } */
146 
  return q;
147 
}
148 
 
149 
void *
150 
nfoobar (void *p)
151 
{
152 
  register void *q asm (REG1);
153 
  register void *w = p;
154 
  asm ("foobar1 %1,%0" : "=r" (q) : "r" (w) : REG2);
155 
  return q;
156 
}
157 
 
158 
long long
159 
foobarlla (long long llp)
160 
{
161 
  register long long ll asm (REG1a);
162 
  register long long mm asm (REG2a) = llp;
163 
  asm ("foobar1a %1,%0" : "=r" (ll) : "r" (mm) : REG1b); /* { dg-error "conflict" } */
164 
  return ll;
165 
}
166 
 
167 
long long
168 
nfoobarlla (long long llp)
169 
{
170 
  register long long ll asm (REG1a);
171 
  register long long mm = llp;
172 
  asm ("foobar1a %1,%0" : "=r" (ll) : "r" (mm) : REG2a);
173 
  return ll;
174 
}
175 
 
176 
long long
177 
foobarllb (long long llp)
178 
{
179 
  register long long ll asm (REG1a);
180 
  register long long mm asm (REG2a) = llp;
181 
  asm ("foobar1b %1,%0" : "=r" (ll) : "r" (mm) : REG2b); /* { dg-error "conflict" } */
182 
  return ll;
183 
}
184 
 
185 
long long
186 
nfoobarllb (long long llp)
187 
{
188 
  register long long ll asm (REG1a);
189 
  register long long mm = llp;
190 
  asm ("foobar1b %1,%0" : "=r" (ll) : "r" (mm) : REG2b);
191 
  return ll;
192 
}
193 
 
194 
void *
195 
baz (void *p)
196 
{
197 
  register void *q asm (REG1);
198 
  register void *w asm (REG2) = p;
199 
  asm ("baz1 %1,%0" : "=r" (q) : "r" (w) : REG1, REG2); /* { dg-error "conflict" } */
200 
  return q;
201 
}
202 
 
203 
void *
204 
nbaz (void *p)
205 
{
206 
  register void *q;
207 
  register void *w = p;
208 
  asm ("baz1 %1,%0" : "=r" (q) : "r" (w) : REG1, REG2);
209 
  return q;
210 
}
211 
 
212 
void *
213 
nbaz2 (void *p)
214 
{
215 
  register void *q asm (REG1);
216 
  register void *w asm (REG2) = p;
217 
  asm ("baz1 %1,%0" : "=r" (q) : "r" (w));
218 
  return q;
219 
}
220 
 
221 
long long
222 
bazlla (long long llp)
223 
{
224 
  register long long ll asm (REG1a);
225 
  register long long mm asm (REG2a) = llp;
226 
  asm ("baz1a %1,%0" : "=r" (ll) : "r" (mm) : REG1a, REG2a); /* { dg-error "conflict" } */
227 
  return ll;
228 
}
229 
 
230 
long long
231 
bazllb (long long llp)
232 
{
233 
  register long long ll asm (REG1a);
234 
  register long long mm asm (REG2a) = llp;
235 
  asm ("baz2a %1,%0" : "=r" (ll) : "r" (mm) : REG1b, REG2b); /* { dg-error "conflict" } */
236 
  return ll;
237 
}
238 
 
239 
/* Real-world example of bug.  */
240 
 
241 
#ifdef _WIN64
242 
typedef unsigned int loc_size_t __attribute__ ((mode (DI)));
243 
#else
244 
typedef __SIZE_TYPE__ loc_size_t;
245 
#endif
246 
 
247 
struct stat;
248 
int
249 
_dl_stat (const char *file_name, struct stat *buf)
250 
{
251 
  register long a asm (REG1) = (long) (loc_size_t) file_name;
252 
  register long b asm (REG2) = (long) (loc_size_t) buf;
253 
 
254 
  asm volatile ("movu.w %1,$r9\n\tbreak 13" : "=r" (a) : "g" (106), "0" (a), "r" (b) : REG1, REG5); /* { dg-error "conflict" } */
255 
  if (a >= 0)
256 
    return (int) a;
257 
  return (int) -1;
258 
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.