From: Gurusamy Sarathy <gsar@cpan.org>
Date: Fri, 5 May 2000 01:33:09 +0000 (+0000)
Subject: replace direct call to sighandler() with (*PL_sighandlerp)()
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b319cd580f7af181ac94e0f1bec34de0d03328b0;p=p5sagit%2Fp5-mst-13.2.git

replace direct call to sighandler() with (*PL_sighandlerp)()

p4raw-id: //depot/perl@6067
---

diff --git a/win32/win32.c b/win32/win32.c
index e10b115..008d7e0 100644
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -1757,7 +1757,7 @@ static VOID CALLBACK TimerProc(HWND win, UINT msg, UINT id, DWORD time)
     dTHXo;
     KillTimer(NULL,timerid);
     timerid=0;  
-    sighandler(14);
+    CALL_FPTR(PL_sighandlerp)(14);
 }
 #endif	/* !PERL_OBJECT */