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.0rc3/] [gcc/] [testsuite/] [gcc.dg/] [compat/] [struct-by-value-18a_x.c] - Blame information for rev 516

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(cld, _Complex long double)
9
CHECKS(cld, _Complex long double)
10
 
11
TEST(Scld13, _Complex long double)
12
TEST(Scld14, _Complex long double)
13
TEST(Scld15, _Complex long double)
14
TEST(Scld16, _Complex long double)
15
#endif
16
 
17
#undef T
18
 
19
void
20
struct_by_value_18a_x ()
21
{
22
DEBUG_INIT
23
 
24
#define T(TYPE, MTYPE) testit##TYPE ();
25
 
26
#ifndef SKIP_COMPLEX
27
T(Scld13, _Complex long double)
28
T(Scld14, _Complex long double)
29
T(Scld15, _Complex long double)
30
T(Scld16, _Complex long 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.