Branch: Tag:

2015-06-03

2015-06-03 06:26:51 by Martin Karlgren <marty@roxen.com>

Set type_field of the destination array in assign_array_level*().

2323:    assign_array_level( a->item[i].u.array, b->item[i].u.array, level-1 );    }    } -  else -  assign_svalues( a->item, b->item, a->size, a->type_field|b->type_field ); +  else { +  assign_svalues( a->item, b->item, a->size, +  a->type_field|b->type_field ); +  a->type_field = b->type_field;    } -  + }      /* Assign all elemnts in a at level to b.    * This implements X[*] = expression without automap.
2349:    if( REFCOUNTED_TYPE(TYPEOF(*b)) ) *b->u.refs+=a->size;    for( i=0; i<a->size; i++)    a->item[i] = *b; +  a->type_field = 1 << TYPEOF(*b);    }   }