stylistic changes to throwing exceptions

no functional changes
PageOnStage · May 27, 2012 · 5c9c02d · 5c9c02d
1 parent 6555ab1
commit 5c9c02d
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 5 deletions.
diff --git a/src/core/Routine.pm b/src/core/Routine.pm
@@ -89,7 +89,7 @@ my class Routine {
 
     method unwrap($handle) {
         $handle.can('restore') && $handle.restore() ||
-            die(X::Routine::Unwrap.new())
+            X::Routine::Unwrap.new.throw
     }
 
     method yada() {

diff --git a/src/core/Temporal.pm b/src/core/Temporal.pm
@@ -91,11 +91,11 @@ my role Dateish {
     method check-value($val is copy, $name, $range, :$allow-nonint) {
         $val = $allow-nonint ?? +$val !! $val.Int;
         $val ~~ $range
-            or die X::OutOfRange.new(
+            or X::OutOfRange.new(
                         what    => $name,
                         got     => $val,
                         range   => $range,
-                   );
+               ).throw;
     }
 
     method check-date { 

diff --git a/src/core/operators.pm b/src/core/operators.pm
@@ -47,8 +47,7 @@ multi infix:<but>(Mu:D \$obj, Mu:U \$rolish, :$value! is parcel) {
                 $rolish.HOW.archetypes.composalizable() ?? $rolish.HOW.composalize($rolish) !!
                 X::Mixin::NonComposable.new(:target($obj), :$rolish).throw;
     my @attrs = $role.^attributes().grep: { .has_accessor };
-    die(X::Role::Initialization.new())
-        unless @attrs == 1;
+    X::Role::Initialization.new.throw unless @attrs == 1;
     my $mixin-value := $value;
     unless nqp::istype($value, @attrs[0].type) {
         if @attrs[0].type.HOW.HOW.name(@attrs[0].type.HOW) eq 'Perl6::Metamodel::EnumHOW' {