From c223b065072357a5ae21e544fb55d2927934d99d Mon Sep 17 00:00:00 2001
From: pmichaud <pmichaud@pobox.com>
Date: Thu, 14 May 2009 16:17:34 -0500
Subject: [PATCH] When reading Perl 6 files, evalfiles needs to assume utf8
 encoding.

---
 src/builtins/eval.pir | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/builtins/eval.pir b/src/builtins/eval.pir
index da4c2ead4d8..1d4bb1e7040 100644
--- a/src/builtins/eval.pir
+++ b/src/builtins/eval.pir
@@ -38,7 +38,8 @@ itself can be found in src/builtins/control.pir.
   lang_compile:
     .local pmc compiler
     compiler = compreg lang
-    .tailcall compiler.'evalfiles'(filename)
+    # XXX FIXME:  We should allow the compiler to choose default encoding/transcode
+    .tailcall compiler.'evalfiles'(filename, 'encoding'=>'utf8', 'transcode'=>'ascii')
 
   lang_parrot:
     ##  load_bytecode currently doesn't accept non-ascii filenames (TT #65)