src/evalfunc.c
int
check_internal_func(int idx, int argcount)
{
    int	    res;
    char    *name;

    if (argcount < global_functions[idx].f_min_argc)
	res = FCERR_TOOFEW;
    else if (argcount > global_functions[idx].f_max_argc)
	res = FCERR_TOOMANY;
    else
	return OK;

    name = internal_func_name(idx);
    if (res == FCERR_TOOMANY)
	semsg(_(e_toomanyarg), name);
    else
	semsg(_(e_toofewarg), name);
    return FAIL;
}
/*
 * Check the argument count to use for internal function "idx".
 * Returns OK or FAIL;
 */
Check the argument count to use for internal function "idx".
Returns OK or FAIL.
Check the argument count to use for internal function " idx " . Returns OK or FAIL .
int
check_internal_func(int idx, int argcount)
{
    int	    res;
    char    *name;
    if (argcount < global_functions[idx].f_min_argc)
	res = FCERR_TOOFEW;
    else if (argcount > global_functions[idx].f_max_argc)
	res = FCERR_TOOMANY;
    else
	return OK;
    name = internal_func_name(idx);
    if (res == FCERR_TOOMANY)
	semsg(_(e_toomanyarg), name);
    else
	semsg(_(e_toofewarg), name);
    return FAIL;
}
int check_internal_func ( int idx , int argcount ) { int res ; char * name ; if ( argcount < global_functions [ idx ] . f_min_argc ) res = FCERR_TOOFEW ; else if ( argcount > global_functions [ idx ] . f_max_argc ) res = FCERR_TOOMANY ; else return OK ; name = internal_func_name ( idx ) ; if ( res == FCERR_TOOMANY ) semsg ( _ ( e_toomanyarg ) , name ) ; else semsg ( _ ( e_toofewarg ) , name ) ; return FAIL ; }
Check the argument count to use for internal function "idx".
Check the argument count to use for internal function " idx " .