Retro68/gcc/newlib/libc/machine/w65/cmpsi.c
Wolfgang Thaller d464252791 re-add newlib
2017-04-11 23:13:36 +02:00

29 lines
370 B
C

union u {
struct {
short int msw;
unsigned short lsw;
} w;
long l;
};
int
__cmpsi2(long arga,
short int msw_b, unsigned short int lsw_b)
{
union u u;
u.l = arga;
if (u.w.msw != msw_b)
{
if (u.w.msw < msw_b) return 0;
return 2;
}
if (u.w.lsw != lsw_b)
{
if (u.w.lsw < lsw_b) return 0;
return 2;
}
return 1;
}