Merge the bulk of Perl_magic_clearsig() into Perl_magic_setsig().
authorNicholas Clark <nick@ccl4.org>
Wed, 20 May 2009 19:52:58 +0000 (21:52 +0200)
committerNicholas Clark <nick@ccl4.org>
Wed, 20 May 2009 19:52:58 +0000 (21:52 +0200)
commit38a124f06b8ced6241a4e9b1c3408609d2da87e9
treeeef665e16ade6f14475b224ea343fbdff9c01481
parent179c85a2d774d3be8975d7f80a3ae831be6dc4cd
Merge the bulk of Perl_magic_clearsig() into Perl_magic_setsig().

The comment at the top of Perl_magic_clearsig() said:
    XXX Some of this code was copied from Perl_magic_setsig. A little
    refactoring might be in order.
and it was not wrong.

Perl_magic_clearsig() is almost equivalent to Perl_magic_setsig() with the new
signal handler as "DEFAULT". Externally, the sv parameter to Perl_magic_setsig()
was Not NULL, so use a NULL sv to signal that the code is being called as
Perl_magic_clearsig(), for the places where the behaviour of the two diverges.
embed.fnc
mg.c
proto.h