From Nick Wellnhofer <wellnhofer@aevum.de>: Remove deprecated charset…

… ops
perl6 · Oct 27, 2010 · d2d1682 · d2d1682
1 parent f59925c
commit d2d1682
Showing 1 changed file with 0 additions and 9 deletions.
diff --git a/src/cheats/hll-compiler.pir b/src/cheats/hll-compiler.pir
@@ -17,15 +17,6 @@
   tcode_loop:
     unless tcode_it goto transcode_done
     tcode = shift tcode_it
-    push_eh tcode_enc
-    $I0 = find_charset tcode
-    $S0 = source
-    $S0 = trans_charset $S0, $I0
-    assign source, $S0
-    pop_eh
-    goto transcode_done
-  tcode_enc:
-    pop_eh
     push_eh tcode_fail
     $I0 = find_encoding tcode
     $S0 = source