# New Ticket Created by  Nicholas Clark 
# Please include the string:  [perl #16763]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt2/Ticket/Display.html?id=16763 >


If I build parrot on sparc Linux I see 4 compiler warnings total:

resources.c: In function `compact_pool':
resources.c:270: warning: cast increases required alignment of target type
embed.c: In function `Parrot_readbc':
embed.c:216: warning: cast increases required alignment of target type
headers.c: In function `add_extra_buffer_header':
headers.c:403: warning: cast increases required alignment of target type
dod.c: In function `free_unused_buffers':
dod.c:349: warning: cast increases required alignment of target type

and all the tests bar t/pmc/perlhash.t pass. t/pmc/perlhash.t fails
everything:

t/pmc/perlhash......NOK 1#     Failed test (t/pmc/perlhash.t at line 6)
#          got: ''
#     expected: '1
# 2
# '
t/pmc/perlhash......NOK 2#     Failed test (t/pmc/perlhash.t at line 27)
#          got: ''
#     expected: '1
# 2
# '
t/pmc/perlhash......NOK 3#     Failed test (t/pmc/perlhash.t at line 49)
#          got: ''
#     expected: '1
# 2
# '
t/pmc/perlhash......NOK 4#     Failed test (t/pmc/perlhash.t at line 70)
#          got: ''
#     expected: '1
# 2
# '
t/pmc/perlhash......NOK 5#     Failed test (t/pmc/perlhash.t at line 92)
#          got: ''
#     expected: '1
# 2
# '
t/pmc/perlhash......NOK 6#     Failed test (t/pmc/perlhash.t at line 114)
#          got: ''
#     expected: '1
# 2
# 2
# '
t/pmc/perlhash......NOK 7#     Failed test (t/pmc/perlhash.t at line 143)
#          got: ''
#     expected: '1
# '
t/pmc/perlhash......NOK 8#     Failed test (t/pmc/perlhash.t at line 155)
#          got: ''
#     expected: 'ok 1
# ok 2
# ok 3
# '
t/pmc/perlhash......NOK 9#     Failed test (t/pmc/perlhash.t at line 183)
#          got: ''
#     expected: 'base
# bases
# start
# 199
# 117
# 1
# 23
# 0
# '
t/pmc/perlhash......NOK 10#     Failed test (t/pmc/perlhash.t at line 255)
#          got: ''
#     expected: 'done
# '
t/pmc/perlhash......NOK 11#     Failed test (t/pmc/perlhash.t at line 291)
#          got: ''
#     expected: 'string
# '
t/pmc/perlhash......NOK 12#     Failed test (t/pmc/perlhash.t at line 306)
#          got: ''
#     expected: 'ok 1
# ok 2
# ok 3
# ok 4
# '
t/pmc/perlhash......NOK 13#     Failed test (t/pmc/perlhash.t at line 342)
#          got: ''
#     expected: 'ok 1
# ok 2
# ok 3
# ok 4
# '
t/pmc/perlhash......NOK 14#     Failed test (t/pmc/perlhash.t at line 378)
#          got: ''
#     expected: 'ok 1
# ok 2
# ok 3
# ok 4
# '
t/pmc/perlhash......NOK 15#     Failed test (t/pmc/perlhash.t at line 414)
#          got: ''
#     expected: 'ok 1
# ok 2
# ok 3
# ok 4
# ok 5
# '
# Looks like you failed 15 tests of 15.
t/pmc/perlhash......dubious
        Test returned status 15 (wstat 3840, 0xf00)
Constant subroutine __need_size_t redefined at /usr/lib/perl/5.6.1/stddef.ph line 131.
Use of uninitialized value in eval "string" at /usr/lib/perl/5.6.1/stddef.ph line 131.
Constant subroutine __need_timeval undefined at /usr/lib/perl/5.6.1/bits/time.ph line 
20.
DIED. FAILED tests 1-15
        Failed 15/15 tests, 0.00% okay


Summary output for normal tests is:
Failed Test      Status Wstat Total Fail  Failed  List of Failed
--------------------------------------------------------------------------------
t/pmc/perlhash.t          15  3840    15   15 100.00%  1-15
5 subtests skipped.
Failed 1/26 test scripts, 96.15% okay. 15/433 subtests failed, 96.54% okay.

The JIT compiles, but isn't well:

