Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tag: Bruxelles
Fetching contributors…

Cannot retrieve contributors at this time

file 23 lines (23 sloc) 0.678 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
augment class Regex {
    multi method ACCEPTS($topic) {
        my $match = $topic.match(self);
        pir::store_dynamic_lex__vSP('$/', $match);
        $match
    }
    multi method ACCEPTS(@topic) {
        my Mu $match = any(@topic).match(self);
        pir::store_dynamic_lex__vSP('$/', $match);
        $match
    }
    multi method ACCEPTS(%topic) {
        my Mu $match = any(%topic.keys).match(self);
        pir::store_dynamic_lex__vSP('$/', $match);
        $match
    }
    method Bool() {
        my $topic = pir::find_dynamic_lex__pS('$_');
        my $match = $topic.match(self);
        pir::store_dynamic_lex__vSP('$/', $match);
        $match.Bool()
    }
}
Something went wrong with that request. Please try again.