From f01c50f1a40c485ee8269428391f31c5bf2d4f53 Mon Sep 17 00:00:00 2001 From: Elizabeth Mattijsen Date: Mon, 25 Dec 2017 14:25:38 +0100 Subject: [PATCH] Add Cool candidate for .is-prime As spotted on StackOverflow: https://stackoverflow.com/questions/47962163/is-there-some-difference-between-is-prime-and-is-prime-in-perl-6 --- src/core/Cool.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/core/Cool.pm b/src/core/Cool.pm index 9126686b6f1..3ef80a91e10 100644 --- a/src/core/Cool.pm +++ b/src/core/Cool.pm @@ -35,6 +35,8 @@ my class Cool { # declared in BOOTSTRAP method acotanh() { self.Numeric.acotanh } method cis() { self.Numeric.cis } + method is-prime(--> Bool:D) { self.Int.is-prime } + proto method log(|) {*} multi method log(Cool:D: ) { self.Numeric.log } multi method log(Cool:D: $base) { self.Numeric.log($base.Numeric) }