Failed Test        Status Wstat Total Fail  Failed  List of Failed
--------------------------------------------------------------------------------
t/op/basic.t              15  3840    15   15 100.00%  1-15
t/op/bitwise.t            20  5120    20   20 100.00%  1-20
t/op/debuginfo.t           4  1024     4    4 100.00%  1-4
t/op/gc.t                  5  1280     5    5 100.00%  1-5
t/op/globals.t             1   256     1    1 100.00%  1
t/op/hacks.t               1   256     1    1 100.00%  1
t/op/ifunless.t            6  1536     6    6 100.00%  1-6
t/op/info.t                1   256     1    1 100.00%  1
t/op/integer.t            39  9984    39   39 100.00%  1-39
t/op/interp.t              1   256     1    1 100.00%  1
t/op/lexicals.t            2   512     2    2 100.00%  1-2
t/op/macro.t              12  3072    13   12  92.31%  1-4, 6-13
t/op/number.t             33  8448    33   33 100.00%  1-33
t/op/rx.t                 22  5632    23   22  95.65%  1-22
t/op/stacks.t             34  8704    35   34  97.14%  1-27, 29-35
t/op/string.t             90 23040    90   90 100.00%  1-90
t/op/time.t                4  1024     4    4 100.00%  1-4
t/op/trans.t              18  4608    18   18 100.00%  1-18
t/pmc/array.t              5  1280     5    5 100.00%  1-5
t/pmc/boolean.t            6  1536     6    6 100.00%  1-6
t/pmc/perlarray.t         15  3840    15   15 100.00%  1-15
t/pmc/perlhash.t          15  3840    15   15 100.00%  1-15
t/pmc/perlstring.t         7  1792     8    7  87.50%  1-4, 6-8
t/pmc/pmc.t               67 17152    68   67  98.53%  1-32, 34-68
t/pmc/sub.t                3   768     3    3 100.00%  1-3
5 subtests skipped.
Failed 25/26 test scripts, 3.85% okay. 426/433 subtests failed, 1.62% okay.

I've not included the output (I don't think my screen history goes back
to the start) but it appears that it's producing no output to STDOUT, so
all tests that expected any output are failing.

Making the JIT work isn't important - it's just a heads up.

I'm not really in a position to actually do things interactively on this
sparc box - it's not mine, old, slow, has a nearly full hard disk (the above
was in /var/tmp because that's where space is) and at the end of two low
bandwidth links from here.

$ perl -v

This is perl, v5.6.1 built for sparc-linux

Copyright 1987-2001, Larry Wall

Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on
this system using `man perl' or `perldoc perl'.  If you have access to the
Internet, point your browser at http://www.perl.com/, the Perl Home Page.

perl -V looks like this:

Summary of my perl5 (revision 5.0 version 6 subversion 1) configuration:
  Platform:
    osname=linux, osvers=2.4.18pre2, archname=sparc-linux
    uname='linux vore 2.4.18pre2 #1 wed jan 9 15:09:30 est 2002 sparc unknown '
    config_args='-Dccflags=-DDEBIAN -Dcccdlflags=-fPIC -Darchname=sparc-linux 
-Dprefix=/usr -Dprivlib=/usr/share/perl/5.6.1 -Darchlib=/usr/lib/perl/5.6.1 
-Dvendorprefix=/usr -Dvendorlib=/usr/share/perl5 -Dvendorarch=/usr/lib/perl5 
-Dsiteprefix=/usr/local -Dsitelib=/usr/local/share/perl/5.6.1 
-Dsitearch=/usr/local/lib/perl/5.6.1 -Dman1dir=/usr/share/man/man1 
-Dman3dir=/usr/share/man/man3 -Dman1ext=1 -Dman3ext=3perl 
-Dpager=/usr/bin/sensible-pager -Uafs -Ud_csh -Uusesfio -Duseshrplib 
-Dlibperl=libperl.so.5.6.1 -Dd_dosuid -des'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef
    useperlio=undef d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
  Compiler:
    cc='cc', ccflags ='-DDEBIAN -fno-strict-aliasing -I/usr/local/include 
-D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
    optimize='-O2',
    cppflags='-DDEBIAN -fno-strict-aliasing -I/usr/local/include'
    ccversion='', gccversion='2.95.4  (Debian prerelease)', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=4321
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=8
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=8, usemymalloc=n, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib
    libs=-lgdbm -ldb -ldl -lm -lc -lcrypt
    perllibs=-ldl -lm -lc -lcrypt
    libc=/lib/libc-2.2.4.so, so=so, useshrplib=true, libperl=libperl.so.5.6.1
  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: USE_LARGE_FILES
  Built under linux
  Compiled at Jan 10 2002 22:41:23
  @INC:
    /usr/local/lib/perl/5.6.1
    /usr/local/share/perl/5.6.1
    /usr/lib/perl5
    /usr/share/perl5
    /usr/lib/perl/5.6.1
    /usr/share/perl/5.6.1
    /usr/local/lib/site_perl
    .

Nicholas Clark
-- 
Even better than the real thing:        http://nms-cgi.sourceforge.net/


Reply via email to