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

744:      void check_array_type(struct array *a)   { -  int t; -  t=my_log2(a->array_type); -  if( ( 1 << t ) == a->array_type ) -  { -  switch(t) -  { -  case T_ARRAY: +     push_type(T_MIXED); -  push_type(T_ARRAY); -  break; -  -  case T_LIST: -  push_type(T_MIXED); -  push_type(T_LIST); -  break; -  -  case T_MAPPING: -  push_type(T_MIXED); -  push_type(T_MIXED); -  push_type(T_MAPPING); -  break; -  -  default: -  push_type(t); +    } -  }else{ -  push_type(T_MIXED); -  } - } +       struct lpc_string *get_type_of_svalue(struct svalue *s)   {