Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Remove has-substr, it's called substr-eq now
  • Loading branch information
lizmat committed Apr 23, 2015
1 parent ab6c252 commit 3d3bc76
Showing 1 changed file with 0 additions and 9 deletions.
9 changes: 0 additions & 9 deletions src/core/Cool.pm
Expand Up @@ -141,15 +141,6 @@ my class Cool { # declared in BOOTSTRAP
}
method trans(*@a) { self.Str.trans(@a) }

proto method has-substr(|) {*}
multi method has-substr(Cool $needle, Cool $pos = 0) {
?nqp::eqat(
nqp::unbox_s(self.Str),
nqp::unbox_s($needle.Str),
nqp::unbox_i($pos.Int)
);
}

proto method starts-with(|) {*}
multi method starts-with(Str:D: Str(Cool) $needle) {
nqp::p6bool(
Expand Down

0 comments on commit 3d3bc76

Please sign in to comment.