blob: 3e31fdf59343fd78d0e7aed52f747b540d079bae [file] [log] [blame]
#define FALSE 140
#define TRUE 13
feq (x)
long long int x;
{
if (x == 0)
return TRUE;
else
return FALSE;
}
fne (x)
long long int x;
{
if (x != 0)
return TRUE;
else
return FALSE;
}
flt (x)
long long int x;
{
if (x < 0)
return TRUE;
else
return FALSE;
}
fge (x)
long long int x;
{
if (x >= 0)
return TRUE;
else
return FALSE;
}
fgt (x)
long long int x;
{
if (x > 0)
return TRUE;
else
return FALSE;
}
fle (x)
long long int x;
{
if (x <= 0)
return TRUE;
else
return FALSE;
}
main ()
{
if (feq (0LL) != TRUE)
abort ();
if (feq (-1LL) != FALSE)
abort ();
if (feq (0x8000000000000000LL) != FALSE)
abort ();
if (feq (0x8000000000000001LL) != FALSE)
abort ();
if (feq (1LL) != FALSE)
abort ();
if (feq (0x7fffffffffffffffLL) != FALSE)
abort ();
if (fne (0LL) != FALSE)
abort ();
if (fne (-1LL) != TRUE)
abort ();
if (fne (0x8000000000000000LL) != TRUE)
abort ();
if (fne (0x8000000000000001LL) != TRUE)
abort ();
if (fne (1LL) != TRUE)
abort ();
if (fne (0x7fffffffffffffffLL) != TRUE)
abort ();
if (flt (0LL) != FALSE)
abort ();
if (flt (-1LL) != TRUE)
abort ();
if (flt (0x8000000000000000LL) != TRUE)
abort ();
if (flt (0x8000000000000001LL) != TRUE)
abort ();
if (flt (1LL) != FALSE)
abort ();
if (flt (0x7fffffffffffffffLL) != FALSE)
abort ();
if (fge (0LL) != TRUE)
abort ();
if (fge (-1LL) != FALSE)
abort ();
if (fge (0x8000000000000000LL) != FALSE)
abort ();
if (fge (0x8000000000000001LL) != FALSE)
abort ();
if (fge (1LL) != TRUE)
abort ();
if (fge (0x7fffffffffffffffLL) != TRUE)
abort ();
if (fgt (0LL) != FALSE)
abort ();
if (fgt (-1LL) != FALSE)
abort ();
if (fgt (0x8000000000000000LL) != FALSE)
abort ();
if (fgt (0x8000000000000001LL) != FALSE)
abort ();
if (fgt (1LL) != TRUE)
abort ();
if (fgt (0x7fffffffffffffffLL) != TRUE)
abort ();
if (fle (0LL) != TRUE)
abort ();
if (fle (-1LL) != TRUE)
abort ();
if (fle (0x8000000000000000LL) != TRUE)
abort ();
if (fle (0x8000000000000001LL) != TRUE)
abort ();
if (fle (1LL) != FALSE)
abort ();
if (fle (0x7fffffffffffffffLL) != FALSE)
abort ();
exit (0);
}