diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-16 12:16:25 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-16 12:16:25 +0000 |
commit | afdf87ad777c69602cae38888da5fa4053d5b7f7 (patch) | |
tree | 13bb54299f93790c3977f2b27d195d799d9941f2 /t/op/alarm.t | |
parent | fe50f7441562491536981b26b3f2d6eeb520a36b (diff) | |
download | perl-afdf87ad777c69602cae38888da5fa4053d5b7f7.tar.gz |
DJGPP updates from Laszlo Molnar.
p4raw-id: //depot/perl@16619
Diffstat (limited to 't/op/alarm.t')
-rw-r--r-- | t/op/alarm.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/alarm.t b/t/op/alarm.t index 384ee1d028..8fb92964a3 100644 --- a/t/op/alarm.t +++ b/t/op/alarm.t @@ -46,6 +46,6 @@ is( $@, "ALARM!\n", 'alarm w/$SIG{ALRM} vs system()' ); { local $TODO = "Why does system() block alarm() on $^O?" - if $^O eq 'VMS' || $^O eq'MacOS'; + if $^O eq 'VMS' || $^O eq'MacOS' || $^O eq 'dos'; ok( abs($diff - 3) <= 1, " right time (waited $diff secs for 3-sec alarm)" ); } |