pike.git/ src/ operators.c

2003-04-28

2003-04-28 00:32:44 by Martin Stjernholm <mast@lysator.liu.se>

• 2523ce4a7cf39f2e501784efc1df8ad1a473cbd2 (15 lines) (+8/-7) ^{[ Show | Annotate ]}
  Branch: 7.9

Improved type fields for arrays.

Rev: src/array.c:1.143
Rev: src/backend.cmod:1.42
Rev: src/builtin.cmod:1.134
Rev: src/builtin_functions.c:1.490
Rev: src/encode.c:1.172
Rev: src/interpret.c:1.304
Rev: src/iterators.cmod:1.41
Rev: src/main.c:1.175
Rev: src/mapping.c:1.166
Rev: src/modules/files/efuns.c:1.127
Rev: src/modules/system/memory.c:1.24
Rev: src/object.c:1.236
Rev: src/opcodes.c:1.145
Rev: src/operators.c:1.177
Rev: src/post_modules/Unicode/unicode_module.cmod:1.7
Rev: src/post_modules/_ADT/circular_list.cmod:1.8
Rev: src/post_modules/_ADT/sequence.cmod:1.8

2:   || This file is part of Pike. For copyright information see COPYRIGHT.   || Pike is distributed under GPL, LGPL and MPL. See the file COPYING   || for more information. - || $Id: operators.c,v 1.176 2003/04/27 17:52:42 mast Exp $ + || $Id: operators.c,v 1.177 2003/04/28 00:32:43 mast Exp $   */      #include "global.h"   #include <math.h> - RCSID("$Id: operators.c,v 1.176 2003/04/27 17:52:42 mast Exp $"); + RCSID("$Id: operators.c,v 1.177 2003/04/28 00:32:43 mast Exp $");   #include "interpret.h"   #include "svalue.h"   #include "multiset.h"
2135:    assign_svalues_no_free(pos, ret->item, asize, ret->type_field);    }    } else if (asize) { +  ret->type_field =    assign_svalues_no_free(pos,    src->item,    asize,    src->type_field); -  array_fix_type_field(ret); +     }    pop_n_elems(2);    push_array(ret);