diff options
-rw-r--r-- | lib.c | 2 | ||||
-rw-r--r-- | lib.h | 2 |
2 files changed, 2 insertions, 2 deletions
@@ -6144,7 +6144,7 @@ val func_vm(val closure, val desc, int fixparam, int reqargs, int variadic) { if (fixparam > FIXPARAM_MAX) { uw_throwf(error_s, lit("closure in ~s with more than ~s fixed parameters"), - desc, unum(FIXPARAM_MAX), nao); + desc, num(FIXPARAM_MAX), nao); } else if (fixparam < 0 || reqargs < 0 || reqargs > fixparam) { uw_throwf(error_s, lit("closure in ~s with bogus parameters"), desc, nao); @@ -148,7 +148,7 @@ struct package { typedef struct args *varg; #define FIXPARAM_BITS 7 -#define FIXPARAM_MAX ((1U << FIXPARAM_BITS) - 1) +#define FIXPARAM_MAX ((1 << FIXPARAM_BITS) - 1) struct func { obj_common; |