From 75ec2248ce2081dd1fdf00084c0a62fbd235975b Mon Sep 17 00:00:00 2001
From: Zoffix Znet <cpan@zoffix.com>
Date: Sun, 23 Sep 2018 23:30:45 +0000
Subject: [PATCH] Add missing decont in Rational.new for ZDRs

---
 src/core/Rational.pm6 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/core/Rational.pm6 b/src/core/Rational.pm6
index 0a33a9b4c1d..da0e55e2d4c 100644
--- a/src/core/Rational.pm6
+++ b/src/core/Rational.pm6
@@ -29,7 +29,7 @@ my role Rational[::NuT = Int, ::DeT = ::("NuT")] does Real {
               nqp::create(self),
               ::?CLASS, '$!denominator', nqp::decont(de)),
             ::?CLASS, '$!numerator',  nqp::box_i(
-              nqp::isgt_I(nu, 0) ?? 1 !! nu ?? -1 !! 0, nu.WHAT)),
+              nqp::isgt_I(nqp::decont(nu), 0) ?? 1 !! nu ?? -1 !! 0, nu.WHAT)),
           nqp::stmts( # normal rational
             (my $gcd := nqp::gcd_I(nqp::decont(nu), nqp::decont(de), Int)),
             (my $nu  := nqp::div_I(nqp::decont(nu), $gcd, NuT)),