File nqp-fix-ll-exception.diff of Package nqp

Overview Repositories Revisions Requests Users Attributes Meta

File nqp-fix-ll-exception.diff of Package nqp (Revision 32402539fceeec66ee24f0a3c9ff9fba)

Currently displaying revision 32402539fceeec66ee24f0a3c9ff9fba , Show latest

commit c0abee7953ac7d6f090ccf4a762f6de5fc85ca70
Author: Stefan Seifert <nine@detonation.org>
Date:   Thu Jul 20 20:53:12 2017 +0200

Fix --ll-exception trying to print a NULL
    
    Need to use isnull_s for strings and look for the .message method on the
    exception payload instead of the BOOTException.

diff --git a/src/HLL/Compiler.nqp b/src/HLL/Compiler.nqp
index 6a66368ff..ddcc3e442 100644
--- a/src/HLL/Compiler.nqp
+++ b/src/HLL/Compiler.nqp
@@ -328,8 +328,9 @@ class HLL::Compiler does HLL::Backend::Default {
             if %adverbs<ll-exception> || !nqp::can(self, 'handle-exception') {
                 my $err := stderr();
                 my $message := nqp::getmessage($error);
-                if nqp::isnull($message) && nqp::can($error, 'message') {
-                    $message := $error.message;
+                my $payload := nqp::getpayload($error);
+                if nqp::isnull_s($message) && nqp::can($payload, 'message') {
+                    $message := $payload.message;
                 }
                 $err.say($message);
                 $err.say(nqp::join("\n", nqp::backtracestrings($error)));

Places

File nqp-fix-ll-exception.diff of Package nqp (Revision 32402539fceeec66ee24f0a3c9ff9fba)

Places