# New Ticket Created by  "Patrick R. Michaud" 
# Please include the string:  [perl #43419]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=43419 >


Creating a HLL class with a name of 'Object' results in 
"Class Object already registered!".

    $ cat y.pir
    .HLL "perl6", ""
    
    .namespace
    
    .sub main :main
        # works
        $P0 = new 'Class'
        $P0.'name'('AnObject')
        $S0 = $P0
        say $S0

        # fails    
        $P0 = new 'Class'
        $P0.'name'('Object')
        $S0 = $P0
        say $S0
    .end
    
    $ ./parrot y.pir
    perl6;AnObject
    Class Object already registered!
    current instr.: 'main' pc -1 ((unknown file):-1)
    called from Sub 'main' pc 36 (y.pir:12)
    $

I imagine that this fails for other built-in Parrot classes ('Hash',
'Array', etc.), but I only tested this one.

I'll add the above as a test into t/oo/ (per suggestion from Allison).

Thanks!

Pm

Reply via email to