Re: cvs commit: parrot/t/op arithmetics.t

[Dan Sugalski]

At 11:39 AM +0100 2/8/03, Leopold Toetsch wrote:

In perl.cvs.parrot, you wrote:

   Log:
   Long-delayed patches (my fault. D'oh! -Dan) from Bernhard Schmalhofer to
   implement neg and abs.

    inline op neg(inout NUM) {
   -  if($1 == 0.0)
   -    goto NEXT();
   -  $1 = -($1);
   +  $1 = 0.0 - $1;
      goto NEXT();
    }

Not too long ago, this was introduced to not have this -0. Now it's
changed back again.

How finally should these ops be implemented?

I do not want to adjust JIT code weekly :)

As long as they work properly, it doesn't make a huge amount of difference how things are implemented. The JIT for x86 can well stay the same for this--there are some platforms that'll get you a rather bizarre negative zero with the plain negation, but if the x86 isn't one of them, that's fine.
--
Dan

--------------------------------------"it's like this"-------------------
Dan Sugalski even samurai
[EMAIL PROTECTED] have teddy bears and even
teddy bears get drunk