pike.git/ src/ docode.c

1998-10-09

1998-10-09 23:30:23 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 99761fc538a0c19a81f183185743d32de5103e3f (7 lines) (+6/-1) ^{[ Show | Annotate ]}
  Branch: 7.9

bugfix for `[] and `->

Rev: src/docode.c:1.40
Rev: src/peep.in:1.23
Rev: src/testsuite.in:1.123

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: docode.c,v 1.39 1998/07/31 06:51:41 hubbe Exp $"); + RCSID("$Id: docode.c,v 1.40 1998/10/09 23:30:21 hubbe Exp $");   #include "las.h"   #include "program.h"   #include "language.h"
993:    return 2;    }else{    tmp1=do_docode(CAR(n), DO_NOT_COPY); +     code_expression(CDR(n), DO_NOT_COPY, "index"); -  +  if(CDR(n)->token != F_CONSTANT && +  match_types(CDR(n)->type, string_type_string)) +  emit2(F_CLEAR_STRING_SUBTYPE);       emit2(F_INDEX);