sdcc/support/regression/tests/bitvars.c.in

   1 /** Bit vars test.
   2
   3     type: bool, char, unsigned char, unsigned short, unsigned long
   4 */
   5
   6 #include <testfwk.h>
   7
   8 #ifdef __SDCC
   9 #pragma std_sdcc99
  10 #endif
  11
  12 #include <limits.h>
  13 #include <stdbool.h>
  14
  15 #ifndef PORT_HOST
  16 #pragma disable_warning 180 //no warning about using complement on bit/unsigned char
  17 #endif
  18
  19 #ifdef __bool_true_false_are_defined
  20
  21 #define TYPE_{type}
  22
  23 char foo(bool a, bool b, char c)
  24 {
  25   return a + b + c;
  26 }
  27
  28 char complement(bool a, bool b)
  29 {
  30   return (a == b);
  31 }
  32
  33 {type} _0 = 0, _1 = 1, _ff = 0xFF, _ffff = -1;
  34
  35 #endif //__bool_true_false_are_defined
  36
  37 void
  38 testBits(void)
  39 {
  40 #ifndef __SDCC_pic16
  41 #ifdef __bool_true_false_are_defined
  42   bool x = 2;
  43   ASSERT (foo(x,3,4) == 6);
  44
  45   ASSERT (complement (~_0, 1));
  46   ASSERT (complement (~_1, 1));
  47
  48 #if !(defined(__SUNPRO_C) && defined(__i386))
  49 /* this test fails on Solaris i386 SunPro C compiler with -xO2 option;
  50    it pass without -xO2 option !? */
  51 #if defined TYPE_char && CHAR_MIN < 0
  52   ASSERT (complement (~_ff, 0));
  53 #else
  54   ASSERT (complement (~_ff, 1));
  55 #endif
  56 #endif
  57
  58 #if defined TYPE_bool
  59   ASSERT (complement (~_ffff, 1));
  60 #elif defined TYPE_char && CHAR_MIN < 0
  61   ASSERT (complement (~_ffff, 0));
  62 #else
  63   if (sizeof({type}) < sizeof(int))
  64     ASSERT (complement (~_ffff, 1));
  65   else
  66     ASSERT (complement (~_ffff, 0));
  67 #endif
  68
  69 #endif //__bool_true_false_are_defined
  70 #endif
  71 }
  72