sdcc/support/regression/tests/bug-1918.c

   1 /*
   2  * bug-1918.c
   3  */
   4
   5 #include <testfwk.h>
   6
   7 #if !defined(__SDCC_pdk14) && !defined(__SDCC_pdk15) // pdk needs function pointer to be reentrant even for a single argument
   8 int run_func0 (int (*f) (int), int d);
   9 int run_func1 (int (*) (int), int);
  10
  11 int test_func (int x)
  12 {
  13   return x > 0 ? x + 1 : x - 1;
  14 }
  15
  16 int run_func0 (int (*f) (int), int d)
  17 {
  18   return f(d) + 10;
  19 }
  20
  21 int run_func1 (int (*f) (int), int d)
  22 {
  23   return f(d) - 10;
  24 }
  25 #endif
  26
  27 void testBug (void)
  28 {
  29 #if !defined(__SDCC_pdk14) && !defined(__SDCC_pdk15)
  30   ASSERT (run_func0 (test_func, 23) == 34);
  31   ASSERT (run_func1 (test_func, -23) == -34);
  32 #endif
  33 }