fix stupid thinko in Complex math

rakudo · Jul 1, 2011 · 22676c5 · 22676c5
1 parent 70f9c03
commit 22676c5
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/core/Complex.pm b/src/core/Complex.pm
@@ -130,7 +130,7 @@ multi sub infix:<->(Complex \$a, Complex \$b) {
     nqp::bindattr_n( $new, Complex, '$!re',
         nqp::sub_n(
             nqp::getattr_n(pir::perl6_decontainerize__PP($a), Complex, '$!re'),
-            nqp::unbox_n($b.Num)
+            nqp::getattr_n(pir::perl6_decontainerize__PP($b), Complex, '$!re'),
         )
     );
     nqp::bindattr_n($new, Complex, '$!im',