Skip to content

Instantly share code, notes, and snippets.

@Whateverable
Created August 17, 2021 01:45
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 Whateverable/f1821330f160e6e2596eb70ad88622ad to your computer and use it in GitHub Desktop.
Save Whateverable/f1821330f160e6e2596eb70ad88622ad to your computer and use it in GitHub Desktop.
greppable6
File Code
awwaiid/p6-lrep
…/trystuff-out.txt :11:
EVAL LEXICAL:: $x=5
awwaiid/p6-lrep
…/trystuff-out.txt :18:
EVAL LEXICAL $?FILE/$?LINE:/home/awwaiid/tlt/projects/perl6/lrep/EVAL_4:1
awwaiid/p6-lrep
…/trystuff-out.txt :25:
EVAL LEXICAL callframe file/line:EVAL_7:1
awwaiid/p6-lrep
…/trystuff-out.txt :32:
EVAL LEXICAL callframe(1) file/line:EVAL_10:1
awwaiid/p6-lrep
…/trystuff-out.txt :39:
EVAL LEXICAL callframe(2) file/line:gen/moar/m-CORE.setting:789
awwaiid/p6-lrep
…/trystuff-out.txt :46:
EVAL LEXICAL callframe(3) file/line:./trystuff.p6:53
awwaiid/p6-lrep
…/trystuff.p6 :10:
# say "Lexical keys: {LEXICAL::.keys}";
awwaiid/p6-lrep
…/trystuff.p6 :11:
# say "Lexical keys: {LEXICAL::.keys.perl}";
awwaiid/p6-lrep
…/trystuff.p6 :12:
# say "Lexical keys: {~LEXICAL::.keys}";
awwaiid/p6-lrep
…/trystuff.p6 :15:
my @my_vars = LEXICAL::.keys;
awwaiid/p6-lrep
…/trystuff.p6 :23:
say 'EVAL LEXICAL:: $x=' ~ EVAL('$x', context => LEXICAL::);
awwaiid/p6-lrep
…/trystuff.p6 :29:
say 'EVAL LEXICAL $?FILE/$?LINE:' ~ EVAL('$?FILE ~ ":" ~ $?LINE', context => LEXICAL::);
awwaiid/p6-lrep
…/trystuff.p6 :35:
say 'EVAL LEXICAL callframe file/line:' ~ EVAL('callframe().file ~ ":" ~ callframe().line', context => LEXICAL::);
awwaiid/p6-lrep
…/trystuff.p6 :41:
say 'EVAL LEXICAL callframe(1) file/line:' ~ EVAL('callframe(1).file ~ ":" ~ callframe(1).line', context => LEXICAL::);
awwaiid/p6-lrep
…/trystuff.p6 :47:
say 'EVAL LEXICAL callframe(2) file/line:' ~ EVAL('callframe(2).file ~ ":" ~ callframe(2).line', context => LEXICAL::);
awwaiid/p6-lrep
…/trystuff.p6 :53:
say 'EVAL LEXICAL callframe(3) file/line:' ~ EVAL('callframe(3).file ~ ":" ~ callframe(3).line', context => LEXICAL::);
awwaiid/p6-lrep
…/trystuff.p6 :59:
say 'EVAL LEXICAL callframe(4) file/line:' ~ EVAL('callframe(4).file ~ ":" ~ callframe(4).line', context => LEXICAL::);
perl6/doc
…/packages.pod6 :85:
X«|CALLER (package)»X«|CALLERS (package)»X«|DYNAMIC (package)»X«|OUTER (package)»X«|OUTERS (package)»X«|LEXICAL (package)»X«|UNIT (package)»X«|SETTING (package)»X«|PARENT (package)»X«|CLIENT (package)»
perl6/doc
…/packages.pod6 :95:
LEXICAL Dynamic symbols in my or any outer's lexical scope
spitsh/spitsh
…/Exceptions.pm6 :91:
my $tmp = OUTER::CALLER::LEXICAL::<$/>;
spitsh/spitsh
…/Regex.pm6 :13:
my $tmp = CALLER::LEXICAL::<$/>;
spitsh/spitsh
…/SAST.pm6 :79:
my $tmp = OUTER::CALLER::LEXICAL::<$/>;
spitsh/spitsh
…/SAST.pm6 :270:
# XXX: THIS IS HORRIBLE AND HAS TO DIE ASAP. NEED TO USE LEXICAL ANALYSIS INSTEAD.
spitsh/spitsh
…/SAST.pm6 :304:
my $tmp = CALLER::LEXICAL::<$/>;
spitsh/spitsh
…/SpitDoc.pm6 :7:
my $tmp = OUTER::CALLER::LEXICAL::<$/>;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment