Skip to content

Instantly share code, notes, and snippets.

@Mouq
Created August 26, 2013 03:25
Show Gist options
  • Save Mouq/6337874 to your computer and use it in GitHub Desktop.
Save Mouq/6337874 to your computer and use it in GitHub Desktop.
src/core/CallFrame.pm
9: my Mu $interp := pir::getinterp__P;
src/core/control.pm
11: pir::setattribute__vPsP($ex, 'severity', pir::const::EXCEPT_NORMAL);
144: nqp::bindattr($ex, Exception, 'severity', nqp::p6box_i(pir::const::EXCEPT_WARNING));
174: pir::spawnw__IP(
202: pir::spawnw__Is(nqp::unbox_s($cmd)),
src/core/Exception.pm
100: if $type == pir::const::EXCEPTION_METHOD_NOT_FOUND &&
175: pir::perl6_based_rethrow__0PP(nqp::getattr(nqp::decont($!), Exception, '$!ex'), $ex);
235: pir::perl6_invoke_catchhandler__vPP(&print_exception, $ex);
248: pir::perl6_invoke_catchhandler__vPP(&print_control, $ex);
src/core/IO/Socket/INET.pm
95: my str $sep = pir::trans_encoding__SSI(
97: pir::find_encoding__IS($encoding));
src/core/IO/Socket.pm
13: my Mu $bb := pir::new__Ps('ByteBuffer');
14: pir::set__vPs($bb, $r);
42: my Mu $parrot_buf := pir::new__PS('ByteBuffer');
43: pir::set__vPS($parrot_buf, $!PIO.read(nqp::unbox_i($bufsize - nqp::chars($res))));
src/core/IO/Spec.pm
20: my $submodule = %module{ nqp::atkey(nqp::atpos(pir::getinterp__P, pir::const::IGLOBALS_CONFIG_HASH), 'osname') };
src/core/IO.pm
457: my Mu $RSA := pir::new__PS('OS').readdir(nqp::unbox_s($!path));
460: my Str $file := nqp::p6box_s(pir::trans_encoding__Ssi(
462: pir::find_encoding__Is('utf8')));
595: pir::trans_encoding__Ssi(
597: pir::find_encoding__Is('utf8'))
src/core/Mu.pm
648: my str $type = pir::typeof__SP($topic);
src/core/terms.pm
63: nqp::atpos(pir::getinterp__P, pir::const::IGLOBALS_CONFIG_HASH))
153: pir::trans_encoding__Ssi(
155: pir::find_encoding__Is('utf8'))
184: nqp::p6box_s(pir::interpinfo__Si(pir::const::INTERPINFO_EXECUTABLE_FULLNAME));
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment