12 lines
309 B
C
12 lines
309 B
C
#pragma once
|
|
|
|
B eachd_fn(B fo, B w, B x, FC2 f); // consumes w,x; assumes at least one is array
|
|
B eachm_fn(B fo, B x, FC1 f); // consumes x; x must be array
|
|
|
|
|
|
#if CATCH_ERRORS
|
|
NOINLINE B arith_recd(FC2 f, B w, B x);
|
|
#else
|
|
static inline B arith_recd(FC2 f, B w, B x) { return eachd_fn(bi_N, w, x, f); }
|
|
#endif
|