http://qs321.pair.com?node_id=653305


in reply to Re^3: return +0
in thread return +0

Just note that -.0 is distinct from .0.

⠤⠤ ⠙⠊⠕⠞⠁⠇⠑⠧⠊

Replies are listed 'Best First'.
Re^5: return +0 (-.0?)
by tye (Sage) on Nov 27, 2007 at 22:10 UTC

    Perhaps you could be less vague. There is no such distinction in my tests:

    > perl -MDevel::Peek -e"Dump(+.0)" SV = NV(0xa4a5fc) at 0x3d53c4 REFCNT = 1 FLAGS = (PADBUSY,PADTMP,NOK,READONLY,pNOK) NV = 0 > perl -MDevel::Peek -e"Dump(-.0)" SV = NV(0xa4a60c) at 0x3d53f4 REFCNT = 1 FLAGS = (PADBUSY,PADTMP,NOK,READONLY,pNOK) NV = 0 > perl -MDevel::Peek -e"Dump(.0)" SV = NV(0xa4a5fc) at 0x3d53c4 REFCNT = 1 FLAGS = (PADBUSY,PADTMP,NOK,READONLY,pNOK) NV = 0

    - tye        

      It depends on the math libraries? They're different here, at least:

      sidhekin@blackbox[23:22:41]~$ perl -MDevel::Peek -le 'Dump(.0)' SV = NV(0x816e490) at 0x814dce4 REFCNT = 1 FLAGS = (PADBUSY,PADTMP,NOK,READONLY,pNOK) NV = 0 sidhekin@blackbox[23:22:51]~$ perl -MDevel::Peek -le 'Dump(-.0)' SV = NV(0x816e4a0) at 0x814dd20 REFCNT = 1 FLAGS = (PADBUSY,PADTMP,NOK,READONLY,pNOK) NV = -0 sidhekin@blackbox[23:22:53]~$

      print "Just another Perl ${\(trickster and hacker)},"
      The Sidhekin proves Sidhe did it!