# New Ticket Created by  Will Coleda 
# Please include the string:  [perl #34659]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/rt3/Ticket/Display.html?id=34659 >


In my test bed, I've switched tcl over to using unicode for most of its 
strings, so that the following tcl code:

puts "\u30b3\u30fc\u30d2\u30fc"

Generates the appropriate kana output.

However, this switchover has exposed a problem with some parrot guts. The 
following PIR demonstrates the problem:

.sub main @MAIN
  $S0 = unicode:"borked"
  $P0 = new Integer
  store_global "Joe", $S0, $P0
  print "ok 1\n"
.end

The problem appears to be with using a unicode string as a hash key:

Reply via email to