URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [c-c++-common/] [dfp/] [operator-logical.c] - Rev 307
Go to most recent revision | Compare with Previous | Blame | View Log
/* C99 Logical AND operator. C99 Logical OR operator. Test with decimal float operands. */ #include "dfp-dbg.h" #define OPERATE(OPRD1,OPRT,OPRD2,RLT) \ do \ { \ if (( (OPRD1) OPRT (OPRD2) )!= RLT) \ __builtin_abort (); \ } while (0) #define DECIMAL_LOGICAL_OR(OPRD) \ do \ { \ OPRD = 1.0; \ OPERATE(1,||,OPRD,1); \ OPERATE(0,||,OPRD,1); \ OPERATE(OPRD,||,1,1); \ OPERATE(OPRD,||,0,1); \ OPRD = 0.0; \ OPERATE(1,||,OPRD,1); \ OPERATE(0,||,OPRD,0); \ OPERATE(OPRD,||,1,1); \ OPERATE(OPRD,||,0,0); \ } while (0) #define DECIMAL_LOGICAL_AND(OPRD) \ do \ { \ OPRD = 1.0; \ OPERATE(1,&&,OPRD,1); \ OPERATE(0,&&,OPRD,0); \ OPERATE(OPRD,&&,1,1); \ OPERATE(OPRD,&&,0,0); \ OPRD = 0.0; \ OPERATE(1,&&,OPRD,0); \ OPERATE(0,&&,OPRD,0); \ OPERATE(OPRD,&&,1,0); \ OPERATE(OPRD,&&,0,0); \ } while (0) int main () { _Decimal32 d32; _Decimal64 d64; _Decimal128 d128; /* C99 Section 6.5.{13,14} Logical operator. Constraints Each of the operands shall have scalar type. DFP types would obey this. */ DECIMAL_LOGICAL_OR (d32); DECIMAL_LOGICAL_AND (d32); DECIMAL_LOGICAL_OR (d64); DECIMAL_LOGICAL_AND (d64); DECIMAL_LOGICAL_OR (d128); DECIMAL_LOGICAL_AND (d128); return 0; }
Go to most recent revision | Compare with Previous | Blame | View Log