VALUE_MAXIMUM(args, field); \
} while (0)
+#define COMPUTE_CDEF(args, cdef) SCRIPT(args, "CDEF:" cdef)
+
#define COMPUTE_SUM(args, sum, summand1, summand2) \
do { \
- SCRIPT(args, "CDEF:" sum "=" summand1 "," summand2 ",+"); \
+ COMPUTE_CDEF(args, sum "=" summand1 "," summand2 ",+"); \
VALUE_ALL(args, sum); \
} while (0)
#define COMPUTE_DIVIDE(args, fraction, dividend, divisor) \
do { \
- SCRIPT(args, "CDEF:" fraction "=" dividend "," TOSTRING(divisor) ",/"); \
+ COMPUTE_CDEF(args, fraction "=" dividend "," TOSTRING(divisor) ",/"); \
VALUE_ALL(args, fraction); \
} while (0)
#define COMPUTE_PERCENTAGE(args, field, total) \
do { \
- SCRIPT(args, "CDEF:" FIELD_PERCENT(field) "=100," field ",*," total ",/"); \
+ COMPUTE_CDEF(args, FIELD_PERCENT(field) "=100," field ",*," total ",/"); \
VALUE_ALL(args, FIELD_PERCENT(field)); \
} while (0)