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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [g++.dg/] [opt/] [reload2.C] - Blame information for rev 801

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

Line No. Rev Author Line
1 693 jeremybenn 
// PR 10352
2 
// { dg-do compile }
3 
// { dg-options -O2 }
4 
 
5 
extern double fabs(double x);
6 
 
7 
typedef struct { float x, y; } S;
8 
typedef struct _T T;
9 
 
10 
extern void fT( T *p );
11 
extern T *h();
12 
extern S g( );
13 
 
14 
static
15 
int f(void)
16 
{
17 
    T *t=0;
18 
    int c=0;
19 
    S s;
20 
 
21 
    const S exp_s = {0.,0.};
22 
 
23 
    if(!(t = h()))
24 
    {
25 
        c++;
26 
    }
27 
 
28 
    if(!c)
29 
    {
30 
        s = g();
31 
        if( (fabs( (s.x) - (exp_s.x) ) > 1 )
32 
            || (fabs( (s.y) - (exp_s.y) ) > 1 ) )
33 
        {
34 
            c++;
35 
        }
36 
    }
37 
 
38 
    if(t)
39 
        fT(t);
40 
 
41 
    return c;
42 
}

powered by: WebSVN 2.1.0

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