summaryrefslogtreecommitdiff
path: root/makedef.pl
diff options
context:
space:
mode:
authorTomasz Konojacki <me@xenu.pl>2018-07-15 02:33:16 +0200
committerTony Cook <tony@develop-help.com>2018-08-01 16:42:30 +1000
commitbbc9927bf24edbd6398f6decb015f1b9369455a0 (patch)
tree86f9b8cc90be6d19f0a7efa7605c928895e4e22e /makedef.pl
parent3d5e9c119db6b727684fe75dfcfe5831c4351bec (diff)
downloadperl-bbc9927bf24edbd6398f6decb015f1b9369455a0.tar.gz
win32: fix argumentless sleep()
Before this commit, pause() was implemented as a macro calling win32_sleep((32767L << 16) + 32767), which was causing the following problems with argumentless sleep(): - it was sleeping for 4262198 seconds (~50 days) instead of forever - it was triggering "sleep(2147450879) too large" warning This commit implements pause() as a proper function which calls win32_msgwait() with an INFINITE timeout. [perl #133376]
Diffstat (limited to 'makedef.pl')
-rw-r--r--makedef.pl1
1 files changed, 1 insertions, 0 deletions
diff --git a/makedef.pl b/makedef.pl
index 661b71de7e..6b97ad0033 100644
--- a/makedef.pl
+++ b/makedef.pl
@@ -898,6 +898,7 @@ if ($ARGS{PLATFORM} =~ /^win(?:32|ce)$/) {
win32_realloc
win32_free
win32_sleep
+ win32_pause
win32_times
win32_access
win32_alarm