develooper Front page | perl.perl5.porters | Postings from January 2004

[perl #25249] int() rounds up on sparc64

Thread Next
From:
perlbug-followup
Date:
January 24, 2004 19:49
Subject:
[perl #25249] int() rounds up on sparc64
Message ID:
rt-3.0.8-25249-72095.8.76469484106131@perl.org
# New Ticket Created by  root@proton.i.mono.org 
# Please include the string:  [perl #25249]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=25249 >



This is a bug report for perl from root@proton.i.mono.org,
generated with the help of perlbug 1.34 running under perl v5.8.2.


-----------------------------------------------------------------
perl 5.8.2 on NetBSD/sparc64 (big endian 64 bit) rounds up values greater
than 0.5 in int():

    NetBSD/sparc64 perl: 5.8.1, 5.8.2, 5.8.3, and 5.9.0
	# perl -e 'print int(9.1)," ",int(9.9),"\n";'
	9 10

The correct '9 9' output is generated from 5.6.1 on the same box

5.8.2 on NetBSD/sparc (big endian 32 bit), NetBSD/alpha
(little endian 64 bit) and NetBSD/i386 (little endian 32 bit) all
work correctly.

All compiled under gcc3-3. Initial version compiled via NetBSD's
pkgsrc system, but problem confiremd with vanilla compile with 
./Configure -dse

It may be a specific 64bit big endian issue, or the config for NetBSD/sparc64,
or a gcc3 ism.


-----------------------------------------------------------------
---
Flags:
    category=core
    severity=high
---
Site configuration information for perl v5.8.2:

Configured by root at Sat Jan 24 00:30:04 GMT 2004.

Summary of my perl5 (revision 5.0 version 8 subversion 2) configuration:
  Platform:
    osname=netbsd, osvers=1.6zh, archname=sparc64-netbsd
    uname='netbsd proton 1.6zh netbsd 1.6zh (generic) #1: fri jan 23 15:23:27 gmt 2004 abs@tll.i.purplei.com:varobjsparc64filesnetbsdcurrentsysarchsparc64compilegeneric sparc64 '
    config_args='-sde -Dprefix=/usr/pkg -Dscriptdir=/usr/pkg/bin -Darchname=sparc64-netbsd -Doptimize=-O2 -mcpu=v9  -pipe -Dinstallstyle=lib/perl5 -Ui_malloc -Uusemymalloc -Uinstallusrbinperl -Dman3ext=3 -Dman3dir=/usr/pkg/lib/perl5/5.8.2/man/man3 -Dsiteman3dir=/usr/pkg/lib/perl5/site_perl/man/man3 -Dman1dir=/usr/pkg/man/man1 -Dsiteprefix=/usr/pkg -Dsiteman1dir=/usr/pkg/man/man1 -Dcc=cc -Dlibswanted=m crypt -Duseshrplib'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef
    useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=define use64bitall=define uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cc', ccflags ='-fno-strict-aliasing -I/usr/pkg/include',
    optimize='-O2 -mcpu=v9 -pipe',
    cppflags='-fno-strict-aliasing -I/usr/pkg/include'
    ccversion='', gccversion='3.3.2 (NetBSD nb1 20031026)', gccosandvers=''
    intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=87654321
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
    ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=8, prototype=define
  Linker and Libraries:
    ld='cc', ldflags ='-Wl,-R/usr/pkg/lib  -L/usr/pkg/lib'
    libpth=/usr/pkg/lib /usr/lib
    libs=-lm -lcrypt
    perllibs=-lm -lcrypt
    libc=/lib/libc.so, so=so, useshrplib=true, libperl=libperl.so
    gnulibc_version=''
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E  -Wl,-R/usr/pkg/lib/perl5/5.8.2/sparc64-netbsd/CORE'
    cccdlflags='-DPIC -fPIC ', lddlflags='--whole-archive -shared  -Wl,-R/usr/pkg/lib -L/usr/pkg/lib'

Locally applied patches:
    

---
@INC for perl v5.8.2:
    /usr/pkg/lib/perl5/site_perl/5.8.2/sparc64-netbsd
    /usr/pkg/lib/perl5/site_perl/5.8.2
    /usr/pkg/lib/perl5/site_perl
    /usr/pkg/lib/perl5/5.8.2/sparc64-netbsd
    /usr/pkg/lib/perl5/5.8.2
    .

---
Environment for perl v5.8.2:
    HOME=/root
    LANG (unset)
    LANGUAGE (unset)
    LC_CTYPE=en_GB.ISO8859-1
    LD_LIBRARY_PATH (unset)
    LOGDIR (unset)
    PATH=/usr/local/bin:/usr/bin:/bin:/usr/pkg/bin:/usr/games:/usr/sbin:/sbin:/usr/local/sbin:/usr/pkg/sbin
    PERL_BADLANG (unset)
    SHELL=/bin/tcsh

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About