pike.git/ src/ operators.c

2001-02-25

2001-02-25 17:42:50 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

• 5e44424663b966d297161d69662ec0412acedc91 (13 lines) (+7/-6) ^{[ Show | Annotate ]}
  Branch: 7.9

bugfix for constants

Rev: src/docode.c:1.108
Rev: src/docode.h:1.12
Rev: src/operators.c:1.127
Rev: src/testsuite.in:1.388

6:   /**/   #include "global.h"   #include <math.h> - RCSID("$Id: operators.c,v 1.126 2001/02/21 18:25:25 grubba Exp $"); + RCSID("$Id: operators.c,v 1.127 2001/02/25 17:40:19 hubbe Exp $");   #include "interpret.h"   #include "svalue.h"   #include "multiset.h"
607:    first_arg=my_get_arg(&_CDR(n), 0);    second_arg=my_get_arg(&_CDR(n), 1);    -  do_docode(CDR(n),DO_NOT_COPY); +  do_docode(CDR(n),DO_NOT_COPY_TOPLEVEL);    if(first_arg[0]->type == float_type_string &&    second_arg[0]->type == float_type_string)    {
1065:    return 1;       case 2: -  do_docode(CDR(n),DO_NOT_COPY); +  do_docode(CDR(n),DO_NOT_COPY_TOPLEVEL);    emit0(F_SUBTRACT);    return 1;    }
1880:   {    if(count_args(CDR(n))==2)    { -  do_docode(CDR(n),DO_NOT_COPY); +  do_docode(CDR(n),DO_NOT_COPY_TOPLEVEL);    emit0(F_LSH);    return 1;    }
2575:   {    if(count_args(CDR(n))==2)    { -  do_docode(CDR(n),DO_NOT_COPY); +  do_docode(CDR(n),DO_NOT_COPY_TOPLEVEL);    emit0(F_DIVIDE);    return 1;    }
2731:   {    if(count_args(CDR(n))==2)    { -  do_docode(CDR(n),DO_NOT_COPY); +  do_docode(CDR(n),DO_NOT_COPY_TOPLEVEL);    emit0(F_MOD);    return 1;    }