Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot

Re^3: Bug in Math::Pari ?

by hv (Parson)
on Nov 27, 2009 at 12:58 UTC ( #809735=note: print w/replies, xml ) Need Help??

in reply to Re^2: Bug in Math::Pari ?
in thread Bug in Math::Pari ?

I wonder if $SIG{__DIE__} is exactly the problem here: the line in Math::BigInt::objectify() is:

$k->can('as_number') ? $k = $k->as_number : $k = $a[0]->new($k);

Now, there is a precedence error here (I've reported that), but if can() returns false it shouldn't affect us, it should simply call $a[0]->new($k).

The code from Math::Pari::can() is:

$f = eval { loadPari($meth) }; return $f if defined $f; return;

.. which should correctly return undef if the loadPari() fails. However if some $SIG{__DIE__} is catching the loadPari() failure, maybe we're never getting to return from the eval. Or maybe the die handler is (inappropriately) reporting the error and the code is then successfully continuing.

I'd be tempted for starters to put a diagnostic in objectify() just after that line, to see if a) it reaches there, and b) $k has the correct value. I'd also hunt for a $SIG{__DIE__} handler, to check what exactly it is doing - generally, such handlers should almost always act only after checking they are not inside an eval. There may be a better way, but when I needed this some time ago for a logging module the code looked like this:

$SIG{__DIE__} = sub { # propagate the die if we're under an eval (defined($^S) && !$^S) or die(@_); # now do the real stuff ... };

.. but there may be a better way.


Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://809735]
[thezip]: What are some good audiophile quality bluetooth earbuds? The good stuff...
[thezip]: Leaning towards Sennheiser HD-1's

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (3)
As of 2017-09-21 20:41 GMT
Find Nodes?
    Voting Booth?
    During the recent solar eclipse, I:

    Results (252 votes). Check out past polls.