Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tag: Melbourne
Fetching contributors…

Cannot retrieve contributors at this time

file 16 lines (12 sloc) 0.452 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
augment class Parcel does Positional {
    method Str() { self.flat.Str }

    method elems() { self.flat.elems }

    # Need this method here to avoid ResizablePMCArray.sort from Parrot.
    method sort(&by = &infix:<cmp>) { self.list.sort(&by) }

    method at_pos($pos) { self.flat.[$pos] }

    multi method ACCEPTS($x) {
        self.elems == 0
            ?? $x.notdef || ($x ~~ Positional && $x == 0)
            !! self.Seq.ACCEPTS($x)
    }
}
Something went wrong with that request. Please try again.