[perl #61116] test failing in trunk

# New Ticket Created by  (Andreas J. Koenig) 
# Please include the string:  [perl #61116]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=61116 >


---
osname= linux
osvers= 2.6.18-6-xen-amd64
arch=   x86_64-linux-gnu-thread-multi
cc=     cc
---
Flags:
    category=core
    severity=medium
    ack=no
---
This is with SVN rev 33589.

t/op/calling................................NOK 73/98
#   Failed test ' 'foo' => d syntax for parameters'
#   at t/op/calling.t line 1943.
# Exited with error code: 1
# Received:
# error:imcc:syntax error, unexpected STRINGC, expecting IDENTIFIER ('"b"')
#       in file '/home/src/perl/parrot/GIT/parrot/t/op/calling_73.pir' line 9
#
# Expected:
# 10 20
# ok
#
t/op/calling................................NOK 74/98
#   Failed test ' 'foo' => d syntax for target list'
#   at t/op/calling.t line 1968.
# Exited with error code: 1
# Received:
# error:imcc:syntax error, unexpected STRINGC, expecting IDENTIFIER ('"a"')
#       in file '/home/src/perl/parrot/GIT/parrot/t/op/calling_74.pir' line 13
#
# Expected:
# 10 20
# 20 10
# ok
#
t/op/calling................................NOK 75/98
#   Failed test ' 'foo' => d syntax for return'
#   at t/op/calling.t line 1998.
# Exited with error code: 1
# Received:
# error:imcc:syntax error, unexpected STRINGC, expecting IDENTIFIER ('"a"')
#       in file '/home/src/perl/parrot/GIT/parrot/t/op/calling_75.pir' line 13
#
# Expected:
# 10 20
# 20 10
# ok
#
t/op/calling................................NOK 78/98
#   Failed test 'named optional - set'
#   at t/op/calling.t line 2061.
# Exited with error code: 1
# Received:
# error:imcc:syntax error, unexpected STRINGC, expecting IDENTIFIER (''b'')
#       in file '/home/src/perl/parrot/GIT/parrot/t/op/calling_78.pir' line 7
#
# Expected:
# 10 20
# ok
#
t/op/calling................................NOK 82/98
#   Failed test 'param .. 'a' => v :named('foo')'
#   at t/op/calling.t line 2161.
#                   'error:imcc:syntax error, unexpected STRINGC, expecting IDENTIFIER ('"a"')
#       in file '/home/src/perl/parrot/GIT/parrot/t/op/calling_82.pir' line 8
# '
#     doesn't match '/Named parameter with more than one name/
# '
# './parrot -D40 --gc-debug  "/home/src/perl/parrot/GIT/parrot/t/op/calling_82.pir"' failed with exit code 1
# Looks like you failed 5 tests of 98.
t/op/calling................................dubious
        Test returned status 5 (wstat 1280, 0x500)
DIED. FAILED tests 73-75, 78, 82
        Failed 5/98 tests, 94.90% okay


---
Summary of my parrot 0.8.1 (r0) configuration:
  configdate='Sun Dec  7 06:38:11 2008 GMT'
  Platform:
    osname=linux, archname=x86_64-linux-gnu-thread-multi
    jitcapable=0, jitarchname=nojit,
    jitosname=linux, jitcpuarch=amd64
    execcapable=0
    perl=/usr/bin/perl
  Compiler:
    cc='cc', ccflags='-D_REENTRANT -D_GNU_SOURCE -DDEBIAN  -pipe -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -DHASATTRIBUTE_CONST  -DHASATTRIBUTE_DEPRECATED  -DHASATTRIBUTE_MALLOC  -DHASATTRIBUTE_NONNULL  -DHASATTRIBUTE_NORETURN  -DHASATTRIBUTE_PURE  -DHASATTRIBUTE_UNUSED  -DHASATTRIBUTE_WARN_UNUSED_RESULT  -falign-functions=16 -fvisibility=hidden -maccumulate-outgoing-args -W -Wall -Waggregate-return -Wcast-align -Wcast-qual -Wchar-subscripts -Wcomment -Wendif-labels -Wextra -Wformat -Wformat-extra-args -Wformat-nonliteral -Wformat-security -Wformat-y2k -Wimplicit -Wimport -Winit-self -Winline -Winvalid-pch -Wlogical-op -Wmissing-braces -Wmissing-field-initializers -Wno-missing-format-attribute -Wmissing-include-dirs -Wpacked -Wparentheses -Wpointer-arith -Wreturn-type -Wsequence-point -Wno-shadow -Wsign-compare -Wstrict-aliasing -Wstrict-aliasing=2 -Wswitch -Wswitch-default -Wtrigraphs -Wundef -Wunknown-pragmas -Wno-unused -Wvariadic-macros -Wwrite-stri!
 ngs -Wbad-function-cast -Wc++-compat -Wdeclaration-after-statement -Werror=declaration-after-statement -Wimplicit-function-declaration -Wimplicit-int -Wmain -Wmissing-declarations -Wmissing-prototypes -Wnested-externs -Wnonnull -DDISABLE_GC_DEBUG=1 -DNDEBUG -O -DHAS_GETTEXT',
  Linker and Libraries:
    ld='cc', ldflags=' -L/usr/local/lib',
    cc_ldflags='',
    libs='-ldl -lm -lpthread -lcrypt -lrt -lgmp -lreadline -lglut -lGLU -lGL -lcrypto '
  Dynamic Linking:
    share_ext='.so', ld_share_flags='-shared -O2 -g -L/usr/local/lib -fPIC',
    load_ext='.so', ld_load_flags='-shared -O2 -g -L/usr/local/lib -fPIC'
  Types:
    iv=long, intvalsize=8, intsize=4, opcode_t=long, opcode_t_size=8,
    ptrsize=8, ptr_alignment=1 byteorder=12345678, 
    nv=double, numvalsize=8, doublesize=8

---
Environment:
    HOME =/home/sand
    LANG =en_US.UTF-8
    LANGUAGE  (unset)
    LD_LIBRARY_PATH  (unset)
    LOGDIR  (unset)
    PATH =/home/sand/bin:/usr/local/bin:/usr/bin:/bin:/usr/bin/X11:/usr/games:/usr/local/perl/bin:/usr/X11/bin:/sbin:/usr/sbin
    SHELL =/usr/bin/zsh