Roxen.git / server / base_server / module.pike

version» Context lines:

Roxen.git/server/base_server/module.pike:1: - /* $Id: module.pike,v 1.17 1997/07/11 06:00:03 per Exp $ */ + /* $Id: module.pike,v 1.18 1997/08/12 06:32:02 per Exp $ */      #include <module.h>      mapping (string:mixed *) variables=([]);      object this = this_object();   int module_type;   string fix_cvs(string from)   {    from = replace(from, ({ "$", "Id: "," Exp $" }), ({"","",""}));
Roxen.git/server/base_server/module.pike:167:    report_error(sprintf("%s:\nPassing illegal misc (%t:%O) (not array) "    "to multiple choice variable.\n",    roxen->filename(this), value, value));    } else {    if(misc && !arrayp(misc)) {    report_error(sprintf("%s:\nPassing illegal misc (%t:%O) (not array) "    "to multiple choice variable.\n",    roxen->filename(this), misc, misc));    }    if(misc && search(misc, value)==-1) { -  report_error(sprintf("%s:\nPassing value (%t:%O) not present " +  roxen_perror(sprintf("%s:\nPassing value (%t:%O) not present "    "in the misc array.\n",    roxen->filename(this), value, value));    }    }    break;       case TYPE_FLAG:    value=!!value;    break;   
Roxen.git/server/base_server/module.pike:209:       variables[var]=allocate( VAR_SIZE );    if(!variables[var])    error("Out of memory in defvar.\n");    variables[var][ VAR_VALUE ]=value;    variables[var][ VAR_TYPE ]=type&VAR_TYPE_MASK;    variables[var][ VAR_DOC_STR ]=doc_str;    variables[var][ VAR_NAME ]=name;    if((type&~VAR_TYPE_MASK) & VAR_EXPERT)    variables[var][ VAR_CONFIGURABLE ] = VAR_EXPERT; +  else if((type&~VAR_TYPE_MASK) & VAR_MORE) +  variables[var][ VAR_CONFIGURABLE ] = VAR_MORE;    else    if(intp(not_in_config))    variables[var][ VAR_CONFIGURABLE ]= !not_in_config;    else if(functionp(not_in_config))    variables[var][ VAR_CONFIGURABLE ]= not_in_config;    variables[var][ VAR_MISC ]=misc;    variables[var][ VAR_SHORTNAME ]= var;   }