Front page | perl.perl5.porters |
Postings from July 2001
> > 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 Cohen
Thread Previous
|
Thread Next