Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

in Exception, make sure we have a parrot exception before throwing

  • Loading branch information...
commit 0c51f85bbdf8089a6d2581fa2f30e4fa77d406b0 1 parent 69e9988
@moritz moritz authored
Showing with 3 additions and 0 deletions.
  1. +3 −0  src/core/Exception.pm
View
3  src/core/Exception.pm
@@ -6,6 +6,9 @@ my class Exception {
}
method throw() {
+ nqp::bindattr(self, Exception, '$!ex', pir::new('Exception'))
+ unless pir::defined($!ex);
+ pir::setattribute__vPsP($!ex, 'payload', pir::perl6_decontainerize__PP(self));
pir::throw__0P($!ex)
}
method rethrow() {
Please sign in to comment.
Something went wrong with that request. Please try again.