Skip to content

Commit

Permalink
Switch "our method" to just plain "method".
Browse files Browse the repository at this point in the history
Not only did it no longer help, it was actually messing up export of the methods in Rakudo.
  • Loading branch information
colomon committed Aug 4, 2013
1 parent 35ccb2b commit 2787937
Show file tree
Hide file tree
Showing 2 changed files with 5 additions and 5 deletions.
2 changes: 1 addition & 1 deletion lib/ABC/Duration.pm
Expand Up @@ -13,7 +13,7 @@ role ABC::Duration {
ABC::Duration.new(:ticks(($top ?? +~$top !! 1).Int / ($bottom ?? +~$bottom !! 2).Int)); ABC::Duration.new(:ticks(($top ?? +~$top !! 1).Int / ($bottom ?? +~$bottom !! 2).Int));
} }


our method duration-to-str() { method duration-to-str() {
given $.ticks { given $.ticks {
when 1 { ""; } when 1 { ""; }
when 1/2 { "/"; } when 1/2 { "/"; }
Expand Down
8 changes: 4 additions & 4 deletions lib/ABC/Header.pm
Expand Up @@ -3,20 +3,20 @@ use v6;
class ABC::Header { class ABC::Header {
has @.lines; # array of Pairs representing each line of the ABC header has @.lines; # array of Pairs representing each line of the ABC header


our method add-line($name, $data) { method add-line($name, $data) {
self.lines.push($name => $data); self.lines.push($name => $data);
} }


our method get($name) { method get($name) {
self.lines.grep({ .key eq $name }); self.lines.grep({ .key eq $name });
} }


our method get-first-value($name) { method get-first-value($name) {
my $pair = self.lines.first({ .key eq $name }); my $pair = self.lines.first({ .key eq $name });
$pair ?? $pair.value !! Any; $pair ?? $pair.value !! Any;
} }


our method is-valid() { method is-valid() {
self.lines.elems > 1 self.lines.elems > 1
&& self.lines[0].key eq "X" && self.lines[0].key eq "X"
&& self.get("T").elems > 0 && self.get("T").elems > 0
Expand Down

0 comments on commit 2787937

Please sign in to comment.