#696: Can't assign an object to Undef.
--------------------+-------------------------------------------------------
 Reporter:  coke    |       Owner:  Whiteknight
     Type:  bug     |      Status:  new        
 Priority:  normal  |   Milestone:             
Component:  none    |     Version:  1.2.0      
 Severity:  medium  |    Keywords:  tcl blocker
     Lang:          |       Patch:             
 Platform:          |  
--------------------+-------------------------------------------------------
 {{{
 .sub main :main
   say "1..2"

   $P0 = new "Undef"
   $P2 = new 'Integer'
   assign $P0, $P2
   say "ok 1"

   $P0 = new "Undef"
   $P1 = newclass "HI"
   $P2 = new $P1
   assign $P0, $P2
   say "ok 2"
 .end
 }}}

 Generates

 {{{
 1..2
 ok 1
 Object must be created by a class.
 current instr.: 'main' pc 22 (foo.pir:14)
 }}}

 partcl used this code in a few places, behavior changed sometime since
 0.9.0 or so.

-- 
Ticket URL: <https://trac.parrot.org/parrot/ticket/696>
Parrot <https://trac.parrot.org/parrot/>
Parrot Development
_______________________________________________
parrot-tickets mailing list
[email protected]
http://lists.parrot.org/mailman/listinfo/parrot-tickets

Reply via email to