pike.git / src / builtin.cmod

version» Context lines:

pike.git/src/builtin.cmod:2472:    struct svalue sv;    SET_SVAL(sv, PIKE_T_INT, NUMBER_NUMBER, integer, PTR_TO_INT(pc));    mapping_string_insert(m, id->name, &sv);    }    }       {    struct svalue key, value;       SET_SVAL(key, PIKE_T_INT, NUMBER_NUMBER, integer, 0); -  /* FIXME: this could overflow.. typewise, at least. */ +     SET_SVAL(value, PIKE_T_INT, NUMBER_NUMBER, integer, -  PTR_TO_INT(p->program + p->num_program)); +  p->num_program * sizeof(PIKE_OPCODE_T));    mapping_insert(m, &key, &value);    }    }       RETURN m;   }      /*! @decl int(0..) map_all_programs(function(program:void) cb)    *!    *! Call cb for all programs that currently exist.