develooper Front page | perl.perl5.porters | Postings from April 2013

Re: Blead on s390x

Thread Previous
From:
H.Merijn Brand
Date:
April 6, 2013 17:16
Subject:
Re: Blead on s390x
Message ID:
20130406191630.251dc616@pc09.procura.nl
On Sat, 6 Apr 2013 10:21:56 +0200, "H.Merijn Brand"
<h.m.brand@xs4all.nl> wrote:

> I got a hercules iso from Henri yesterday on the OpenSUSE 12.3 launch
> party. After converting the iso to something Linux understands (OS/X
> iso's are not recognized as iso), it just took minutes to get it up
> and running under hercules. It is not EBCDIC, but for sure it is
> something different.
> 
> http://www.hercules-390.org/
> The Hercules System/370, ESA/390, and z/Architecture Emulator
> 
> 
> Host:
> Linux 3.4.33-2.24-desktop [openSUSE 12.2 (Mantis)]  x86_64 Xeon(R) CPU
> E5-1650 0 @ 3.20GHz/3201(12) x86_64  16009 Mb hercules-3.07-6.1.6.x86_64
> 
> # hercules -f hercules.cfg
> 
> wait a bit …
> 
> $ ssh test@192.168.4.2
> 
> test@zdolinux:~> uname -a
> Linux zdolinux 3.0.13-0.27-default #1 SMP Wed Feb 15 13:33:49 UTC 2012
> (d73692b) s390x s390x s390x GNU/Linux
> 
> which is a SUSE Linux Enterprise Server 11 SP2  (s390x)
> 
> rsync perl-git from host
> 
> $ cd /perl/perl-git
> $ git clean -dfx
> $ sh ./Configure -Dprefix=/perl -Duse64bitint -des
>  :
>  this takes about 17 minutes
>  :
> $ make -j3
>  :
>  this takes about 45 minutes to fail
> 
> INSTALL#1993 to the resque
> --8<--- (I chose option 2)
> =item error: too few arguments to function 'dbmclose'
> 
> Building ODBM_File on some (Open)SUSE distributions might run into this
> error, as the header file is broken. There are two ways to deal with
> this -->8---
> 
> $ env TEST_JOBS=3 make test_harness
> :
> :
> 
> Test Summary Report
> -------------------
> op/64bitint.t                                                   (Wstat: 0 Tests: 120 Failed: 6)
>   Failed tests:  62, 64, 68, 70, 74, 76

test@zdolinux:/perl/perl-git/t> ./perl harness op/64bitint.t
op/64bitint.t .. # Failed test 62 - at op/64bitint.t line 178
#      got "-9.22337203685478e+18"
# expected == "-1.38350580552822e+19"
# Failed test 64 - at op/64bitint.t line 186
#      got "-9.22337203685478e+18"
# expected == "-1.38350580552822e+19"
# Failed test 68 - at op/64bitint.t line 200
#      got "-9.22337203685478e+18"
# expected == "-1.38350580552822e+19"
# Failed test 70 - at op/64bitint.t line 209
#      got "-9.22337203685478e+18"
# expected == "-1.38350580552822e+19"
# Failed test 74 - at op/64bitint.t line 224
#      got "-9.22337203685478e+18"
# expected == "-1.38350580552822e+19"
# Failed test 76 - at op/64bitint.t line 233
#      got "-9.22337203685478e+18"
# expected == "-1.38350580552822e+19"
op/64bitint.t .. Failed 6/120 subtests

Test Summary Report
-------------------
op/64bitint.t (Wstat: 0 Tests: 120 Failed: 6)
  Failed tests:  62, 64, 68, 70, 74, 76
Files=1, Tests=120,  1 wallclock secs ( 0.59 usr  0.03 sys +  0.65 cusr  0.06 csys =  1.33 CPU)
Result: FAIL

test@zdolinux:/perl/perl-git/t> ./perl harness op/numconvert.t
op/numconvert.t .. # '9.22337e+18' ne '1.84467e+19',    18446744073709551615   => P N N vs P N
# Failed test 15 - at op/numconvert.t line 247
# '1.84467e+19' ne '9.22337e+18',       -1      => U P N vs U N
# '1.84467e+19' ne '9.22337e+18',       18446744073709551615    => U P N vs U N
# Failed test 19 - at op/numconvert.t line 247
# '1.84467e+19' ne '9.22337e+18',       18446744073709551615    => N P N vs N N
# Failed test 27 - at op/numconvert.t line 247
# '9.22337e+18' ne '1.84467e+19',       18446744073709551615    => P u N vs P N
# Failed test 47 - at op/numconvert.t line 247
# '9.22337e+18' ne '1.84467e+19',       18446744073709551615    => P i N vs P N
# Failed test 63 - at op/numconvert.t line 247
# '9.22337e+18' ne '1.84467e+19',       18446744073709551615    => P n N vs P N
# Failed test 79 - at op/numconvert.t line 247
# '9.22337e+18' ne '4.61169e+18',       -9.22337203685478e+18   => U - N N vs U - N
# '9.22337e+18' ne '4.61169e+18',       -9.22337203685478e+18   => U - N N vs U - N
# Failed test 99 - at op/numconvert.t line 247
# '9.22337e+18' ne '4.61169e+18',       -9.22337203685478e+18   => U - P N vs U - N
# '9.22337e+18' ne '4.61169e+18',       -9.22337203685478e+18   => U - P N vs U - N
:
:
:

> op/numconvert.t                                                 (Wstat: 0 Tests: 1444 Failed: 58)
>   Failed tests:  15, 19, 27, 47, 63, 79, 99, 115, 123, 127
>                 211, 307, 311, 315, 319, 559, 563, 571
>                 591, 607, 623, 639, 659, 719, 723, 731
>                 751, 767, 783, 787, 795, 879, 883, 891
>                 911, 927, 943, 959, 1039, 1043, 1051, 1071
>                 1087, 1103, 1119, 1199, 1203, 1211, 1231
>                 1247, 1263, 1279, 1359, 1363, 1371, 1391
>                 1407, 1423
> op/pow.t                                                        (Wstat: 0 Tests: 267 Failed: 1)
>   Failed test:  13
> op/range.t                                                      (Wstat: 0 Tests: 141 Failed: 25)
>   Failed tests:  84-95, 99-111
> op/pack.t                                                       (Wstat: 0 Tests: 14704 Failed: 1)
>   Failed test:  3499
> Files=2384, Tests=609533, 9918 wallclock secs (3032.66 usr 410.75 sys + 20450.90 cusr 3279.60 csys = 27173.91 CPU)
> Result: FAIL
> make: *** [test_harness] Error 91
> 
> 
> Summary of my perl5 (revision 5 version 17 subversion 10) configuration:
>   Commit id: 8fcd75a0901066653077fee994c723f2d3327555
>   Platform:
>     osname=linux, osvers=3.0.13-0.27-default, archname=s390x-linux
>     uname='linux zdolinux 3.0.13-0.27-default #1 smp wed feb 15
> 13:33:49 utc 2012 (d73692b) s390x s390x s390x gnulinux '
> config_args='-Dprefix=/perl -Dusedevel -Duse64bitint -des'
> hint=recommended, useposix=true, d_sigaction=define 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 -pipe -fstack-protector
> -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
> optimize='-O2', cppflags='-fno-strict-aliasing -pipe -fstack-protector
> -I/usr/local/include' ccversion='', gccversion='4.3.4 [gcc-4_3-branch
> revision 152973]', 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 =' -fstack-protector -L/usr/local/lib'
>     libpth=/usr/local/lib /lib/../lib64 /usr/lib/../lib64 /lib /usr/lib /lib64 /usr/lib64 /usr/local/lib64
>     libs=-lnsl -lndbm -lgdbm -ldl -lm -lcrypt -lutil -lc -lgdbm_compat
>     perllibs=-lnsl -ldl -lm -lcrypt -lutil -lc
>     libc=/lib/libc-2.11.3.so, so=so, useshrplib=false, libperl=libperl.a
>     gnulibc_version='2.11.3'
>   Dynamic Linking:
>     dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
>     cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib
> -fstack-protector'
> 
> 
> Characteristics of this binary (from libperl):
>   Compile-time options: HAS_TIMES PERLIO_LAYERS PERL_DONT_CREATE_GVSV
>                         PERL_MALLOC_WRAP PERL_PRESERVE_IVUV
> PERL_SAWAMPERSAND PERL_USE_DEVEL USE_64_BIT_ALL USE_64_BIT_INT
>                         USE_LARGE_FILES USE_LOCALE USE_LOCALE_COLLATE
>                         USE_LOCALE_CTYPE USE_LOCALE_NUMERIC USE_PERLIO
>                         USE_PERL_ATOF
>   Built under linux
>   Compiled at Apr  5 2013 17:02:35
>   @INC:
>     lib
>     /perl/lib/site_perl/5.17.10/s390x-linux
>     /perl/lib/site_perl/5.17.10
>     /perl/lib/5.17.10/s390x-linux
>     /perl/lib/5.17.10
>     .
> 


-- 
H.Merijn Brand  http://tux.nl   Perl Monger  http://amsterdam.pm.org/
using perl5.00307 .. 5.17   porting perl5 on HP-UX, AIX, and openSUSE
http://mirrors.develooper.com/hpux/        http://www.test-smoke.org/
http://qa.perl.org   http://www.goldmark.org/jeff/stupid-disclaimers/

Thread Previous


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