pike.git / src / module_support.c

version» Context lines:

pike.git/src/module_support.c:70:    struct expect_result tmp;       va_start(arglist, args);    va_check_args(Pike_sp - args, args, &tmp, arglist);    va_end(arglist);       if(tmp.error_type == ERR_NONE) return 0;    return tmp.argno+1;   }    + static const char* get_fname(const char *fname) + { +  if (fname) return fname; +  return (Pike_fp->context->prog->identifiers + Pike_fp->fun)->name->str; + } +    /* This function generates errors if any of the args first arguments    * is not OK.    */   PMOD_EXPORT void check_all_args(const char *fnname, int args, ... )   {    va_list arglist;    struct expect_result tmp;       va_start(arglist, args);    va_check_args(Pike_sp - args, args, &tmp, arglist);    va_end(arglist);       switch(tmp.error_type)    {    case ERR_NONE: return;    case ERR_TOO_FEW: -  new_error(fnname, "Too few arguments.\n", Pike_sp, args); +  new_error(get_fname(fnname), "Too few arguments.\n", Pike_sp, args);    break;    case ERR_TOO_MANY: -  new_error(fnname, "Too many arguments.\n", Pike_sp, args); +  new_error(get_fname(fnname), "Too many arguments.\n", Pike_sp, args);    break;       case ERR_BAD_ARG:    {    char buf[1000];    int e;    buf[0]=0;    for(e=0;e<16;e++)    {    if(tmp.expected & (1<<e))
pike.git/src/module_support.c:114:    strcat(buf,", ");    else    strcat(buf," or ");    }    strcat(buf, get_name_of_type(e));    }    }       Pike_error("Bad argument %d to %s(), (expecting %s, got %s)\n",    tmp.argno+1, -  fnname, +  get_fname(fnname),    buf,    get_name_of_type(tmp.got));    break;    }    }   }      /* get_args and get_all_args type specifiers:    *    * %i: INT_TYPE
pike.git/src/module_support.c:501: Inside #if defined(NOT_USED)
  {    va_list ptr;    int ret, info;    va_start(ptr, fmt);    ret=va_get_args_2(s, num_args, fmt, ptr, &info);    va_end(ptr);    return ret;   }   #endif    - static const char* get_fname(const char *fname) - { -  if (fname) return fname; -  return (Pike_fp->context->prog->identifiers + Pike_fp->fun)->name->str; - } -  +    PMOD_EXPORT void get_all_args(const char *fname, INT32 args,    const char *format, ... )   {    va_list ptr;    int ret, info;    va_start(ptr, format);    ret=va_get_args_2(Pike_sp-args, args, format, ptr, &info);    va_end(ptr);       switch (info) {