fix callframe().line and .file by creating a Perl 6 hash from the ann…

…otations
rakudo · Jun 17, 2010 · d1a7442 · d1a7442
1 parent 012ea2b
commit d1a7442
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/core/CallFrame.pm b/src/core/CallFrame.pm
@@ -4,7 +4,7 @@ class CallFrame {
     method !annotations {
         my $i = $!interp;
         my $l = $!level;
-        Q:PIR {
+        CREATE_HASH_FROM_LOW_LEVEL Q:PIR {
             .local pmc interp
             .local int level