[svn:parrot] r34146 - trunk/languages/perl6

Author: pmichaud
Date: Sat Dec 20 06:41:40 2008
New Revision: 34146

Modified:
   trunk/languages/perl6/perl6.pir

Log:
[rakudo]:  Make the unicode versions of hyperops work (e.g., »+«).
This relegates programs containing the french angle brackets to use
utf-8 parsing (slower), but we gain these hyperops and it may lead
to getting french quotes to work.


Modified: trunk/languages/perl6/perl6.pir
==============================================================================
--- trunk/languages/perl6/perl6.pir	(original)
+++ trunk/languages/perl6/perl6.pir	Sat Dec 20 06:41:40 2008
@@ -159,7 +159,7 @@
     .param pmc args_str
 
     $P0 = compreg 'Perl6'
-    $P1 = $P0.'command_line'(args_str, 'encoding'=>'utf8', 'transcode'=>'iso-8859-1')
+    $P1 = $P0.'command_line'(args_str, 'encoding'=>'utf8', 'transcode'=>'ascii')
 
     .include 'iterator.pasm'
     .local pmc iter

• [svn:parrot] r34146 - trunk/languages/perl6 by pmichaud