Roxen.git/ server/ etc/ include/ testsuite.h

2011-04-18

2011-04-18 14:57:26 by Martin Stjernholm <mast@lysator.liu.se>

• 663367ebf91692cc8da36b98c59d330be36ce6de (13 lines) (+7/-6) ^{[ Show | Annotate ]}
  Branch: 5.2

Kludge to reduce local variable consumption.

Pike really needs a better stack allocator. :(

Rev: server/etc/include/testsuite.h:1.5

19:    #EXPR, ({ARGS}))      #define TEST_EQUAL(A, B) \ -  do { \ +  lambda () { \    int len__ = min (max (sizeof (#A), sizeof (#B)), 40); \    array args__ = ({len__, #A, 0, len__, #B, 0}); \    cpp_test_true (__FILE__, __LINE__, \
30:    "%-*s (is %O)?", \    args__); \    args__ = 0; \ -  } while (0) +  }()      #define TEST_NOT_EQUAL(A, B) \ -  do { \ +  lambda () { \    int len__ = min (max (sizeof (#A), sizeof (#B)), 40); \    array args__ = ({len__, #A, 0, len__, #B, 0}); \    cpp_test_true (__FILE__, __LINE__, \
44:    "%-*s (is %O)?", \    args__); \    args__ = 0; \ -  } while (0) +  }()      #define TEST_CMP(A, OP, B) \ -  do { \ +  lambda () { \    int len__ = min (max (sizeof (#A), sizeof (#B)), 40); \    array args__ = ({len__, #A, 0, len__, #B, 0}); \    cpp_test_true (__FILE__, __LINE__, \
58:    "%-*s (is %O)?", \    args__); \    args__ = 0; \ -  } while (0) +  }()      #define TEST_ERROR(CODE, ARGS...) \    cpp_test_true (__FILE__, __LINE__, \