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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [struct-ret-1.c] - Rev 328

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

/* { dg-do run { target hppa*-*-* } } */
/* { dg-options { -O2 } { target hppa*-*-* } } */
extern void abort (void);
extern void exit (int);
typedef struct {
        int             x;
        int             y;
}               point_t;
 
int main(int argc, char *argv[]);
int printPoints(point_t a, point_t b);
point_t toPoint(int x1, int y1);
 
int
main(int argc, char *argv[])
{
 
        if (printPoints(toPoint(0, 0), toPoint(1000, 1000)) != 1)
                abort();
        else
                exit(0);
 
        return 0;
}
 
int
printPoints(point_t a, point_t b)
{
        if (a.x != 0
            || a.y != 0
            || b.x != 1000
            || b.y != 1000)
                return 0;
        else
                return 1;
}
 
point_t
toPoint(int x1, int y1)
{
        point_t         p;
 
        p.x = x1;
        p.y = y1;
 
        return p;
}
 

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

powered by: WebSVN 2.1.0

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