Time::HiRes hangs

Change #18765 is evil :
it causes ext/Time/HiRes/HiRes.t to hang after test 11.
At least under this configuration :

Summary of my perl5 (revision 5.0 version 9 subversion 0 patch 18374) configuration:
  Platform:
    osname=linux, osvers=2.4.20, archname=i686-linux-thread-multi-64all
    uname='linux valis 2.4.20 #2 thu dec 19 00:13:36 cet 2002 i686 unknown '
    config_args='-des -Dusedevel -Dprefix=/home/rafael/perl -Doptimize=-g -DDEBUGGING -Dmksymlinks -Dusethreads -Duse64bitall'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=define useithreads=define usemultiplicity=define
    useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=define use64bitall=undef uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS -DDEBUGGING -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -I/usr/include/gdbm',
    optimize='-g',
    cppflags='-D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS -DDEBUGGING -fno-strict-aliasing -I/usr/local/include -I/usr/include/gdbm'
    ccversion='', gccversion='2.96 20000731 (Red Hat Linux 7.1 2.96-98)', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=12345678
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=4, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib
    libs=-lnsl -lgdbm -ldb -ldl -lm -lpthread -lc -lcrypt -lutil -lrt
    perllibs=-lnsl -ldl -lm -lpthread -lc -lcrypt -lutil -lrt
    libc=/lib/libc-2.2.4.so, so=so, useshrplib=false, libperl=libperl.a
    gnulibc_version='2.2.4'
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
    cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'


Characteristics of this binary (from libperl): 
  Compile-time options: DEBUGGING MULTIPLICITY USE_ITHREADS USE_64_BIT_INT USE_LARGE_FILES PERL_IMPLICIT_CONTEXT
  Locally applied patches:
        DEVEL18374
  Built under linux
  Compiled at Feb 24 2003 23:33:23
  @INC:
    ../lib
    /home/rafael/perl/lib/5.9.0/i686-linux-thread-multi-64all
    /home/rafael/perl/lib/5.9.0
    /home/rafael/perl/lib/site_perl/5.9.0/i686-linux-thread-multi-64all
    /home/rafael/perl/lib/site_perl/5.9.0
    /home/rafael/perl/lib/site_perl
    .

The change is :

Change 18765 by jhi@kosh on 2003/02/24 19:56:23

        Subject: Re: [perl #20920] Segmentation fault ("Safe Signal" queue problem?)
        From: Slaven Rezic <slaven@rezic.de>
        Date: 14 Feb 2003 09:11:15 +0100
        Message-ID: <878ywji8nw.fsf@vran.herceg.de>
        
        (with slight tweaks)

Affected files ...

... //depot/perl/mg.c#252 edit

• Time::HiRes hangs by Rafael Garcia-Suarez
• Re: Time::HiRes hangs by Nicholas Clark
• Re: Time::HiRes hangs by Jarkko Hietaniemi
• Re: Time::HiRes hangs by Jarkko Hietaniemi
• Re: Time::HiRes hangs by Jarkko Hietaniemi
• Re: Time::HiRes hangs by Rafael Garcia-Suarez
• Re: Time::HiRes hangs by Jarkko Hietaniemi
• Re: Time::HiRes hangs by Slaven Rezic
• Re: Time::HiRes hangs by Rafael Garcia-Suarez