diff options
-rw-r--r-- | args.c | 8 | ||||
-rw-r--r-- | args.h | 2 |
2 files changed, 0 insertions, 10 deletions
@@ -37,14 +37,6 @@ val args_cons_list(struct args *args); -cnum args_limit(val name, cnum in) -{ - if (in <= ARGS_MAX) - return in; - uw_throwf(assert_s, lit("~a: too many trailing arguments (limit is ~s)"), - name, num(ARGS_MAX), nao); -} - val args_add_checked(val name, struct args *args, val arg) { if (args->fill >= args->argc) @@ -40,8 +40,6 @@ typedef int arg_index; (coerce(struct args *, \ alloca(offsetof(struct args, arg) + (N)*sizeof (val)))) -cnum args_limit(val name, cnum in); - INLINE void args_init_list(struct args *args, cnum argc, val list) { args->argc = argc; |