alarm(), Win32, no PERL_IMPLICIT_SYS

   From: "Mattia Barbon" <mbarbon@dsi.unive.it>
   Message-Id: <3C8BD9C7.13988.73992D@localhost>

p4raw-id: //depot/perl@15191

diff --git a/iperlsys.h b/iperlsys.h
index 97a9a70..7eda973 100644 (file)
--- a/iperlsys.h
+++ b/iperlsys.h
@@ -1083,6 +1083,8 @@ struct IPerlProcInfo
        win32_dynaload((f))
 #define PerlProc_GetOSError(s,e)                                       \
        win32_str_os_error((s), (e))
+#undef PerlProc_signal
+#define PerlProc_signal(n, h) win32_signal((n), (h))
 #endif
 #endif /* PERL_IMPLICIT_SYS */