Skip to content

Instantly share code, notes, and snippets.

@samcv

samcv/Str.pm

Created February 1, 2017 10:39
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save samcv/d633ebd66fb5eeda88c71e2492d7217b to your computer and use it in GitHub Desktop.
Save samcv/d633ebd66fb5eeda88c71e2492d7217b to your computer and use it in GitHub Desktop.
Download ZIP
Raw
Str.pm
proto sub infix:<unicmp>(|) is pure { * }
multi sub infix:<unicmp>(Str:D \a, Str:D \b) returns Order:D {
ORDER(
nqp::unicmp_s(
nqp::unbox_s(a), nqp::unbox_s(b), 7,0,0))
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment