Fix infinite errors in REPL on Moar.

jnthn · jnthn · commit a6ff29c39327 · 2014-03-21T12:04:36.000+01:00
Maybe on JVM too.
diff --git a/src/HLL/Compiler.nqp b/src/HLL/Compiler.nqp
@@ -84,9 +84,9 @@ class HLL::Compiler does HLL::Backend::Default {
                     $output := self.eval($code, :outer_ctx($save_ctx), |%adverbs);
                     CATCH {
                         self.interactive_exception($!);
-                        next;
                     }
                 };
+                next unless nqp::defined($output);
                 if nqp::defined($*MAIN_CTX) {
                     $save_ctx := $*MAIN_CTX;
                 }

Original file line number	Diff line number	Diff line change
`@@ -84,9 +84,9 @@ class HLL::Compiler does HLL::Backend::Default {`
`84`	`84`	`$output := self.eval($code, :outer_ctx($save_ctx), \|%adverbs);`
`85`	`85`	`CATCH {`
`86`	`86`	`self.interactive_exception($!);`
`87`		`- next;`
`88`	`87`	`}`
`89`	`88`	`};`
	`89`	`+ next unless nqp::defined($output);`
`90`	`90`	`if nqp::defined($*MAIN_CTX) {`
`91`	`91`	`$save_ctx := $*MAIN_CTX;`
`92`	`92`	`}`