mirror of
https://github.com/cc65/cc65.git
synced 2024-10-19 16:24:46 +00:00
90 lines
2.0 KiB
C
90 lines
2.0 KiB
C
|
|
||
|
// test comparison operations
|
||
|
|
||
|
#include <stdlib.h>
|
||
|
#include <stdio.h>
|
||
|
#include <stdint.h>
|
||
|
|
||
|
#include <_float.h>
|
||
|
|
||
|
#ifdef CONIO
|
||
|
#include <conio.h>
|
||
|
#define WAIT() cgetc()
|
||
|
#else
|
||
|
#define WAIT()
|
||
|
#endif
|
||
|
|
||
|
float fp1, fp2, fp3, fp4;
|
||
|
|
||
|
char buf[0x30];
|
||
|
char buf2[0x30];
|
||
|
char buf3[0x30];
|
||
|
|
||
|
signed char var_schar;
|
||
|
unsigned char var_uchar;
|
||
|
signed int var_sint;
|
||
|
unsigned int var_uint;
|
||
|
signed long var_slong;
|
||
|
unsigned long var_ulong;
|
||
|
|
||
|
int result = 0;
|
||
|
|
||
|
#define expect(msg, exp, val, fval, ival) \
|
||
|
printf("%s %d:%d:%s%s (is:%d want:%d fval:%s ival:%d)\n", \
|
||
|
msg, val, exp, \
|
||
|
val ? "true" : "false", \
|
||
|
(exp != val) ? " (failed)" : "", \
|
||
|
val, exp, _ftostr(buf, fval), ival \
|
||
|
); \
|
||
|
if (exp != val) { \
|
||
|
result++; \
|
||
|
}
|
||
|
|
||
|
//-------------------------------------------------------------------------
|
||
|
|
||
|
int i1 = 10;
|
||
|
int i2 = 20;
|
||
|
|
||
|
void varintvar(void)
|
||
|
{
|
||
|
printf("var vs int var\n");
|
||
|
|
||
|
fp1 = 10.0f;
|
||
|
fp2 = 20.0f;
|
||
|
#if 0 // works but gives wrong results
|
||
|
expect("10 == 20 is", 0, (fp1 == i2), fp1, i2);
|
||
|
expect("20 == 10 is", 0, (fp2 == i1), fp2, i1);
|
||
|
expect("20 == 20 is", 1, (fp2 == i2), fp2, i2);
|
||
|
|
||
|
expect("10 != 20 is", 1, (fp1 != i2), fp1, i2);
|
||
|
expect("20 != 10 is", 1, (fp2 != i1), fp2, i1);
|
||
|
expect("20 != 20 is", 0, (fp2 != i2), fp2, i2);
|
||
|
|
||
|
expect("10 < 20 is", 1, (fp1 < i2), fp1, i2);
|
||
|
expect("20 < 10 is", 0, (fp2 < i1), fp2, i1);
|
||
|
expect("20 < 20 is", 0, (fp2 < i2), fp2, i2);
|
||
|
|
||
|
expect("10 > 20 is", 0, (fp1 > i2), fp1, i2);
|
||
|
expect("20 > 10 is", 1, (fp2 > i1), fp2, i1);
|
||
|
expect("20 > 20 is", 0, (fp2 > i2), fp2, i2);
|
||
|
|
||
|
expect("10 <= 20 is", 1, (fp1 <= i2), fp1, i2);
|
||
|
expect("20 <= 10 is", 0, (fp2 <= i1), fp2, i1);
|
||
|
expect("20 <= 20 is", 1, (fp2 <= i2), fp2, i2);
|
||
|
|
||
|
expect("10 >= 20 is", 0, (fp1 >= i2), fp1, i2);
|
||
|
expect("20 >= 10 is", 1, (fp2 >= i1), fp2, i1);
|
||
|
expect("20 >= 20 is", 1, (fp2 >= i2), fp2, i2);
|
||
|
#endif
|
||
|
}
|
||
|
|
||
|
int main(void)
|
||
|
{
|
||
|
printf("float-cmp-var-intvar\n");
|
||
|
|
||
|
varintvar();
|
||
|
|
||
|
printf("float-cmp-var-intvar (res: %d)\n", result);
|
||
|
return result;
|
||
|
}
|