comparison src/data.c @ 4907:9e7f5a77cc84

merge
author Ben Wing <ben@xemacs.org>
date Mon, 01 Feb 2010 01:05:28 -0600
parents 6ef8256a020a 755ae5b97edb
children e813cf16c015 c17c857e20bf
comparison
equal deleted inserted replaced
4906:6ef8256a020a 4907:9e7f5a77cc84
340 return make_int (XSUBR (subr)->min_args); 340 return make_int (XSUBR (subr)->min_args);
341 } 341 }
342 342
343 DEFUN ("subr-max-args", Fsubr_max_args, 1, 1, 0, /* 343 DEFUN ("subr-max-args", Fsubr_max_args, 1, 1, 0, /*
344 Return maximum number of args built-in function SUBR may be called with, 344 Return maximum number of args built-in function SUBR may be called with,
345 or nil if it takes an arbitrary number of arguments or is a special form. 345 or nil if it takes an arbitrary number of arguments or is a special operator.
346 */ 346 */
347 (subr)) 347 (subr))
348 { 348 {
349 int nargs; 349 int nargs;
350 CHECK_SUBR (subr); 350 CHECK_SUBR (subr);