[Zope-Perl] Python::Err::DESTORY patch for alpha 3

[Gisle Aas]

If you catch or pass through python exceptions from perl then this
patch is recommended on top of zope-perl-0.1.a3

Regards,
Gisle


Change 7495 by gisle@eik on 2000/08/16 04:46:32

        The reference count of the type object in a Python::Err
        object was decremented twice when the Python::Err
        destructed.  The result was ugly core dumps down the road.

Affected files ...

... //depot/main/Apps/Bifrost/Python-Object/Object.xs#35 edit

Differences ...

==== //depot/main/Apps/Bifrost/Python-Object/Object.xs#35 (text) ====

@@ -943,7 +943,6 @@
        Py_XDECREF(self->type);
        Py_XDECREF(self->value);
        Py_XDECREF(self->traceback);
-       Py_XDECREF(self->type);
        ENTER_PERL;
        Safefree(self);
        ASSERT_LOCK_PERL;