Undo busted change to dynamic compilation. Gets us further.

rakudo · Feb 18, 2012 · 0e2a54e · 0e2a54e
1 parent 4017a66
commit 0e2a54e
Showing 1 changed file with 2 additions and 4 deletions.
diff --git a/src/Perl6/World.pm b/src/Perl6/World.pm
@@ -766,12 +766,10 @@ class Perl6::World is HLL::World {
             }
         };
         my $stub := sub (*@pos, *%named) {
-            if $precomp {
-                $precomp(|@pos, |%named);
-            }
-            else {
+            unless $precomp {
                 $compiler_thunk();
             }
+            $precomp(|@pos, |%named);
         };
         pir::setprop__vPsP($stub, 'COMPILER_THUNK', $compiler_thunk);
         pir::set__vPS($stub, $code_past.name);