Branch: Tag:

1996-02-17

1996-02-17 15:55:54 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

Completed removing compact arrays

Rev: src/array.c:1.5
Rev: src/array.h:1.3
Rev: src/builtin_efuns.c:1.8
Rev: src/call_out.c:1.2
Rev: src/interpret.c:1.6
Rev: src/list.c:1.2
Rev: src/lpc_types.c:1.2
Rev: src/main.c:1.2
Rev: src/mapping.c:1.2
Rev: src/modules/files/efuns.c:1.3
Rev: src/modules/regexp/glue.c:1.2
Rev: src/object.c:1.4
Rev: src/svalue.c:1.5
Rev: src/svalue.h:1.3

246:    struct array *ret;       verify_call_outs(); -  ret=allocate_array_no_init(num_pending_calls,0,T_ARRAY); +  ret=allocate_array_no_init(num_pending_calls,0);    for(e=0;e<num_pending_calls;e++)    {    struct array *v; -  v=allocate_array_no_init(pending_calls[e]->args->size+2, 0, T_MIXED); +  v=allocate_array_no_init(pending_calls[e]->args->size+2, 0);    ITEM(v)[0].type=T_INT;    ITEM(v)[0].subtype=NUMBER_NUMBER;    ITEM(v)[0].u.integer=pending_calls[e]->time-current_time;
265:    ITEM(v)[1].u.integer=0;    }    -  assign_svalues_no_free(ITEM(v)+2,ITEM(pending_calls[e]->args),pending_calls[e]->args->size); +  assign_svalues_no_free(ITEM(v)+2,ITEM(pending_calls[e]->args),pending_calls[e]->args->size,BIT_MIXED);    -  SHORT_ITEM(ret)[e].array=v; +  ITEM(ret)[e].type=T_ARRAY; +  ITEM(ret)[e].u.array=v;    }    return ret;   }