Clean up some places where latin1->utf8 conversion did the wrong thing.

rakudo · May 12, 2009 · fcf5d97 · fcf5d97
1 parent 19490ae
commit fcf5d97
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/src/parser/grammar.pg b/src/parser/grammar.pg
@@ -105,7 +105,7 @@ token unv {
 ##  a set of whitespace.
 
 token afterws {
-    ##  <?{ $Â¢ == $!ws_to != $!ws_from }>
+    ##  <?{ $¢ == $!ws_to != $!ws_from }>
     {{  $P0 = match.'to'()
         $P1 = get_global '$!ws'
         $P2 = $P1.'to'()
@@ -727,7 +727,7 @@ rule enum_declarator {
 
     [
     | <?before '(' > <circumfix> {*}             #= circumfix
-    | <?before '<' | 'Â«' > <quote> {*}          #= quote
+    | <?before '<' | '«' > <quote> {*}          #= quote
     ]
 }
 
@@ -822,7 +822,7 @@ token desigilname {
 }
 
 token special_variable {
-    $<sym>=[ '$/' | '$!' | '$Â¢' ] <!before \w> {*}
+    $<sym>=[ '$/' | '$!' | '$¢' ] <!before \w> {*}
 }
 
 token circumfix {
@@ -897,7 +897,7 @@ token quote {
     | <.before '"' >   <quote_expression: :qq>
     | <.before '<<' >  <quote_expression: :ww :qq>
     | <.before '<' >   <quote_expression: :w :q>
-    # | <.before 'Â«' > <quote_expression: :ww :qq>  FIXME: unicode
+    # | <.before '«' > <quote_expression: :ww :qq>  FIXME: unicode
     | <.before '/'>    <quote_expression: :regex>
     | [m|rx] <.ws> 
         [ [':P5'|':Perl5'] <.ws> <quote_expression: :regex :P5>