Skip to content

Instantly share code, notes, and snippets.

Show Gist options
  • Save zoffixznet/4cf75e2219a80430e58da6f0f5302f0c to your computer and use it in GitHub Desktop.
Save zoffixznet/4cf75e2219a80430e58da6f0f5302f0c to your computer and use it in GitHub Desktop.
zoffix@leliana:/tmp/tmp.lspuZhiy8Z$ tree
.
├── import.p6
├── in-file.p6
└── lib
└── Ops.pm6
1 directory, 3 files
zoffix@leliana:/tmp/tmp.lspuZhiy8Z$ cat lib/Ops.pm6
unit module Ops;
sub infix:['<=»'] is export { $^a < $^b }
zoffix@leliana:/tmp/tmp.lspuZhiy8Z$ cat import.p6
say &[<=»];
zoffix@leliana:/tmp/tmp.lspuZhiy8Z$ cat in-file.p6
sub infix:['<=»'] is export { $^a < $^b }
say &[<=»];
zoffix@leliana:/tmp/tmp.lspuZhiy8Z$ perl6 in-file.p6
sub infix:<\<=»> ($a, $b) { #`(Sub+{Precedence}|49450656) ... }
zoffix@leliana:/tmp/tmp.lspuZhiy8Z$ perl6 -Ilib -MOps import.p6
===SORRY!=== Error while compiling /tmp/tmp.lspuZhiy8Z/import.p6
Unable to parse expression in infix noun; couldn't find final ']'
at /tmp/tmp.lspuZhiy8Z/import.p6:1
------> say &[<=⏏»];
zoffix@leliana:/tmp/tmp.lspuZhiy8Z$
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment