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

219:    switch(args)    {    case 0: -  ret=allocate_mapping(allocate_array_no_init(0,0,T_MIXED), -  allocate_array_no_init(0,0,T_MIXED)); +  ret=allocate_mapping(allocate_array_no_init(0,0), +  allocate_array_no_init(0,0));    break;       case 1:
334:    if(args & 1)    error("Uneven number of arguments to aggregage_mapping.\n");    -  ind=allocate_array_no_init(args/2,0,T_MIXED); -  val=allocate_array_no_init(args/2,0,T_MIXED); +  ind=allocate_array_no_init(args/2,0); +  val=allocate_array_no_init(args/2,0);       s=sp-args;    for(e=0;e<args/2;e++)