> > with the cc/xlc/vac/whichever settings you have in that AIX box, > > and see whether compiling threaded breaks this. By now you should > > get values like 994775434 for the tv_sec. > > ibm:/pro/3gl/CPAN/perl-5.7.1 102 > cat > try.c > #include <sys/time.h> > #include <stdio.h> > int main() > { > struct timeval tv; > int status = gettimeofday(&tv, 0); > printf("%ld %ld (%d)\n", (long)tv.tv_sec, (long)tv.tv_usec, status); > return 0; > } > ibm:/pro/3gl/CPAN/perl-5.7.1 103 > make try.o > `sh cflags libperl.a try.o` try.c > CCCMD = cc_r -DPERL_CORE -c -DDEBUGGING -D_ALL_SOURCE -D_ANSI_C_SOURCE -D_POSIX_SOURCE -qmaxmem=16384 -DNEED_PTHREAD_INIT -I/pro/local/include -O2 > ibm:/pro/3gl/CPAN/perl-5.7.1 104 > make try > cc_r -L/pro/local/lib try.o -o try > ibm:/pro/3gl/CPAN/perl-5.7.1 105 > ./try > 994777307 955598 (0) Now, your new task is to find why does the same thing when compiled as a part of Perl fail...? Add debug printf() to the Time::HiRes code, for example. > ibm:/pro/3gl/CPAN/perl-5.7.1 106 > -- $jhi++; # http://www.iki.fi/jhi/ # There is this special biologist word we use for 'stable'. # It is 'dead'. -- Jack CohenThread Previous | Thread Next