Skip to content

Instantly share code, notes, and snippets.

@niner
Created June 12, 2016 10:30
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save niner/c347b3fcf62a49b981a588d70f9154c7 to your computer and use it in GitHub Desktop.
Save niner/c347b3fcf62a49b981a588d70f9154c7 to your computer and use it in GitHub Desktop.
diff --git a/src/core/CompUnit/PrecompilationRepository.pm b/src/core/CompUnit/PrecompilationRepository.pm
index 8fb1ee4..f911b3e 100644
--- a/src/core/CompUnit/PrecompilationRepository.pm
+++ b/src/core/CompUnit/PrecompilationRepository.pm
@@ -209,7 +209,7 @@ class CompUnit::PrecompilationRepository::Default does CompUnit::PrecompilationR
"--source-name=$source-name",
$path,
:out,
- :err,
+ #:err,
);
%ENV.DELETE-KEY(<RAKUDO_PRECOMP_WITH>);
%ENV.DELETE-KEY(<RAKUDO_PRECOMP_LOADING>);
@@ -219,13 +219,14 @@ class CompUnit::PrecompilationRepository::Default does CompUnit::PrecompilationR
if not $proc.out.close or $proc.status { # something wrong
self.store.unlock;
$RMD("Precomping $path failed: $proc.status()") if $RMD;
- Rakudo::Internals.VERBATIM-EXCEPTION(1);
- die $proc.err.slurp-rest;
+ die @result;
+ #Rakudo::Internals.VERBATIM-EXCEPTION(1);
+ #die $proc.err.slurp-rest;
}
- if $proc.err.slurp-rest -> $warnings {
- $*ERR.print($warnings);
- }
+ #if $proc.err.slurp-rest -> $warnings {
+ # $*ERR.print($warnings);
+ #}
unless $bc.e {
$RMD("$path aborted precompilation without failure") if $RMD;
self.store.unlock;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment