Use recursion_limit method from HLL:Compiler.

rakudo · Oct 3, 2013 · bd0f19c · bd0f19c
1 parent d7a3ae9
commit bd0f19c
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/src/main.nqp b/src/main.nqp
@@ -27,6 +27,9 @@ my @clo := $comp.commandline_options();
 @clo.push('I=s');
 @clo.push('M=s');
 
+# Bump up recursion limit, for VMs that have one.
+$comp.recursion_limit(100000);
+
 # Set up END block list, which we'll run at exit.
 nqp::bindhllsym('perl6', '@END_PHASERS', []);
 
@@ -35,8 +38,6 @@ nqp::bindhllsym('perl6', '$!ARGITER', 0);
 
 #?if parrot
 sub MAIN(@ARGS) {
-    # Bump up Parrot's recursion limit
-    pir::getinterp__P().recursion_limit(100000);
 #?endif
 #?if !parrot
 sub MAIN(*@ARGS) {

diff --git a/tools/build/NQP_REVISION b/tools/build/NQP_REVISION
@@ -1 +1 @@
-2013.09-90-g0636d3b
+2013.09-91-gd5f157f