Branch: Tag:

1998-09-01

1998-09-01 16:56:43 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

subtraction bug fixed

Rev: src/peep.in:1.21

1:   // - // $Id: peep.in,v 1.20 1998/06/06 03:49:22 hubbe Exp $ + // $Id: peep.in,v 1.21 1998/09/01 16:56:43 hubbe Exp $   //      NOP :
26:   CONST1 NEGATE : CONST_1   CONST_1 NEGATE : CONST1   NUMBER NEGATE : NEG_NUMBER($1a) - NUMBER [$1a < 0] : NEG_NUMBER (-$1a) + NUMBER [$1a < 0 && (-$1a)>0] : NEG_NUMBER (-$1a)   NEG_NUMBER NEGATE : NUMBER ($1a)   NEGATE NEGATE :   COMPL COMPL :
248:      CLEAR_LOCAL DEC_LOCAL_AND_POP($1a) : CONST_1 ASSIGN_LOCAL_AND_POP($1a)   CLEAR_LOCAL INC_LOCAL_AND_POP($1a) : CONST1 ASSIGN_LOCAL_AND_POP($1a) +  + NUMBER POP_VALUE : + STRING POP_VALUE : + FLOAT POP_VALUE : + CONSTANT POP_VALUE : + LOCAL POP_VALUE :