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

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gcc.dg/] [compat/] [struct-by-value-17a_x.c] - Blame information for rev 338

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 298 jeremybenn
#include "compat-common.h"
2
 
3
#include "fp-struct-defs.h"
4
#include "fp-struct-check.h"
5
#include "fp-struct-test-by-value-x.h"
6
 
7
#ifndef SKIP_COMPLEX
8
DEFS(cd, _Complex double)
9
CHECKS(cd, _Complex double)
10
 
11
TEST(Scd13, _Complex double)
12
TEST(Scd14, _Complex double)
13
TEST(Scd15, _Complex double)
14
TEST(Scd16, _Complex double)
15
#endif
16
 
17
#undef T
18
 
19
void
20
struct_by_value_17a_x ()
21
{
22
DEBUG_INIT
23
 
24
#define T(TYPE, MTYPE) testit##TYPE ();
25
 
26
#ifndef SKIP_COMPLEX
27
T(Scd13, _Complex double)
28
T(Scd14, _Complex double)
29
T(Scd15, _Complex double)
30
T(Scd16, _Complex double)
31
#endif
32
 
33
DEBUG_FINI
34
 
35
if (fails != 0)
36
  abort ();
37
 
38
#undef T
39
}

powered by: WebSVN 2.1.0

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