| File | Code |
|---|---|
ALOREN/App-FindSource…/fs :158: |
if nqp::lstat(nqp::unbox_s($_), nqp::const::STAT_ISDIR) == 1 { |
ALOREN/App-FindSource…/fs :206: |
$dh := nqp::opendir($path); |
ALOREN/App-FindSource…/fs :215: |
while (my $f = nqp::nextfiledir($dh)) { |
ALOREN/App-FindSource…/fs :219: |
nqp::closedir($dh); |
ALOREN/Getopt-Advance…/find-source.p6 :91: |
if nqp::lstat(nqp::unbox_s($_), nqp::const::STAT_ISDIR) == 1 { |
ALOREN/Getopt-Advance…/find-source.p6 :118: |
my $dh := nqp::opendir($path); |
ALOREN/Getopt-Advance…/find-source.p6 :120: |
while (my $f = nqp::nextfiledir($dh)) { |
ALOREN/Getopt-Advance…/find-source.p6 :124: |
nqp::closedir($dh); |
ALOREN/Getopt-Advance…/xcp.p6 :45: |
sub getFileSize($path) { nqp::stat($path, nqp::const::STAT_FILESIZE); } |
AZAWAWI/SDL2…/shooter.p6 :178: |
my num $last_frame_start = nqp::time_n(); |
AZAWAWI/SDL2…/shooter.p6 :181: |
my num $start = nqp::time_n(); |
AZAWAWI/SDL2…/shooter.p6 :329: |
my @yoffs = ((nqp::time_n() * -100) % H).Int, |
AZAWAWI/SDL2…/shooter.p6 :330: |
((nqp::time_n() * -80) % H).Int, |
AZAWAWI/SDL2…/shooter.p6 :331: |
((nqp::time_n() * -50) % H).Int, |
AZAWAWI/SDL2…/shooter.p6 :332: |
((nqp::time_n() * -15) % H).Int; |
CTILMES/LibGit2…/Callback.pm6 :10: |
nqp::bindattr($sig.params[2], Parameter, '$!sub_signature', |
CTILMES/LibGit2…/Callback.pm6 :12: |
nqp::bindattr(&sprintf, Code, '$!signature', $sig); |
ELIZABETH/Bits…/Bits.pm6 :6: |
my constant $nibble2pos = nqp::list( |
ELIZABETH/Bits…/Bits.pm6 :7: |
nqp::list_i(), # 0 |
ELIZABETH/Bits…/Bits.pm6 :8: |
nqp::list_i(0), # 1 |
ELIZABETH/Bits…/Bits.pm6 :9: |
nqp::list_i(1), # 2 |
ELIZABETH/Bits…/Bits.pm6 :10: |
nqp::list_i(0,1), # 3 |
ELIZABETH/Bits…/Bits.pm6 :11: |
nqp::list_i(2), # 4 |
ELIZABETH/Bits…/Bits.pm6 :12: |
nqp::list_i(0,2), # 5 |
ELIZABETH/Bits…/Bits.pm6 :13: |
nqp::list_i(1,2), # 6 |
ELIZABETH/Bits…/Bits.pm6 :14: |
nqp::list_i(0,1,2), # 7 |
ELIZABETH/Bits…/Bits.pm6 :15: |
nqp::list_i(3), # 8 |
ELIZABETH/Bits…/Bits.pm6 :16: |
nqp::list_i(0,3), # 9 |
ELIZABETH/Bits…/Bits.pm6 :17: |
nqp::list_i(1,3), # 10 |
ELIZABETH/Bits…/Bits.pm6 :18: |
nqp::list_i(0,1,3), # 11 |
ELIZABETH/Bits…/Bits.pm6 :19: |
nqp::list_i(2,3), # 12 |
ELIZABETH/Bits…/Bits.pm6 :20: |
nqp::list_i(0,2,3), # 13 |
ELIZABETH/Bits…/Bits.pm6 :21: |
nqp::list_i(1,2,3), # 14 |
ELIZABETH/Bits…/Bits.pm6 :22: |
nqp::list_i(0,1,2,3) # 15 |
ELIZABETH/Bits…/Bits.pm6 :31: |
my $bitmap := nqp::decont(bitmap); |
ELIZABETH/Bits…/Bits.pm6 :32: |
nqp::if( |
ELIZABETH/Bits…/Bits.pm6 :33: |
$bitmap && nqp::isne_I($bitmap,-1), |
ELIZABETH/Bits…/Bits.pm6 :34: |
nqp::stmts( |
ELIZABETH/Bits…/Bits.pm6 :35: |
($!bitmap := nqp::if( |
ELIZABETH/Bits…/Bits.pm6 :36: |
nqp::islt_I($bitmap,0), |
ELIZABETH/Bits…/Bits.pm6 :37: |
nqp::mul_I(-2,nqp::add_I($bitmap,1,Int),Int), |
ELIZABETH/Bits…/Bits.pm6 :41: |
($!list := nqp::atpos($nibble2pos,0)), |
ELIZABETH/Bits…/Bits.pm6 :47: |
method new(\bitmap) { nqp::create(self)!SET-SELF(bitmap) } |
ELIZABETH/Bits…/Bits.pm6 :50: |
nqp::if( |
ELIZABETH/Bits…/Bits.pm6 :51: |
nqp::elems($!list), |
ELIZABETH/Bits…/Bits.pm6 :52: |
nqp::add_i($!offset,nqp::shift_i($!list)), # value ready |
ELIZABETH/Bits…/Bits.pm6 :53: |
nqp::if( # value NOT ready |
ELIZABETH/Bits…/Bits.pm6 :55: |
nqp::stmts( # not done yet |
ELIZABETH/Bits…/Bits.pm6 :56: |
nqp::while( |
ELIZABETH/Bits…/Bits.pm6 :57: |
$!bitmap && nqp::isfalse( |
ELIZABETH/Bits…/Bits.pm6 :58: |
my int $index = nqp::bitand_I($!bitmap,15,Int) |
ELIZABETH/Bits…/Bits.pm6 :60: |
nqp::stmts( # next nibble |
ELIZABETH/Bits…/Bits.pm6 :62: |
($!bitmap := nqp::bitshiftr_I($!bitmap,4,Int)) |
ELIZABETH/Bits…/Bits.pm6 :65: |
nqp::if( # done searching |
ELIZABETH/Bits…/Bits.pm6 :67: |
nqp::stmts( # found nibble |
ELIZABETH/Bits…/Bits.pm6 :68: |
(my int $pos = nqp::add_i( # convert index |
ELIZABETH/Bits…/Bits.pm6 :69: |
($!offset = nqp::add_i($!offset,4)), # to position by |
ELIZABETH/Bits…/Bits.pm6 :70: |
nqp::shift_i( # fetching value |
ELIZABETH/Bits…/Bits.pm6 :71: |
($!list := nqp::clone( # from the right |
ELIZABETH/Bits…/Bits.pm6 :72: |
nqp::atpos($nibble2pos,$index) # list |
ELIZABETH/Bits…/Bits.pm6 :76: |
($!bitmap := nqp::bitshiftr_I($!bitmap,4,Int)), |
ELIZABETH/Bits…/Bits.pm6 :89: |
nqp::hllbool(bitmap +& (1 +< offset)) |
ELIZABETH/Bits…/Bits.pm6 :97: |
my constant $nibble2bits = nqp::list_i(0,1,1,2,1,2,2,3,1,2,2,3,2,3,3,4); |
ELIZABETH/Bits…/Bits.pm6 :100: |
my $bitmap := nqp::decont(bitmap); |
ELIZABETH/Bits…/Bits.pm6 :101: |
nqp::if( |
ELIZABETH/Bits…/Bits.pm6 :102: |
$bitmap && nqp::isne_I($bitmap,-1), |
ELIZABETH/Bits…/Bits.pm6 :103: |
nqp::stmts( # has significant bits |
ELIZABETH/Bits…/Bits.pm6 :104: |
($bitmap := nqp::if( |
ELIZABETH/Bits…/Bits.pm6 :105: |
nqp::isle_I($bitmap,0), |
ELIZABETH/Bits…/Bits.pm6 :106: |
nqp::mul_I(-2,nqp::add_I($bitmap,1,Int),Int), |
ELIZABETH/Bits…/Bits.pm6 :110: |
nqp::while( |
ELIZABETH/Bits…/Bits.pm6 :112: |
nqp::stmts( |
ELIZABETH/Bits…/Bits.pm6 :113: |
($bits = $bits + nqp::atpos_i( |
ELIZABETH/Bits…/Bits.pm6 :115: |
nqp::bitand_I($bitmap,0x0f,Int) |
ELIZABETH/Bits…/Bits.pm6 :117: |
($bitmap := nqp::bitshiftr_I($bitmap,4,Int)), |
ELIZABETH/Hash-Util…/Util.pm6 :50: |
use nqp; # we need nqp::decont here for some reason |
ELIZABETH/Hash-Util…/Util.pm6 :51: |
$!EXISTS-KEY(self,key) && !(nqp::decont($!AT-KEY(self,key)) =:= HIDDEN) |
ELIZABETH/Hash-Util…/Util.pm6 :132: |
use nqp; # we need nqp::decont here for some reason |
ELIZABETH/Hash-Util…/Util.pm6 :133: |
self.pairs.map({ .key if nqp::decont(.value) =:= HIDDEN }).List |
ELIZABETH/Hash-Util…/Util.pm6 :136: |
use nqp; # we need nqp::decont here for some reason |
ELIZABETH/Hash-Util…/Util.pm6 :137: |
nqp::decont(.value) =:= HIDDEN |
ELIZABETH/P5getpriority…/Changes :6: |
- Replace nqp::getppid by native call to support older Rakudo's |
ELIZABETH/P5getpriority…/Changes :12: |
- We actually have an nqp::getppid, so don't use NativeCall for that |
ELIZABETH/P5opendir…/P5opendir.pm6 :8: |
# This class heavily depends on nqp:: ops, so enable it for the whole class |
ELIZABETH/P5opendir…/P5opendir.pm6 :11: |
# Since the nqp:: ops don't have any support for 'telldir', 'seekdir' or |
ELIZABETH/P5opendir…/P5opendir.pm6 :15: |
my $handle := nqp::opendir($!path); # throws if it didn't work |
ELIZABETH/P5opendir…/P5opendir.pm6 :16: |
nqp::while( |
ELIZABETH/P5opendir…/P5opendir.pm6 :17: |
nqp::chars(my str $next = nqp::nextfiledir($handle)), |
ELIZABETH/P5opendir…/P5opendir.pm6 :18: |
nqp::push_s(@!items,$next) |
ELIZABETH/P5opendir…/P5opendir.pm6 :20: |
nqp::closedir($handle); |
ELIZABETH/P5opendir…/P5opendir.pm6 :27: |
$!index < nqp::elems(@!items) |
ELIZABETH/P5opendir…/P5opendir.pm6 :28: |
?? nqp::atpos_s(@!items,$!index++) |
ELIZABETH/P5opendir…/P5opendir.pm6 :32: |
if $!index < nqp::elems(@!items) { |
ELIZABETH/P5opendir…/P5opendir.pm6 :33: |
my int $index = nqp::elems(@!items); |
ELIZABETH/P5opendir…/P5opendir.pm6 :43: |
$!index = (index max 0) min nqp::elems(@!items) |
ELIZABETH/P5opendir…/P5opendir.pm6 :45: |
method elems() { nqp::elems(@!items) } |
ELIZABETH/P5readlink…/P5readlink.pm6 :11: |
nqp::stat($path,nqp::const::STAT_EXISTS) && nqp::fileislink($path) |
ELIZABETH/P5readlink…/P5readlink.pm6 :12: |
?? nqp::readlink($path) |
ELIZABETH/P5times…/Changes :21: |
- Fix for new API of nqp::getrusage, Zoffix++ |
ELIZABETH/P5times…/P5times.pm6 :8: |
nqp::getrusage(my int @rusage); |
ELIZABETH/P5times…/P5times.pm6 :9: |
nqp::atpos_i(@rusage, nqp::const::RUSAGE_UTIME_SEC) * 1000000 |
ELIZABETH/P5times…/P5times.pm6 :10: |
+ nqp::atpos_i(@rusage, nqp::const::RUSAGE_UTIME_MSEC) |
ELIZABETH/P5times…/P5times.pm6 :14: |
nqp::getrusage(my int @rusage); |
ELIZABETH/P5times…/P5times.pm6 :16: |
nqp::atpos_i(@rusage, nqp::const::RUSAGE_UTIME_SEC) * 1000000 |
ELIZABETH/P5times…/P5times.pm6 :17: |
+ nqp::atpos_i(@rusage, nqp::const::RUSAGE_UTIME_MSEC), |
ELIZABETH/P5times…/P5times.pm6 :18: |
nqp::atpos_i(@rusage, nqp::const::RUSAGE_STIME_SEC) * 1000000 |
ELIZABETH/P5times…/P5times.pm6 :19: |
+ nqp::atpos_i(@rusage, nqp::const::RUSAGE_STIME_MSEC), |
ELIZABETH/Scalar-Util…/Util.pm6 :7: |
nqp::isconcrete(nqp::decont(a)) ?? a.^name !! Nil |
ELIZABETH/Scalar-Util…/Util.pm6 :23: |
nqp::p6bool(nqp::not_i(nqp::iscont(a))) |
ELIZABETH/Scalar-Util…/Util.pm6 :27: |
nqp::where(a) |
ELIZABETH/unprint…/unprint.pm6 :9: |
multi sub print(str $s) { nqp::print($s) } |
ELIZABETH/unprint…/unprint.pm6 :10: |
multi sub print(Str:D $s) { nqp::print($s) } |
ELIZABETH/unprint…/unprint.pm6 :11: |
multi sub print($s) { nqp::print($s.Str) } |
ELIZABETH/unprint…/unprint.pm6 :12: |
multi sub print(*@s) { nqp::print(@s.join) } |
ELIZABETH/unprint…/unprint.pm6 :15: |
multi sub say(str $s) { nqp::say($s) } |
ELIZABETH/unprint…/unprint.pm6 :16: |
multi sub say(Str:D $s) { nqp::say($s) } |
ELIZABETH/unprint…/unprint.pm6 :17: |
multi sub say($s) { nqp::say($s.gist) } |
ELIZABETH/unprint…/unprint.pm6 :18: |
multi sub say(*@s) { nqp::say(@s>>.gist.join) } |
ELIZABETH/unprint…/unprint.pm6 :21: |
multi sub put(str $s) { nqp::say($s) } |
ELIZABETH/unprint…/unprint.pm6 :22: |
multi sub put(Str:D $s) { nqp::say($s) } |
ELIZABETH/unprint…/unprint.pm6 :23: |
multi sub put($s) { nqp::say($s.Str) } |
ELIZABETH/unprint…/unprint.pm6 :24: |
multi sub put(*@s) { nqp::say(@s.join) } |
FCO/Red…/Dirtable.pm6 :61: |
#nqp::bindattr(nqp::decont(instance), self.WHAT, col.name, proxy); |
FCO/Red…/Model.pm6 :208: |
nqp::getattr(self, self.WHAT, $attr.name) |
FCO/Red…/Relationship.pm6 :76: |
nqp::getattr(self, self.WHAT, $attr.name) |
FCO/Red…/Relationship.pm6 :46: |
nqp::bindattr(nqp::decont(instance), $.package, $.name, Proxy.new: |
HMBRAND/Text-CSV…/csv_gram.pl :52: |
#say nqp::objectid($!gram); |
JGOFF/Perl6-Parser…/Parser.pm6 :543: |
my $compiler := nqp::getcomp('perl6'); |
JGOFF/Perl6-Parser…/Parser.pm6 :544: |
my $g := nqp::findmethod( |
JGOFF/Perl6-Parser…/Parser.pm6 :548: |
my $a := nqp::findmethod( |
JGOFF/Perl6-Parser…/Factory.pm6 :6872: |
# nqp::op |
JGOFF/Perl6-Parser…/Factory.pm6 :6873: |
# nqp::const |
JSTOWE/IO-Path-Mode…/Mode.pm :231: |
my Int $mode = nqp::p6box_i(nqp::lstat(nqp::unbox_s($file), nqp::const::STAT_PLATFORM_MODE)); |
JSTOWE/Linux-Fuser…/Fuser.pm :65: |
$!inode = nqp::p6box_i(nqp::stat(nqp::unbox_s(self.Str), nqp::const::STAT_PLATFORM_INODE)); |
JSTOWE/Linux-Fuser…/Fuser.pm :76: |
$!device = nqp::p6box_i(nqp::stat(nqp::unbox_s(self.Str), nqp::const::STAT_PLATFORM_DEV)); |
JSTOWE/Linux-Fuser…/Procinfo.pm :73: |
nqp::p6box_i(nqp::stat(nqp::unbox_s($!fd-file.Str), nqp::const::STAT_UID)); |
KAJI/App-Platform…/99-setup.t :26: |
title => "Project " ~ nqp::getstrfromname($animal.uc), |
KAJI/App-Platform…/author-02-project.t :25: |
title => "Project " ~ nqp::getstrfromname($animal.uc), |
KAJI/App-Platform…/author-03-environment.t :25: |
title => "Project " ~ nqp::getstrfromname($animal.uc), |
LEONT/Path-Finder…/Finder.pm :181: |
return nqp::stat(nqp::unbox_s($item.absolute), $field) ~~ $matcher; |
LEONT/Path-Finder…/Finder.pm :186: |
self.and: stat-check(nqp::const::STAT_PLATFORM_INODE, $inode); |
LEONT/Path-Finder…/Finder.pm :189: |
self.and: stat-check(nqp::const::STAT_PLATFORM_DEV, $device); |
LEONT/Path-Finder…/Finder.pm :192: |
self.and: stat-check(nqp::const::STAT_PLATFORM_NLINKS, $nlinks); |
LEONT/Path-Finder…/Finder.pm :195: |
self.and: stat-check(nqp::const::STAT_UID, $uid); |
LEONT/Path-Finder…/Finder.pm :198: |
self.and: stat-check(nqp::const::STAT_GID, $gid); |
LEONT/Path-Finder…/Finder.pm :201: |
self.and: stat-check(nqp::const::STAT_ISDEV, +$value); |
LEONT/Path-Finder…/Finder.pm :204: |
self.and: stat-check(nqp::const::STAT_PLATFORM_BLOCKS, $blocks); |
LEONT/Path-Finder…/Finder.pm :207: |
self.and: stat-check(nqp::const::STAT_PLATFORM_BLOCKSIZE, $blocksize); |
LEONT/Path-Finder…/Finder.pm :358: |
my $inode = nqp::stat(nqp::unbox_s($item.absolute), nqp::const::STAT_PLATFORM_INODE); |
LEONT/Path-Finder…/Finder.pm :359: |
my $device = nqp::stat(nqp::unbox_s($item.absolute), nqp::const::STAT_PLATFORM_DEV); |
NINE/Inline-Perl5…/Perl5.pm6 :316: |
nqp::p6bindattrinvres($class.CREATE, $class, '$!wrapped-perl5-object', value) |
NINE/Inline-Perl5…/ClassHOW.pm6 :66: |
nqp::bindattr(self, $?CLASS, '%!attribute_lookup', nqp::hash()); |
NINE/Inline-Perl5…/ClassHOW.pm6 :67: |
nqp::bindattr(self, $?CLASS, '@!attributes', nqp::list()); |
NINE/Inline-Perl5…/ClassHOW.pm6 :87: |
nqp::bindattr(self, $?CLASS, '$!composed_repr', nqp::unbox_i(1)); |
NINE/Inline-Perl5…/ClassHOW.pm6 :107: |
my Mu \result := nqp::create(NQPHash); |
NINE/Inline-Perl5…/ClassHOW.pm6 :109: |
nqp::bindkey(result, $_.key, nqp::decont($_.value)); |
NINE/Inline-Perl5…/ClassHOW.pm6 :116: |
nqp::hash() |
NINE/Inline-Perl5…/ClassHOW.pm6 :151: |
nqp::scwbdisable(); |
NINE/Inline-Perl5…/ClassHOW.pm6 :152: |
nqp::bindattr(SELF, Routine, '$!dispatch_cache', |
NINE/Inline-Perl5…/ClassHOW.pm6 :153: |
nqp::multicacheadd( |
NINE/Inline-Perl5…/ClassHOW.pm6 :154: |
nqp::getattr(SELF, Routine, '$!dispatch_cache'), |
NINE/Inline-Perl5…/ClassHOW.pm6 :156: |
nqp::scwbenable(); |
NINE/Inline-Perl5…/ClassHOW.pm6 :159: |
my $arity = nqp::captureposelems(capture); |
NINE/Inline-Perl5…/ClassHOW.pm6 :161: |
nqp::capturenamedshash(capture) || !nqp::captureposarg(capture, 0).defined |
NINE/Inline-Perl5…/ClassHOW.pm6 :162: |
?? $arity < 2 || nqp::captureposarg(capture, 1) !=== Scalar |
NINE/Inline-Perl5…/ClassHOW.pm6 :163: |
?? nqp::getattr(SELF, SELF.WHAT, '&!many-args') |
NINE/Inline-Perl5…/ClassHOW.pm6 :164: |
!! nqp::getattr(SELF, SELF.WHAT, '&!scalar-many-args') |
NINE/Inline-Perl5…/ClassHOW.pm6 :166: |
?? nqp::getattr(SELF, SELF.WHAT, '&!no-args') |
NINE/Inline-Perl5…/ClassHOW.pm6 :167: |
!! $arity == 2 && !(nqp::captureposarg(capture, 1) ~~ Pair) |
NINE/Inline-Perl5…/ClassHOW.pm6 :168: |
?? nqp::captureposarg(capture, 1) === Scalar |
NINE/Inline-Perl5…/ClassHOW.pm6 :169: |
?? nqp::getattr(SELF, SELF.WHAT, '&!scalar-no-args') |
NINE/Inline-Perl5…/ClassHOW.pm6 :170: |
!! nqp::getattr(SELF, SELF.WHAT, '&!one-arg') |
NINE/Inline-Perl5…/ClassHOW.pm6 :171: |
!! $arity == 3 && nqp::captureposarg(capture, 1) === Scalar |
NINE/Inline-Perl5…/ClassHOW.pm6 :172: |
?? nqp::getattr(SELF, SELF.WHAT, '&!scalar-one-arg') |
NINE/Inline-Perl5…/ClassHOW.pm6 :173: |
!! nqp::captureposarg(capture, 1) === Scalar |
NINE/Inline-Perl5…/ClassHOW.pm6 :174: |
?? nqp::getattr(SELF, SELF.WHAT, '&!scalar-many-args') |
NINE/Inline-Perl5…/ClassHOW.pm6 :175: |
!! nqp::getattr(SELF, SELF.WHAT, '&!many-args') |
NINE/Inline-Perl5…/ClassHOW.pm6 :182: |
nqp::capturenamedshash(capture) || !nqp::captureposarg(capture, 0).defined |
NINE/Inline-Perl5…/ClassHOW.pm6 :183: |
?? nqp::getattr(SELF, SELF.WHAT, '&!many-args') |
NINE/Inline-Perl5…/ClassHOW.pm6 :184: |
!! nqp::captureposelems(capture) == 1 |
NINE/Inline-Perl5…/ClassHOW.pm6 :185: |
?? nqp::getattr(SELF, SELF.WHAT, '&!no-args') |
NINE/Inline-Perl5…/ClassHOW.pm6 :186: |
!! nqp::captureposelems(capture) == 2 && !(nqp::captureposarg(capture, 1) ~~ Pair) |
NINE/Inline-Perl5…/ClassHOW.pm6 :187: |
?? nqp::getattr(SELF, SELF.WHAT, '&!one-arg') |
NINE/Inline-Perl5…/ClassHOW.pm6 :188: |
!! nqp::getattr(SELF, SELF.WHAT, '&!many-args') |
NINE/Inline-Perl5…/ClassHOW.pm6 :191: |
&find_best_dispatchee //= -> \SELF, Mu \capture { use nqp; nqp::getattr(SELF, SELF.WHAT, '&!many-args') }; |
NINE/Inline-Perl5…/ClassHOW.pm6 :309: |
for nqp::hllize(@!attributes) { |
NINE/Inline-Perl5…/ClassHOW.pm6 :318: |
method push(Mu \value) { nqp::push(self, nqp::decont(value)) } |
NINE/Inline-Perl5…/ClassHOW.pm6 :319: |
method pop() { nqp::pop(self) } |
NINE/Inline-Perl5…/ClassHOW.pm6 :320: |
method unshift(Mu \value) { nqp::unshift(self, nqp::decont(value)) } |
NINE/Inline-Perl5…/ClassHOW.pm6 :321: |
method shift() { nqp::shift(self) } |
NINE/Inline-Perl5…/ClassHOW.pm6 :324: |
nqp::bindattr(list, List, '$!reified', self); |
NINE/Inline-Perl5…/ClassHOW.pm6 :328: |
nqp::bindattr(self, $?CLASS, '@!mro', nqp::create(NQPArray)); |
NINE/Inline-Perl5…/ClassHOW.pm6 :329: |
nqp::bindpos(@!mro, 0, nqp::decont(obj)); |
NINE/Inline-Perl5…/ClassHOW.pm6 :331: |
nqp::push(@!mro, nqp::decont($_)); |
NINE/Inline-Perl5…/p6_object_destructor.t :31: |
nqp::force_gc; |
NINE/Inline-Perl5…/v6.t :44: |
nqp::force_gc; |
TIMOTIMO/JSON-Fast…/README.md :6: |
a naive imperative json parser in pure perl6 (but with direct access to `nqp::` ops), to evaluate performance against `JSON::Tiny`. It is a drop-in replacement for `JSON::Tiny`'s from-json and to-json subs, but it offers a few extra features. |
TIMOTIMO/JSON-Fast…/Fast.pm :4: |
a naive imperative json parser in pure perl6 (but with direct access to C<nqp::> ops), to evaluate performance against C<JSON::Tiny>. It is a drop-in replacement for C<JSON::Tiny>'s from-json and to-json subs, but it offers a few extra features. |
TIMOTIMO/JSON-Fast…/Fast.pm :62: |
to-surrogate-pair(nqp::ordat($input, 0)); |
TIMOTIMO/JSON-Fast…/Fast.pm :73: |
} elsif nqp::ordat($str, 0) == 92 { |
TIMOTIMO/JSON-Fast…/Fast.pm :186: |
nqp::handle( |
TIMOTIMO/JSON-Fast…/Fast.pm :187: |
nqp::while(1, |
TIMOTIMO/JSON-Fast…/Fast.pm :188: |
nqp::stmts( |
TIMOTIMO/JSON-Fast…/Fast.pm :189: |
($wsord = nqp::ordat($text, $pos)), |
TIMOTIMO/JSON-Fast…/Fast.pm :198: |
my str $combinerstuff = nqp::substr($text, $pos, 1); |
TIMOTIMO/JSON-Fast…/Fast.pm :209: |
my Mu $hexdigits := nqp::hash( |
TIMOTIMO/JSON-Fast…/Fast.pm :214: |
my Mu $escapees := nqp::hash( |
TIMOTIMO/JSON-Fast…/Fast.pm :221: |
my int $textlength = nqp::chars($text); |
TIMOTIMO/JSON-Fast…/Fast.pm :228: |
my Mu $escape_counts := nqp::hash(); |
TIMOTIMO/JSON-Fast…/Fast.pm :230: |
unless nqp::eqat($text, '"', $startpos - 1) { |
TIMOTIMO/JSON-Fast…/Fast.pm :235: |
$ord = nqp::ordat($text, $pos); |
TIMOTIMO/JSON-Fast…/Fast.pm :242: |
if nqp::eqat($text, '"', $pos - 1) { |
TIMOTIMO/JSON-Fast…/Fast.pm :246: |
if nqp::eqat($text, '"', $pos) or nqp::eqat($text, '\\', $pos) or nqp::eqat($text, 'b', $pos) |
TIMOTIMO/JSON-Fast…/Fast.pm :247: |
or nqp::eqat($text, 'f', $pos) or nqp::eqat($text, 'n', $pos) or nqp::eqat($text, 'r', $pos) |
TIMOTIMO/JSON-Fast…/Fast.pm :248: |
or nqp::eqat($text, 't', $pos) or nqp::eqat($text, '/', $pos) { |
TIMOTIMO/JSON-Fast…/Fast.pm :249: |
my str $character = nqp::substr($text, $pos, 1); |
TIMOTIMO/JSON-Fast…/Fast.pm :250: |
if nqp::existskey($escape_counts, $character) { |
TIMOTIMO/JSON-Fast…/Fast.pm :251: |
nqp::bindkey($escape_counts, $character, nqp::atkey($escape_counts, $character) + 1); |
TIMOTIMO/JSON-Fast…/Fast.pm :253: |
nqp::bindkey($escape_counts, $character, 1); |
TIMOTIMO/JSON-Fast…/Fast.pm :256: |
} elsif nqp::eqat($text, 'u', $pos) { |
TIMOTIMO/JSON-Fast…/Fast.pm :259: |
if nqp::existskey($hexdigits, nqp::ordat($text, $pos + 1)) |
TIMOTIMO/JSON-Fast…/Fast.pm :260: |
and nqp::existskey($hexdigits, nqp::ordat($text, $pos + 2)) |
TIMOTIMO/JSON-Fast…/Fast.pm :261: |
and nqp::existskey($hexdigits, nqp::ordat($text, $pos + 3)) |
TIMOTIMO/JSON-Fast…/Fast.pm :262: |
and nqp::existskey($hexdigits, nqp::ordat($text, $pos + 4)) { |
TIMOTIMO/JSON-Fast…/Fast.pm :265: |
die "expected hexadecimals after \\u, but got \"{ nqp::substr($text, $pos - 1, 6) }\" at $pos"; |
TIMOTIMO/JSON-Fast…/Fast.pm :268: |
if nqp::eqat($text, '\u', $pos) { |
TIMOTIMO/JSON-Fast…/Fast.pm :275: |
} elsif nqp::existskey($escapees, nqp::ordat($text, $pos)) { |
TIMOTIMO/JSON-Fast…/Fast.pm :278: |
$treacherous := nqp::hash() unless $treacherous; |
TIMOTIMO/JSON-Fast…/Fast.pm :279: |
my int $treach_ord = nqp::ordat($text, $pos); |
TIMOTIMO/JSON-Fast…/Fast.pm :280: |
if nqp::existskey($treacherous, $treach_ord) { |
TIMOTIMO/JSON-Fast…/Fast.pm :281: |
nqp::bindkey($treacherous, $treach_ord, nqp::atkey($treacherous, $treach_ord) + 1) |
TIMOTIMO/JSON-Fast…/Fast.pm :283: |
nqp::bindkey($treacherous, $treach_ord, 1) |
TIMOTIMO/JSON-Fast…/Fast.pm :287: |
die "don't understand escape sequence '\\{ nqp::substr($text, $pos, 1) }' at $pos"; |
TIMOTIMO/JSON-Fast…/Fast.pm :290: |
die "this kind of whitespace is not allowed in a string: { nqp::substr($text, $pos - 1, 1).perl } at {$pos - 1}"; |
TIMOTIMO/JSON-Fast…/Fast.pm :296: |
my str $raw = nqp::substr($text, $startpos, $endpos - $startpos); |
TIMOTIMO/JSON-Fast…/Fast.pm :303: |
if nqp::existskey($escape_counts, "n") and nqp::existskey($escape_counts, "r") { |
TIMOTIMO/JSON-Fast…/Fast.pm :306: |
if nqp::existskey($escape_counts, "n") { |
TIMOTIMO/JSON-Fast…/Fast.pm :309: |
if nqp::existskey($escape_counts, "r") { |
TIMOTIMO/JSON-Fast…/Fast.pm :312: |
if nqp::existskey($escape_counts, "t") { |
TIMOTIMO/JSON-Fast…/Fast.pm :315: |
if nqp::existskey($escape_counts, '"') { |
TIMOTIMO/JSON-Fast…/Fast.pm :318: |
if nqp::existskey($escape_counts, "/") { |
TIMOTIMO/JSON-Fast…/Fast.pm :321: |
if nqp::existskey($escape_counts, "\\") { |
TIMOTIMO/JSON-Fast…/Fast.pm :325: |
} elsif $has_hexcodes or nqp::elems($escape_counts) { |
TIMOTIMO/JSON-Fast…/Fast.pm :332: |
if my $lastchar = nqp::chr(nqp::ord(@caps.tail)) ne @caps.tail { |
TIMOTIMO/JSON-Fast…/Fast.pm :348: |
if nqp::existskey($escapees, nqp::ordat($0.Str, 0)) { |
TIMOTIMO/JSON-Fast…/Fast.pm :349: |
my str $replacement = nqp::atkey($escapees, nqp::ordat($0.Str, 0)); |
TIMOTIMO/JSON-Fast…/Fast.pm :352: |
die "stumbled over unexpected escape code \\{ chr(nqp::ordat($0.Str, 0)) } at { $startpos + $/.from }"; |
TIMOTIMO/JSON-Fast…/Fast.pm :366: |
$pos = $pos + 1 while nqp::iscclass(nqp::const::CCLASS_NUMERIC, $text, $pos); |
TIMOTIMO/JSON-Fast…/Fast.pm :368: |
my $residual := nqp::substr($text, $pos, 1); |
TIMOTIMO/JSON-Fast…/Fast.pm :373: |
$pos = $pos + 1 while nqp::iscclass(nqp::const::CCLASS_NUMERIC, $text, $pos); |
TIMOTIMO/JSON-Fast…/Fast.pm :375: |
$residual := nqp::substr($text, $pos, 1); |
TIMOTIMO/JSON-Fast…/Fast.pm :381: |
if nqp::eqat($text, '-', $pos) || nqp::eqat($text, '+', $pos) { |
TIMOTIMO/JSON-Fast…/Fast.pm :385: |
$pos = $pos + 1 while nqp::iscclass(nqp::const::CCLASS_NUMERIC, $text, $pos); |
TIMOTIMO/JSON-Fast…/Fast.pm :388: |
+(my $result := nqp::substr($text, $startpos - 1, $pos - $startpos + 1)) // die "at $pos: invalid number token $result.perl()"; |
TIMOTIMO/JSON-Fast…/Fast.pm :399: |
if nqp::eqat($text, '}', $pos) { |
TIMOTIMO/JSON-Fast…/Fast.pm :412: |
if nqp::ordat($text, $pos) == 34 { # " |
TIMOTIMO/JSON-Fast…/Fast.pm :416: |
die "at end of string: expected a quoted string for an object key" if $pos == nqp::chars($text); |
TIMOTIMO/JSON-Fast…/Fast.pm :422: |
#my str $partitioner = nqp::substr($text, $pos, 1); |
TIMOTIMO/JSON-Fast…/Fast.pm :424: |
if nqp::eqat($text, ':', $pos) and !($key.DEFINITE or $value.DEFINITE) { |
TIMOTIMO/JSON-Fast…/Fast.pm :426: |
} elsif nqp::eqat($text, ',', $pos) and $key.DEFINITE and not $value.DEFINITE { |
TIMOTIMO/JSON-Fast…/Fast.pm :433: |
} elsif nqp::eqat($text, '}', $pos) and $key.DEFINITE and not $value.DEFINITE { |
TIMOTIMO/JSON-Fast…/Fast.pm :440: |
die "at end of string: unexpected end of object." if $pos == nqp::chars($text); |
TIMOTIMO/JSON-Fast…/Fast.pm :441: |
die "unexpected { nqp::substr($text, $pos, 1) } in an object at $pos"; |
TIMOTIMO/JSON-Fast…/Fast.pm :456: |
if nqp::eqat($text, ']', $pos) { |
TIMOTIMO/JSON-Fast…/Fast.pm :466: |
$partitioner = nqp::substr($text, $pos, 1); |
TIMOTIMO/JSON-Fast…/Fast.pm :485: |
my str $initial = nqp::substr($text, $pos, 1); |
TIMOTIMO/JSON-Fast…/Fast.pm :495: |
} elsif nqp::iscclass(nqp::const::CCLASS_NUMERIC, $initial, 0) || $initial eq '-' { |
TIMOTIMO/JSON-Fast…/Fast.pm :498: |
if nqp::eqat($text, 'ull', $pos) { |
TIMOTIMO/JSON-Fast…/Fast.pm :502: |
die "at $pos: i was expecting a 'null' but there wasn't one: { nqp::substr($text, $pos - 1, 10) }" |
TIMOTIMO/JSON-Fast…/Fast.pm :505: |
if nqp::eqat($text, 'rue', $pos) { |
TIMOTIMO/JSON-Fast…/Fast.pm :509: |
die "at $pos: expected 'true', found { $initial ~ nqp::substr($text, $pos, 3) } instead."; |
TIMOTIMO/JSON-Fast…/Fast.pm :512: |
if nqp::eqat($text, 'alse', $pos) { |
TIMOTIMO/JSON-Fast…/Fast.pm :516: |
die "at $pos: expected 'false', found { $initial ~ nqp::substr($text, $pos, 4) } instead."; |
TIMOTIMO/JSON-Fast…/Fast.pm :519: |
my str $rest = nqp::substr($text, $pos - 1, 8).perl; |
TIMOTIMO/JSON-Fast…/Fast.pm :534: |
if $pos != nqp::chars($text) { |
TIMOTIMO/SDL2-Raw…/particles.p6 :95: |
my $start = nqp::time_n(); |
TIMOTIMO/SDL2-Raw…/particles.p6 :111: |
@times.push: nqp::time_n() - $start; |
TIMOTIMO/SDL2-Raw…/particles.p6 :112: |
$df = nqp::time_n() - $start; |
TIMOTIMO/SDL2-Raw…/shooter.pl :162: |
my num $last_frame_start = nqp::time_n(); |
TIMOTIMO/SDL2-Raw…/shooter.pl :165: |
my num $start = nqp::time_n(); |
TIMOTIMO/SDL2-Raw…/shooter.pl :313: |
my @yoffs = ((nqp::time_n() * -100) % H).Int, |
TIMOTIMO/SDL2-Raw…/shooter.pl :314: |
((nqp::time_n() * -80) % H).Int, |
TIMOTIMO/SDL2-Raw…/shooter.pl :315: |
((nqp::time_n() * -50) % H).Int, |
TIMOTIMO/SDL2-Raw…/shooter.pl :316: |
((nqp::time_n() * -15) % H).Int; |
TIMOTIMO/SDL2-Raw…/shooter.pl :347: |
nqp::force_gc() if 3.rand < 1; |
TIMOTIMO/SDL2-Raw…/shooter.pl :348: |
@times.push: nqp::time_n() - $start; |
TIMOTIMO/SDL2-Raw…/snake.pl :55: |
my num $start = nqp::time_n(); |
TIMOTIMO/SDL2-Raw…/snake.pl :76: |
my num $last_frame_start = nqp::time_n(); |
TIMOTIMO/SDL2-Raw…/snake.pl :78: |
my num $start = nqp::time_n(); |
TIMOTIMO/SDL2-Raw…/snake.pl :164: |
nqp::force_gc() if 5.rand < 1; |
TIMOTIMO/SDL2-Raw…/snake.pl :166: |
@times.push: nqp::time_n() - $start; |
TIMOTIMO/SDL2-Raw…/white_noise.p6 :69: |
my $start = nqp::time_n(); |
TIMOTIMO/SDL2-Raw…/white_noise.p6 :83: |
@times.push: nqp::time_n() - $start; |
TITSUKI/Random-Choice…/Choice.pm6 :14: |
my num @np = @p.map(-> $x { nqp::mul_n(nqp::div_n(Num($x),$total), $!n) }); |
UGEXE/zef…/Distribution.pm6 :37: |
return nqp::sha1(self.Str); |
VRURG/AttrX-Mooish…/Mooish.pm6 :535: |
my $v := nqp::create(Scalar); |
VRURG/AttrX-Mooish…/Mooish.pm6 :536: |
nqp::bindattr($v, Scalar, '$!descriptor', |
VRURG/AttrX-Mooish…/Mooish.pm6 :537: |
nqp::getattr(nqp::decont($attr), Attribute, '$!container_descriptor') |
VRURG/AttrX-Mooish…/Mooish.pm6 :553: |
my &m := nqp::clone($attr.auto_viv_container.VAR); |
VRURG/AttrX-Mooish…/Mooish.pm6 :612: |
$alias, nqp::decont(type), $.name, nqp::decont( $.type ), $.rw ?? 1 !! 0 |
VRURG/AttrX-Mooish…/Mooish.pm6 :671: |
nqp::bindattr(nqp::decont(instance), $.package, $.name, |
VRURG/AttrX-Mooish…/Mooish.pm6 :678: |
$val = nqp::clone($.auto_viv_container.VAR); |
VRURG/AttrX-Mooish…/Mooish.pm6 :708: |
nqp::bindattr( nqp::decont(instance), $.package, $.name, $val ); |
VRURG/AttrX-Mooish…/Mooish.pm6 :730: |
nqp::p6assign(%attr-data{$obj-id}{$.name}<value>, $value); |
VRURG/AttrX-Mooish…/Mooish.pm6 :733: |
%attr-data{$obj-id}{$.name}<value>.STORE(nqp::decont($value)); |
VRURG/OO-Plugin…/Plugin.pm6 :164: |
( $*IN-PLUG-CLASS && !nqp::istype( $*DECLARAND, Mu ) ) || self.panic( "Modificator '$sym' is only applicable to a plug-class" ) |
VRURG/OO-Plugin…/Plugin.pm6 :188: |
( $*PKGDECL eq 'plugin' and !nqp::istype( $*DECLARAND, Mu ) ) || self.panic( "Modificator '$sym' is only applicable to a plugin" ) |
VRURG/OO-Plugin…/Plugin.pm6 :200: |
nqp::atkey(nqp::findmethod($/, 'hash')($/), $key) |
Altai-man/ASN-META…/META.pm6 :81: |
my $val := nqp::rebless(nqp::clone($value), $enum_type_obj); |
Altai-man/ASN-META…/META.pm6 :82: |
nqp::bindattr($val, $enum_type_obj, '$!key', $key); |
Altai-man/ASN-META…/META.pm6 :83: |
nqp::bindattr($val, $enum_type_obj, '$!value', $value); |
Altai-man/ASN-META…/META.pm6 :84: |
nqp::bindattr_i($val, $enum_type_obj, '$!index', $index++); |
Altai-man/Slang-Kazu…/Kazu.pm6 :88: |
nqp::atkey(nqp::findmethod(h, 'hash')(h), k) |
CurtTilmes/perl6-tcc…/TCC.pm6 :51: |
nqp::bindattr($sig.params[2], Parameter, '$!sub_signature', |
CurtTilmes/perl6-tcc…/TCC.pm6 :58: |
nqp::bindattr(&tcc_add_symbol, Code, '$!signature', $sig); |
FROGGS/p6-Slang-Tuxic…/Tuxic.pm :6: |
nqp::atkey(nqp::findmethod(h, 'hash')(h), k) |
FROGGS/p6-Slang-Tuxic…/Tuxic.pm :23: |
{ self.add_mystery(atkeyish($/, 'identifier'), atkeyish($/, 'args').from, nqp::substr(atkeyish($/, 'args').Str, 0, 1)) } |
FROGGS/p6-Slang-Tuxic…/Tuxic.pm :44: |
my Mu $MAIN-grammar := nqp::atkey(%*LANG, 'MAIN'); |
FROGGS/p6-Slang-Tuxic…/Tuxic.pm :49: |
try nqp::bindkey(%*LANG, 'MAIN', $grammar); |
FROGGS/p6-overload-constant…/constant.pm :7: |
nqp::atkey(nqp::findmethod(h, 'hash')(h), k) |
FROGGS/p6-overload-constant…/constant.pm :12: |
do given nqp::decont($r) { |
FROGGS/p6-overload-constant…/constant.pm :13: |
when Str { $*W.add_string_constant( nqp::unbox_s($_) ) } |
FROGGS/p6-overload-constant…/constant.pm :14: |
when Int { $*W.add_numeric_constant($/, 'Int', nqp::unbox_i($_)) } |
FROGGS/p6-overload-constant…/constant.pm :15: |
when Num { $*W.add_numeric_constant($/, 'Num', nqp::unbox_n($_)) } |
FROGGS/p6-overload-constant…/constant.pm :16: |
when Rat { $*W.add_numeric_constant($/, 'Num', nqp::unbox_n($_.Num)) } |
FROGGS/p6-overload-constant…/constant.pm :21: |
?? call-handler(%handlers<integer>(nqp::p6box_s($v.Str))) |
FROGGS/p6-overload-constant…/constant.pm :26: |
?? call-handler(%handlers<decimal>(nqp::p6box_s($v.Str))) |
FROGGS/p6-overload-constant…/constant.pm :31: |
?? call-handler(%handlers<radix>(nqp::p6box_s($v.Str))) |
FROGGS/p6-overload-constant…/constant.pm :36: |
?? call-handler(%handlers<numish>(nqp::p6box_s($/.Str))) |
FROGGS/p6-overload-constant…/constant.pm :37: |
!! $*W.add_numeric_constant($/, 'Num', +nqp::p6box_s($/.Str)) ) |
LLFourn/p6-CompUnit-Util…/Util.pm6 :80: |
do if nqp::existskey($handle.unit,$key) { |
LLFourn/p6-CompUnit-Util…/Util.pm6 :81: |
my $val = nqp::atkey($handle.unit,$key); |
LLFourn/p6-CompUnit-Util…/Util.pm6 :110: |
$WHO.{$part} := nqp::decont($value); |
LLFourn/p6-CompUnit-Util…/Util.pm6 :125: |
my Mu $iter := nqp::iterator($unit); |
LLFourn/p6-CompUnit-Util…/Util.pm6 :128: |
my $i := nqp::shift($iter); |
LLFourn/p6-CompUnit-Util…/Util.pm6 :129: |
%hash{nqp::iterkey_s($i)} = nqp::iterval($i); |
LLFourn/p6-CompUnit-Util…/Util.pm6 :215: |
$target.add_dispatchee(nqp::decont($r)); |
LLFourn/p6-CompUnit-Util…/Util.pm6 :289: |
return $*W.find_symbol(nqp::split('::',$path)); |
LLFourn/p6-DispatchMap…/DispatchMap.pm6 :17: |
my $params := nqp::list(); |
LLFourn/p6-DispatchMap…/DispatchMap.pm6 :22: |
nqp::bindattr($param,Parameter,'@!post_constraints',nqp::list(nqp::decont($_))); |
LLFourn/p6-DispatchMap…/DispatchMap.pm6 :28: |
nqp::bindattr($param,Parameter,'$!nominal_type',nqp::decont($nominal-type)); |
LLFourn/p6-DispatchMap…/DispatchMap.pm6 :29: |
nqp::bindattr_i($param,Parameter,'$!flags',128); |
LLFourn/p6-DispatchMap…/DispatchMap.pm6 :30: |
nqp::push($params,$param); |
LLFourn/p6-DispatchMap…/DispatchMap.pm6 :34: |
nqp::bindattr($sig,Signature,'@!params',$params); |
LLFourn/p6-DispatchMap…/DispatchMap.pm6 :35: |
nqp::bindattr($sig,Signature,'$!count',@key.elems); |
LLFourn/p6-DispatchMap…/DispatchMap.pm6 :36: |
# nqp::bindattr($sig,Signature,'$!arity',@key.elems); # not working atm |
LLFourn/p6-DispatchMap…/DispatchMap.pm6 :40: |
nqp::bindattr($method,Code,'$!signature',$sig); |
LLFourn/p6-DispatchMap…/DispatchMap.pm6 :41: |
$!disp-obj.^add_multi_method("__$ns",nqp::decont($method)); |
MattOates/BioInfo…/BioInfo.pm6 :20: |
my $seq := nqp::atkey(nqp::findmethod($/, 'hash')($/), 'bioseq'); |
MattOates/BioInfo…/BioInfo.pm6 :33: |
nqp::bindkey(%*LANG, 'MAIN', %*LANG<MAIN>.HOW.mixin(%*LANG<MAIN>, BioInfo::Grammar)); |
MattOates/BioInfo…/BioInfo.pm6 :34: |
nqp::bindkey(%*LANG, 'MAIN-actions', %*LANG<MAIN-actions>.HOW.mixin(%*LANG<MAIN-actions>, BioInfo::Actions)); |
Tux/CSV…/csv_gram.pl :52: |
#say nqp::objectid($!gram); |
araraloren/perl6-app-findsource…/fs :158: |
if nqp::lstat(nqp::unbox_s($_), nqp::const::STAT_ISDIR) == 1 { |
araraloren/perl6-app-findsource…/fs :206: |
$dh := nqp::opendir($path); |
araraloren/perl6-app-findsource…/fs :215: |
while (my $f = nqp::nextfiledir($dh)) { |
araraloren/perl6-app-findsource…/fs :219: |
nqp::closedir($dh); |
araraloren/perl6-getopt-advance…/find-source.p6 :91: |
if nqp::lstat(nqp::unbox_s($_), nqp::const::STAT_ISDIR) == 1 { |
araraloren/perl6-getopt-advance…/find-source.p6 :118: |
my $dh := nqp::opendir($path); |
araraloren/perl6-getopt-advance…/find-source.p6 :120: |
while (my $f = nqp::nextfiledir($dh)) { |
araraloren/perl6-getopt-advance…/find-source.p6 :124: |
nqp::closedir($dh); |
araraloren/perl6-getopt-advance…/xcp.p6 :45: |
sub getFileSize($path) { nqp::stat($path, nqp::const::STAT_FILESIZE); } |
azawawi/farabi6…/test_repl.pl :6: |
my $comp = nqp::getcomp('perl6'); |
bduggan/p6-jupyter-kernel…/Sandbox.pm6 :42: |
$!compiler := nqp::getcomp('perl6'); |
cygx/p6-image-png-inflated…/Inflated.pm :117: |
nqp::setelems($buf, $elems); |
cygx/p6-image-png-inflated…/Inflated.pm :122: |
nqp::splice($buf, nqp::decont($_), $pos, $elems); |
cygx/p6-image-png-inflated…/Inflated.pm :139: |
nqp::setelems($out, $in.elems + $h); |
cygx/p6-image-png-inflated…/Inflated.pm :146: |
nqp::bindpos_i($out, $o++, nqp::atpos_i($in, $i++)); |
cygx/p6-image-rgba-text…/Text.pm6 :35: |
nqp::setelems(obj, elems); |
cygx/p6-image-rgba-text…/Text.pm6 :247: |
nqp::bindpos_i($bytes, $out++, $b0); |
cygx/p6-image-rgba-text…/Text.pm6 :248: |
nqp::bindpos_i($bytes, $out++, $b1); |
cygx/p6-image-rgba-text…/Text.pm6 :249: |
nqp::bindpos_i($bytes, $out++, $b2); |
cygx/p6-image-rgba-text…/Text.pm6 :250: |
nqp::bindpos_i($bytes, $out++, $b3); |
cygx/p6-nqp-eval…/Eval.pm6 :5: |
nqp::loadbytecode("nqp.{ $*VM.precomp-ext }"); |
cygx/p6-tinycc…/Eval.pm :45: |
nqp::bindattr($sig, Signature, '@!params', nqp::list); |
cygx/p6-tinycc…/Typeof.pm :30: |
multi typeof(Mu $ where nqp::decont($_) =:= Mu) { 'void' } |
cygx/p6-unicode-gcb…/GCB.pm6 :7: |
my constant CODE = nqp::unipropcode('gcb'); |
cygx/p6-unicode-gcb…/GCB.pm6 :9: |
sub prop(\name) { nqp::unipvalcode(CODE, name) } |
cygx/p6-unicode-gcb…/GCB.pm6 :10: |
sub getprop(\cp) { nqp::getuniprop_int(cp, CODE) } |
drforr/perl6-Perl6-Parser…/Parser.pm6 :543: |
my $compiler := nqp::getcomp('perl6'); |
drforr/perl6-Perl6-Parser…/Parser.pm6 :544: |
my $g := nqp::findmethod( |
drforr/perl6-Perl6-Parser…/Parser.pm6 :548: |
my $a := nqp::findmethod( |
drforr/perl6-Perl6-Parser…/Factory.pm6 :6872: |
# nqp::op |
drforr/perl6-Perl6-Parser…/Factory.pm6 :6873: |
# nqp::const |
drforr/perl6-slang-roman…/Roman.pm6 :178: |
{ nqp::atkey(nqp::findmethod(h, 'hash')(h), k) } |
edumentab/p6-moarvm-remote…/01-handshake.t :11: |
run_debugtarget("nqp::sleep(10)", :start-suspended, |
edumentab/p6-moarvm-remote…/02-suspend-resume-check.t :13: |
run_debugtarget("nqp::sleep(1)", :start-suspended, |
edumentab/p6-moarvm-remote…/02-suspend-resume-check.t :19: |
run_debugtarget("say('alive'); nqp::sleep(5)", |
edumentab/p6-moarvm-remote…/04-backtrace.t :19: |
my $first_input := nqp::chr(nqp::atpos_i(read(1), 0)); |
edumentab/p6-moarvm-remote…/04-backtrace.t :25: |
my $this_input := nqp::chr(nqp::atpos_i(read(1), 0)); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :9: |
my $prefix = nqp::backendconfig<prefix>; |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :87: |
my $buf := nqp::newtype(nqp::null(), 'VMArray'); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :88: |
nqp::composetype($buf, nqp::hash('array', nqp::hash('type', $type))); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :89: |
nqp::setmethcache($buf, nqp::hash('new', method () {nqp::create($buf)})); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :96: |
nqp::readfh(nqp::getstdin, $buf8.new, $count) |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :110: |
nqp::lock(nqp::atpos(@locks, $lock_number)); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :112: |
nqp::sleep(0.3); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :118: |
my $result := nqp::readfh(nqp::getstdin(), $buf8.new(), 2); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :119: |
my $opcode := nqp::chr(nqp::atpos_i($result, 0)); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :120: |
my $arg := +nqp::chr(nqp::atpos_i($result, 1)); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :122: |
nqp::push(@threads, nqp::newthread({ do_thread($arg) }, 0)); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :125: |
nqp::threadrun(@threads[$arg]); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :128: |
nqp::lock($l); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :129: |
nqp::bindpos(@locks, $arg, $l); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :132: |
nqp::unlock(@locks[$arg]); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :134: |
nqp::threadjoin(@threads[$arg]); |
edumentab/p6-moarvm-remote…/MoarRemoteTest.pm6 :140: |
nqp::exit(1); |
finanalyst/p6-inform…/Informative.pm6 :179: |
my $starttime = nqp::time_n(); |
finanalyst/p6-inform…/Informative.pm6 :180: |
my $lasttime = nqp::time_n(); |
finanalyst/p6-inform…/Informative.pm6 :183: |
my $dt = nqp::time_n() - $lasttime; |
finanalyst/p6-inform…/Informative.pm6 :184: |
$lasttime = nqp::time_n(); |
finanalyst/p6-inform…/Informative.pm6 :185: |
$s.emit((nqp::time_n() - $starttime, $dt)); |
finanalyst/pod-cached…/Cached.pm6 :224: |
%!files{$nm} = (:cache-key(nqp::sha1($nm)), :path($pfile), :status( New ), :added(0) ).hash; |
finanalyst/pod-cached…/Cached.pm6 :342: |
nqp::atkey(%!files{$source-name}<handle>.unit,'$=pod'); |
finanalyst/pod-cached…/PrecompilationDoc.pm6 :5: |
my $preserve_global := nqp::ifnull(nqp::gethllsym('perl6', 'GLOBAL'), Mu); |
finanalyst/pod-cached…/PrecompilationDoc.pm6 :9: |
nqp::bindhllsym('perl6', 'GLOBAL', $preserve_global); |
finanalyst/pod-cached…/PrecompilationDoc.pm6 :12: |
nqp::bindhllsym('perl6', 'GLOBAL', $preserve_global); |
finanalyst/pod-cached…/PrecompilationDoc.pm6 :49: |
# and (not $source or ($checksum //= nqp::sha1($source.slurp(:enc<iso-8859-1>))) eq $unit.source-checksum) |
gabrielash/p6-net-jupyter…/ContextREPL.pm :23: |
$repl .= new(nqp::getcomp('perl6'), {}); |
gabrielash/p6-net-jupyter…/ContextREPL.pm :49: |
!! nqp::null(); |
gfldex/perl6-rakudo-slippy-semilists…/Semilist.pm6 :7: |
nqp::p6bindattrinvres(nqp::create(List), List, '$!reified', target) |
goneri/p6-Email-Notmuch…/Notmuch.pm6 :210: |
nqp::box_i(nqp::unbox_i(nqp::decont($buf[0])), Database) |
goneri/p6-Email-Notmuch…/Notmuch.pm6 :220: |
nqp::box_i(nqp::unbox_i(nqp::decont($buf[0])), Database) |
goneri/p6-Email-Notmuch…/Notmuch.pm6 :228: |
my $message = nqp::box_i(nqp::unbox_i(nqp::decont($buf[0])), Message); |
goneri/p6-Email-Notmuch…/Notmuch.pm6 :237: |
my $message = nqp::box_i(nqp::unbox_i(nqp::decont($buf[0])), Message); |
goneri/p6-Email-Notmuch…/Notmuch.pm6 :246: |
my $message = nqp::box_i(nqp::unbox_i(nqp::decont($buf[0])), Message); |
goneri/p6-Email-Notmuch…/Notmuch.pm6 :380: |
nqp::box_i(nqp::unbox_i(nqp::decont($buf[0])), Messages) |
goneri/p6-Email-Notmuch…/Notmuch.pm6 :386: |
nqp::box_i(nqp::unbox_i(nqp::decont($buf[0])), Threads) |
grondilu/clifford…/Optimized.pm6 :68: |
nqp::sha1( "{$A.basis.join(',')} $op {$B.basis.join(',')}" ); |
grondilu/libdigest-perl6…/README.md :1: |
This is a perl6 module implementing some digest algorithms in pure Perl6 (no parrot or nqp:: code). |
jaffa4/perl6parsing…/Parsing.pm :89: |
my $id = nqp::objectid($tree); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :353: |
if nqp::elems(nqp::decont($!buffer)) > $size { |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :356: |
$!buffer.splice(nqp::elems(nqp::decont($!buffer)), 0, $!fh.read(4096)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :371: |
$!fh.tell - nqp::elems(nqp::decont($!buffer)) |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :381: |
nqp::add_i nqp::shift_i(@buf), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :382: |
nqp::add_i nqp::bitshiftl_i(nqp::shift_i(@buf), 8), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :383: |
nqp::add_i nqp::bitshiftl_i(nqp::shift_i(@buf), 16), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :384: |
nqp::add_i nqp::bitshiftl_i(nqp::shift_i(@buf), 24), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :385: |
nqp::add_i nqp::bitshiftl_i(nqp::shift_i(@buf), 32), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :386: |
nqp::add_i nqp::bitshiftl_i(nqp::shift_i(@buf), 40), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :387: |
nqp::add_i nqp::bitshiftl_i(nqp::shift_i(@buf), 48), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :388: |
nqp::bitshiftl_i(nqp::shift_i(@buf), 56) |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :396: |
nqp::add_i nqp::shift_i(@buf), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :397: |
nqp::add_i nqp::bitshiftl_i(nqp::shift_i(@buf), 8), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :398: |
nqp::add_i nqp::bitshiftl_i(nqp::shift_i(@buf), 16), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :399: |
nqp::bitshiftl_i(nqp::shift_i(@buf), 24) |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :407: |
nqp::add_i(nqp::shift_i(@buf), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :408: |
nqp::bitshiftl_i(nqp::shift_i(@buf), 8)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :661: |
nqp::push_i(@result, readSizedInt16(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :662: |
nqp::push_i(@result, readSizedInt32(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :663: |
nqp::push_i(@result, readSizedInt16(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :664: |
nqp::push_i(@result, readSizedInt64(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :665: |
nqp::push_i(@result, readSizedInt64(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :666: |
nqp::push_i(@result, readSizedInt32(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :674: |
nqp::push_i(@result, readSizedInt16(@buf)), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :675: |
nqp::push_i(@result, readSizedInt32(@buf)), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :676: |
nqp::push_i(@result, readSizedInt16(@buf)), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :677: |
nqp::push_i(@result, readSizedInt64(@buf)), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :678: |
nqp::push_i(@result, readSizedInt64(@buf)), |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :679: |
nqp::push_i(@result, readSizedInt32(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :687: |
my int $kind = nqp::shift_i(@pieces); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :689: |
nqp::push_i(@col-kinds, $kind); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :696: |
nqp::push_i(@col-desc-indexes, nqp::shift_i(@pieces)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :698: |
my int $size = nqp::shift_i(@pieces); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :699: |
nqp::push_i(@col-size, $size); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :700: |
my int $unmanaged-size = nqp::shift_i(@pieces); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :701: |
nqp::push_i(@col-unmanaged-size, $unmanaged-size); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :704: |
nqp::push_i(@col-refs-start, nqp::shift_i(@pieces)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :705: |
nqp::push_i(@col-num-refs, nqp::shift_i(@pieces)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :741: |
nqp::push_i(ref-kinds, nqp::shift_i(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :742: |
nqp::push_i(ref-indexes, readSizedInt64(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :743: |
nqp::push_i(ref-tos, readSizedInt64(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :744: |
$size = nqp::shift_i(@buf); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :748: |
nqp::push_i(ref-kinds, nqp::shift_i(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :749: |
nqp::push_i(ref-indexes, readSizedInt32(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :750: |
nqp::push_i(ref-tos, readSizedInt32(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :751: |
$size = nqp::shift_i(@buf); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :755: |
nqp::push_i(ref-kinds, nqp::shift_i(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :756: |
nqp::push_i(ref-indexes, readSizedInt16(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :757: |
nqp::push_i(ref-tos, readSizedInt16(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :758: |
$size = nqp::shift_i(@buf); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :762: |
nqp::push_i(ref-kinds, nqp::shift_i(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :763: |
nqp::push_i(ref-indexes, nqp::shift_i(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :764: |
nqp::push_i(ref-tos, nqp::shift_i(@buf)); |
jnthn/p6-app-moarvm-heapanalyzer…/Model.pm6 :765: |
$size = nqp::shift_i(@buf); |
jnthn/p6-ssh-libssh…/LibSSH.pm6 :11: |
nqp::decoderconfigure(nqp::create(self), $encoding, nqp::hash()) |
jnthn/p6-ssh-libssh…/LibSSH.pm6 :15: |
nqp::decoderaddbytes(self, nqp::decont($bytes)); |
jnthn/p6-ssh-libssh…/LibSSH.pm6 :19: |
nqp::decodertakeavailablechars(self) |
jnthn/p6-ssh-libssh…/LibSSH.pm6 :23: |
nqp::decodertakeallchars(self) |
jnthn/rakudo-debugger…/CommandLine.pm :13: |
my $compiler := nqp::getcomp('perl6'); |
jnthn/rakudo-debugger…/CommandLine.pm :14: |
my $vm_ctx := nqp::getattr(nqp::decont($ctx), PseudoStash, '$!ctx'); |
jnthn/rakudo-debugger…/CommandLine.pm :15: |
my $comp'd := nqp::findmethod($compiler, 'compile')($compiler, |
jnthn/rakudo-debugger…/CommandLine.pm :17: |
nqp::forceouterctx($comp'd, $vm_ctx); |
jnthn/rakudo-debugger…/CommandLine.pm :566: |
my \ENDS := nqp::getcurhllsym('@END_PHASERS'); |
jnthn/rakudo-debugger…/CommandLine.pm :567: |
if nqp::elems(ENDS) { |
jnthn/rakudo-debugger…/CommandLine.pm :579: |
nqp::bindcurhllsym('@END_PHASERS', nqp::list()); |
jnthn/rakudo-debugger…/CommandLine.pm :680: |
my Mu $vm_ex := nqp::atpos(nqp::p6argvmarray(), 0); |
jnthn/rakudo-debugger…/CommandLine.pm :686: |
$ = nqp::call(&thrown, $vm_ex); |
jnthn/rakudo-debugger…/CommandLine.pm :718: |
my Mu $p6comp := nqp::getcomp('perl6'); |
jnthn/rakudo-debugger…/CommandLine.pm :720: |
my Mu $vm_ex := nqp::atpos(nqp::p6argvmarray(), 1); |
jnthn/rakudo-debugger…/CommandLine.pm :721: |
nqp::call(&unhandled, $vm_ex); |
jnthn/rakudo-debugger…/CommandLine.pm :725: |
my Mu $vm_ex := nqp::atpos(nqp::p6argvmarray(), 0); |
jonathanstowe/IO-Path-Mode…/Mode.pm :231: |
my Int $mode = nqp::p6box_i(nqp::lstat(nqp::unbox_s($file), nqp::const::STAT_PLATFORM_MODE)); |
jpve/perl6-net-pcap…/C_Buf.pm6 :231: |
$!buf[$i] = nqp::atpos_i(nqp::decont($.carray), nqp::unbox_i($i)); |
jpve/perl6-net-pcap…/C_Buf.pm6 :325: |
my $char = nqp::atpos_i(nqp::decont($.carray), nqp::unbox_i($i)); |
jpve/perl6-net-pcap…/C_Buf.pm6 :344: |
my Int $i = nqp::atpos_i(nqp::decont($.carray), nqp::unbox_i($pos)); |
labster/p6-IO-Path-More…/More.pm :57: |
&& nqp::p6box_i(nqp::stat(nqp::unbox_s(self.Str), nqp::const::STAT_PLATFORM_INODE)) |
labster/p6-IO-Path-More…/More.pm :61: |
self.e && nqp::p6box_i(nqp::stat(nqp::unbox_s(self.Str), nqp::const::STAT_PLATFORM_DEV)) |
masterduke17/text-diff-sift4…/Sift4.pm6 :7: |
my int $l1 = nqp::chars($s1); |
masterduke17/text-diff-sift4…/Sift4.pm6 :8: |
my int $l2 = nqp::chars($s2); |
masterduke17/text-diff-sift4…/Sift4.pm6 :22: |
my $offset_arr := nqp::list_i; |
masterduke17/text-diff-sift4…/Sift4.pm6 :27: |
while nqp::islt_i($c1, $l1) && nqp::islt_i($c2, $l2) { |
masterduke17/text-diff-sift4…/Sift4.pm6 :28: |
if nqp::iseq_i(nqp::ordat($s1, $c1), nqp::ordat($s2, $c2)) { |
masterduke17/text-diff-sift4…/Sift4.pm6 :29: |
nqp::stmts( |
masterduke17/text-diff-sift4…/Sift4.pm6 :32: |
($local_cs = nqp::add_i($local_cs, 1)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :34: |
nqp::while(nqp::islt_i($i, nqp::elems($offset_arr)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :35: |
nqp::stmts( |
masterduke17/text-diff-sift4…/Sift4.pm6 :36: |
(my int $_trans = nqp::atpos_i($offset_arr, $i)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :37: |
(my int $_c1 = nqp::atpos_i($offset_arr, nqp::add_i($i, 1))), |
masterduke17/text-diff-sift4…/Sift4.pm6 :38: |
(my int $_c2 = nqp::atpos_i($offset_arr, nqp::add_i($i, 2))), |
masterduke17/text-diff-sift4…/Sift4.pm6 :40: |
nqp::if(nqp::isle_i($c1, $_c1) || nqp::isle_i($c2, $_c2), |
masterduke17/text-diff-sift4…/Sift4.pm6 :41: |
nqp::stmts( |
masterduke17/text-diff-sift4…/Sift4.pm6 :42: |
($isTrans = nqp::isge_i(nqp::abs_i(nqp::sub_i($c2, $c1)), nqp::abs_i(nqp::sub_i($_c2, $_c1)))), |
masterduke17/text-diff-sift4…/Sift4.pm6 :43: |
nqp::if($isTrans, |
masterduke17/text-diff-sift4…/Sift4.pm6 :44: |
($trans = nqp::add_i($trans, 1)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :45: |
nqp::unless($_trans, |
masterduke17/text-diff-sift4…/Sift4.pm6 :46: |
nqp::stmts(nqp::bindpos_i($offset_arr, $i, 1), |
masterduke17/text-diff-sift4…/Sift4.pm6 :47: |
($trans = nqp::add_i($trans, 1))))), |
masterduke17/text-diff-sift4…/Sift4.pm6 :50: |
nqp::if((nqp::isgt_i($c1, $_c2) && nqp::isgt_i($c2, $_c1)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :51: |
nqp::splice($offset_arr, nqp::list, $i, 3), |
masterduke17/text-diff-sift4…/Sift4.pm6 :52: |
($i = nqp::add_i($i, 3)))))), |
masterduke17/text-diff-sift4…/Sift4.pm6 :53: |
nqp::push_i($offset_arr, $isTrans), |
masterduke17/text-diff-sift4…/Sift4.pm6 :54: |
nqp::push_i($offset_arr, $c1), |
masterduke17/text-diff-sift4…/Sift4.pm6 :55: |
nqp::push_i($offset_arr, $c2)) |
masterduke17/text-diff-sift4…/Sift4.pm6 :57: |
nqp::stmts( |
masterduke17/text-diff-sift4…/Sift4.pm6 :58: |
($lcss = nqp::add_i($lcss, $local_cs)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :61: |
nqp::if(nqp::isne_i($c1, $c2), ($c1 = $c2 = nqp::isle_i($c1, $c2) ?? $c1 !! $c2)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :64: |
nqp::while( |
masterduke17/text-diff-sift4…/Sift4.pm6 :65: |
nqp::islt_i($i, $max_offset) && (nqp::islt_i(nqp::add_i($c1, $i), $l1) || |
masterduke17/text-diff-sift4…/Sift4.pm6 :66: |
nqp::islt_i(nqp::add_i($c2, $i), $l2)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :67: |
nqp::stmts( |
masterduke17/text-diff-sift4…/Sift4.pm6 :68: |
nqp::if(nqp::islt_i(nqp::add_i($c1, $i), $l1) && |
masterduke17/text-diff-sift4…/Sift4.pm6 :69: |
nqp::iseq_i(nqp::ordat($s1, nqp::add_i($c1, $i)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :70: |
nqp::ordat($s2, $c2)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :71: |
nqp::stmts( |
masterduke17/text-diff-sift4…/Sift4.pm6 :72: |
($c1 = nqp::sub_i(nqp::add_i($c1, $i), 1)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :73: |
($c2 = nqp::sub_i($c2, 1)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :75: |
nqp::if(nqp::islt_i(nqp::add_i($c2, $i), $l2) && |
masterduke17/text-diff-sift4…/Sift4.pm6 :76: |
nqp::iseq_i(nqp::ordat($s1, $c1), nqp::ordat($s2, nqp::add_i($c2, $i))), |
masterduke17/text-diff-sift4…/Sift4.pm6 :77: |
nqp::stmts( |
masterduke17/text-diff-sift4…/Sift4.pm6 :78: |
($c2 = nqp::sub_i(nqp::add_i($c2, $i), 1)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :79: |
($c1 = nqp::sub_i($c1, 1)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :81: |
($i = nqp::add_i($i, 1))))) |
masterduke17/text-diff-sift4…/Sift4.pm6 :84: |
$c1 = nqp::add_i($c1, 1); |
masterduke17/text-diff-sift4…/Sift4.pm6 :85: |
$c2 = nqp::add_i($c2, 1); |
masterduke17/text-diff-sift4…/Sift4.pm6 :87: |
nqp::if(nqp::isge_i( nqp::add_i(nqp::sub_i((nqp::isge_i($c1, $c2) ?? $c1 !! $c2), $lcss), $trans), $max_distance), |
masterduke17/text-diff-sift4…/Sift4.pm6 :88: |
nqp::if($max_distance, return nqp::add_i(nqp::sub_i((nqp::isge_i($c1, $c2) ?? $c1 !! $c2), $lcss), $trans))); |
masterduke17/text-diff-sift4…/Sift4.pm6 :90: |
nqp::if(nqp::isge_i($c1, $l1) || nqp::isge_i($c2, $l2), |
masterduke17/text-diff-sift4…/Sift4.pm6 :91: |
nqp::stmts( |
masterduke17/text-diff-sift4…/Sift4.pm6 :92: |
($lcss = nqp::add_i($lcss, $local_cs)), |
masterduke17/text-diff-sift4…/Sift4.pm6 :94: |
($c1 = $c2 = (nqp::isle_i($c1, $c2) ?? $c1 !! $c2))) |
masterduke17/text-diff-sift4…/Sift4.pm6 :98: |
$lcss = nqp::add_i($lcss, $local_cs); |
masterduke17/text-diff-sift4…/Sift4.pm6 :100: |
nqp::add_i(nqp::sub_i((nqp::isge_i($l1, $l2) ?? $l1 !! $l2), $lcss), $trans) |
niner/Inline-Python…/Python.pm6 :439: |
nqp::p6bindattrinvres( |
niner/Inline-Python…/Python.pm6 :440: |
nqp::p6bindattrinvres( |
niner/Inline-Python…/Python.pm6 :441: |
nqp::create($?CLASS), |
niner/Inline-Python…/Python.pm6 :444: |
nqp::decont($unit), |
perl6/doc…/pragmas.pod6 :197: |
nqp::say("hello world"); |
perl6/doc…/PrivateMethodContainer.pod6 :45: |
or catch nqp::null in Perl 6 land |
perl6/doc…/Convenience.pm6 :122: |
my $id = nqp::sha1(~$file); |
perl6/doc…/Convenience.pm6 :131: |
return nqp::atkey($handle.unit,'$=pod')[0]; |
perl6/gtk-simple…/App.pm6 :55: |
my $starttime = nqp::time_n(); |
perl6/gtk-simple…/App.pm6 :56: |
my $lasttime = nqp::time_n(); |
perl6/gtk-simple…/App.pm6 :59: |
my $dt = nqp::time_n() - $lasttime; |
perl6/gtk-simple…/App.pm6 :60: |
$lasttime = nqp::time_n(); |
perl6/gtk-simple…/App.pm6 :61: |
$s.emit((nqp::time_n() - $starttime, $dt)); |
perl6/gtk-simple…/DrawingArea.pm6 :37: |
my $cairo = nqp::box_i($cairop.Int, $cairo_t); |
perl6/gtk-simple…/Scheduler.pm6 :11: |
my $queue := nqp::create(Queue); |
perl6/gtk-simple…/Scheduler.pm6 :23: |
nqp::push($queue, &run); |
perl6/gtk-simple…/Scheduler.pm6 :29: |
my Mu $task := nqp::queuepoll($queue); |
perl6/gtk-simple…/Scheduler.pm6 :30: |
unless nqp::isnull($task) { |
perl6/gtk-simple…/Scheduler.pm6 :31: |
if nqp::islist($task) { |
perl6/gtk-simple…/Scheduler.pm6 :32: |
my Mu $code := nqp::shift($task); |
perl6/gtk-simple…/Scheduler.pm6 :33: |
$code(|nqp::hllize($task, Any)); |
perl6/gtk-simple…/Scheduler.pm6 :46: |
method loads() { nqp::elems($queue) } |
perl6/perl6-pod-to-bigpage…/pod2onepage :68: |
my $id = nqp::sha1(~$f); |
perl6/perl6-pod-to-bigpage…/pod2onepage :81: |
$pod = nqp::atkey($handle.unit,'$=pod')[0]; |
perl6/whateverable…/Whateverable.pm6 :103: |
~ (with nqp::getcomp("perl6") { |
perl6/whateverable…/Running.pm6 :115: |
~ ($complex ?? ｢ nqp::substr($_, 0, nqp::index($_, “\0”)) ~~｣ !! ‘’) ~ “\n” |
retupmoca/P6-Compress-Zlib…/Zlib.pm6 :47: |
nqp::splice(nqp::decont($buf), nqp::decont(buf8.new()), $length, $buf.elems - $length); |
retupmoca/P6-Compress-Zlib…/Zlib.pm6 :51: |
nqp::splice(nqp::decont($bufa), nqp::decont($bufb), $bufa.elems, 0); |
retupmoca/P6-Compress-Zlib…/Zlib.pm6 :348: |
gather while nqp::p6definite(my $line = self.get) { |
retupmoca/P6-Compress-Zlib…/Zlib.pm6 :354: |
gather while ++$count <= $limit && nqp::p6definite(my $line = self.get) { |
retupmoca/P6-Compress-Zlib…/Zlib.pm6 :361: |
my Mu $args := nqp::p6argvmarray(); |
retupmoca/P6-Compress-Zlib…/Zlib.pm6 :362: |
nqp::shift($args); |
retupmoca/P6-Compress-Zlib…/Zlib.pm6 :363: |
self.print: nqp::shift($args).gist while $args; |
salortiz/NativeHelpers-Blob…/Blob.pm6 :89: |
nqp::setelems(b, nqp::unbox_i($elems.Int)); |
salortiz/NativeHelpers-Blob…/Pointer.pm6 :10: |
my int $a = nqp::unbox_i(nqp::decont(self)) + $off * nativesizeof(type); |
salortiz/NativeHelpers-Blob…/Pointer.pm6 :11: |
nqp::box_i($a, Pointer[type]); |
salortiz/p6-LMDB…/LMDB.pm6 :336: |
# " txn: " ~ nqp::p6box_i(nqp::unbox_i(nqp::decont(self))).base(16); |
scovit/NativeHelpers-CBuffer…/CBuffer.pm6 :18: |
my Pointer[size_t] $size_loc = nqp::box_i(nqp::unbox_i(nqp::decont(self)) - nativesizeof(size_t), Pointer[size_t]); |
scovit/NativeHelpers-CBuffer…/CBuffer.pm6 :23: |
my Pointer[size_t] $type_loc = nqp::box_i(nqp::unbox_i(nqp::decont(self)) - 2 * nativesizeof(size_t), Pointer[size_t]); |
scovit/NativeHelpers-CBuffer…/CBuffer.pm6 :86: |
my Pointer $type_loc = nqp::box_i(nqp::unbox_i(nqp::decont(self)) - 2 * nativesizeof(size_t), Pointer); |
scovit/Scheduler-DRMAA…/Job-template.pm6 :199: |
my $filename = nqp::sha1($script); |
scovit/Scheduler-DRMAA…/Job-template.pm6 :202: |
unless $fullname.IO.f && (nqp::sha1(slurp($fullname)) eq $filename) { |
sergot/Term--ProgressBar…/ProgressBar.pm :21: |
# This is a bit gross but the other alternative is to use nqp::time_n |
sergot/openssl…/NativeLib.pm6 :34: |
my $content_id = nqp::sha1($resource.absolute); |
skaji/perl6-tail…/TailFile.pm6 :10: |
method e { nqp::stat($!file, nqp::const::STAT_EXISTS) == 1 } |
skaji/perl6-tail…/TailFile.pm6 :11: |
method s { nqp::stat($!file, nqp::const::STAT_FILESIZE) } |
skaji/perl6-tail…/TailFile.pm6 :12: |
method inode { nqp::stat($!file, nqp::const::STAT_PLATFORM_INODE) } |
skids/perl6-Control-Bail…/Bail.pm6 :87: |
nqp::atkey(nqp::findmethod(h, 'hash')(h), k) |
skids/perl6-Control-Bail…/Bail.pm6 :116: |
nqp::atpos($*W.cur_lexpad(),0).push($block); # Should we? Should we pop it after? |
skids/perl6-Control-Bail…/Bail.pm6 :117: |
my $sig := $*W.create_signature(nqp::hash('parameter_objects', nqp::list())); |
skids/perl6-Control-Bail…/Bail.pm6 :148: |
my Mu $MAIN-grammar := nqp::atkey(%*LANG, 'MAIN'); |
skids/perl6-Control-Bail…/Bail.pm6 :150: |
my Mu $MAIN-actions := nqp::atkey(%*LANG, 'MAIN-actions'); |
skids/perl6-Control-Bail…/Bail.pm6 :155: |
nqp::bindkey(%*LANG, 'MAIN', $grammar); |
skids/perl6-Control-Bail…/Bail.pm6 :156: |
nqp::bindkey(%*LANG, 'MAIN-actions', $actions); |
skinkade/crypt-random…/Nix.pm6 :10: |
my $urandom := nqp::open('/dev/urandom', 'r'); |
skinkade/crypt-random…/Nix.pm6 :13: |
nqp::readfh($urandom, $bytes, $len); |
skinkade/crypt-random…/Nix.pm6 :14: |
nqp::closefh($urandom); |
spitsh/spitsh…/Metamodel.pm6 :90: |
method is-primitive(Mu \type) { type =:= nqp::decont($!primitive) } |
spitsh/spitsh…/Metamodel.pm6 :122: |
nqp::decont(type); |
spitsh/spitsh…/Metamodel.pm6 :126: |
if nqp::decont($!whatever-invocant) =:= Mu { |
spitsh/spitsh…/Metamodel.pm6 :161: |
nqp::setparameterizer(type, -> $, $params is raw { |
spitsh/spitsh…/Metamodel.pm6 :170: |
my $params := nqp::list(); |
spitsh/spitsh…/Metamodel.pm6 :172: |
nqp::push($params,nqp::decont(param)); |
spitsh/spitsh…/Metamodel.pm6 :174: |
nqp::parameterizetype(type, $params); |
spitsh/spitsh…/Actions.pm6 :13: |
return nqp::getattr(nqp::decont($match), Match,'$!made'); |
spitsh/spitsh…/Util.pm6 :43: |
return nqp::sha1($str); |
tadzik/Grammar-BNF…/ABNF.pm :9: |
nqp::atkey(nqp::findmethod(h, 'hash')(h), k) |
tadzik/Grammar-BNF…/ABNF.pm :46: |
my Mu $MAIN-grammar := nqp::atkey(%*LANG, 'MAIN'); |
tadzik/Grammar-BNF…/ABNF.pm :48: |
my Mu $MAIN-actions := nqp::atkey(%*LANG, 'MAIN-actions'); |
tadzik/Grammar-BNF…/ABNF.pm :53: |
nqp::bindkey(%*LANG, 'MAIN', $grammar); |
tadzik/Grammar-BNF…/ABNF.pm :54: |
nqp::bindkey(%*LANG, 'MAIN-actions', $actions); |
tadzik/Grammar-BNF…/ABNF.pm :55: |
nqp::bindkey(%*LANG, 'Grammar::ABNF::Slang', |
tadzik/Grammar-BNF…/ABNF.pm :57: |
nqp::bindkey(%*LANG, 'Grammar::ABNF::Slang-actions', |
tadzik/Grammar-BNF…/BNF.pm :9: |
nqp::atkey(nqp::findmethod(h, 'hash')(h), k) |
tadzik/Grammar-BNF…/BNF.pm :43: |
my Mu $MAIN-grammar := nqp::atkey(%*LANG, 'MAIN'); |
tadzik/Grammar-BNF…/BNF.pm :45: |
my Mu $MAIN-actions := nqp::atkey(%*LANG, 'MAIN-actions'); |
tadzik/Grammar-BNF…/BNF.pm :50: |
nqp::bindkey(%*LANG, 'MAIN', $grammar); |
tadzik/Grammar-BNF…/BNF.pm :51: |
nqp::bindkey(%*LANG, 'MAIN-actions', $actions); |
tadzik/Grammar-BNF…/BNF.pm :52: |
nqp::bindkey(%*LANG, 'Grammar::BNF', Grammar::BNF); |
tadzik/Grammar-BNF…/BNF.pm :53: |
nqp::bindkey(%*LANG, 'Grammar::BNF-actions', Grammar::BNF-actions); |
tadzik/panda…/README.md :3: |
a naive imperative json parser in pure perl6 (but with direct access to nqp:: ops), to evaluate performance against JSON::Tiny. It is a drop-in replacement for JSON::Tiny's from-json sub. |
tadzik/panda…/Fast.pm :54: |
$wsord = nqp::ordat($text, $pos); |
tadzik/panda…/Fast.pm :70: |
my int $ord = nqp::ordat($text, $pos); |
tadzik/panda…/Fast.pm :72: |
die "reached end of string while looking for end of quoted string." if $pos > nqp::chars($text); |
tadzik/panda…/Fast.pm :75: |
$result = nqp::substr($text, $startpos, $pos - 1 - $startpos); |
tadzik/panda…/Fast.pm :83: |
if nqp::eqat($text, '"', $pos) { |
tadzik/panda…/Fast.pm :85: |
} elsif nqp::eqat($text, '\\', $pos) { |
tadzik/panda…/Fast.pm :87: |
} elsif nqp::eqat($text, '/', $pos) { |
tadzik/panda…/Fast.pm :89: |
} elsif nqp::eqat($text, 'b', $pos) { |
tadzik/panda…/Fast.pm :91: |
} elsif nqp::eqat($text, 'f', $pos) { |
tadzik/panda…/Fast.pm :93: |
} elsif nqp::eqat($text, 'n', $pos) { |
tadzik/panda…/Fast.pm :95: |
} elsif nqp::eqat($text, 'r', $pos) { |
tadzik/panda…/Fast.pm :97: |
} elsif nqp::eqat($text, 't', $pos) { |
tadzik/panda…/Fast.pm :99: |
} elsif nqp::eqat($text, 'u', $pos) { |
tadzik/panda…/Fast.pm :100: |
my $hexstr := nqp::substr($text, $pos + 1, 4); |
tadzik/panda…/Fast.pm :101: |
if nqp::chars($hexstr) != 4 { |
tadzik/panda…/Fast.pm :107: |
die "at $pos: I don't understand the escape sequence \\{ nqp::substr($text, $pos, 1) }"; |
tadzik/panda…/Fast.pm :110: |
if nqp::eqat($text, '"', $pos + 1) { |
tadzik/panda…/Fast.pm :131: |
$pos = $pos + 1 while nqp::iscclass(nqp::const::CCLASS_NUMERIC, $text, $pos); |
tadzik/panda…/Fast.pm :133: |
my $residual := nqp::substr($text, $pos, 1); |
tadzik/panda…/Fast.pm :138: |
$pos = $pos + 1 while nqp::iscclass(nqp::const::CCLASS_NUMERIC, $text, $pos); |
tadzik/panda…/Fast.pm :140: |
$residual := nqp::substr($text, $pos, 1); |
tadzik/panda…/Fast.pm :146: |
if nqp::eqat($text, '-', $pos) || nqp::eqat($text, '+', $pos) { |
tadzik/panda…/Fast.pm :150: |
$pos = $pos + 1 while nqp::iscclass(nqp::const::CCLASS_NUMERIC, $text, $pos); |
tadzik/panda…/Fast.pm :153: |
+(my $result := nqp::substr($text, $startpos - 1, $pos - $startpos + 1)) // die "at $pos: invalid number token $result.perl()"; |
tadzik/panda…/Fast.pm :164: |
if nqp::eqat($text, '}', $pos) { |
tadzik/panda…/Fast.pm :176: |
if nqp::eqat($text, '"', $pos) { |
tadzik/panda…/Fast.pm :180: |
die "at end of string: expected a quoted string for an object key" if $pos == nqp::chars($text); |
tadzik/panda…/Fast.pm :186: |
#my str $partitioner = nqp::substr($text, $pos, 1); |
tadzik/panda…/Fast.pm :188: |
if nqp::eqat($text, ':', $pos) and not defined $key and not defined $value { |
tadzik/panda…/Fast.pm :190: |
} elsif nqp::eqat($text, ',', $pos) and defined $key and not defined $value { |
tadzik/panda…/Fast.pm :197: |
} elsif nqp::eqat($text, '}', $pos) and defined $key and not defined $value { |
tadzik/panda…/Fast.pm :204: |
die "at end of string: unexpected end of object." if $pos == nqp::chars($text); |
tadzik/panda…/Fast.pm :205: |
die "unexpected { nqp::substr($text, $pos, 1) } in an object at $pos"; |
tadzik/panda…/Fast.pm :220: |
if nqp::eqat($text, ']', $pos) { |
tadzik/panda…/Fast.pm :228: |
my str $partitioner = nqp::substr($text, $pos, 1); |
tadzik/panda…/Fast.pm :247: |
my str $initial = nqp::substr($text, $pos, 1); |
tadzik/panda…/Fast.pm :257: |
} elsif nqp::iscclass(nqp::const::CCLASS_NUMERIC, $initial, 0) || $initial eq '-' { |
tadzik/panda…/Fast.pm :260: |
if nqp::eqat($text, 'ull', $pos) { |
tadzik/panda…/Fast.pm :264: |
die "at $pos: i was expecting a 'null' but there wasn't one: { nqp::substr($text, $pos - 1, 10) }" |
tadzik/panda…/Fast.pm :267: |
if nqp::eqat($text, 'rue', $pos) { |
tadzik/panda…/Fast.pm :271: |
die "at $pos: expected 'true', found { $initial ~ nqp::substr($text, $pos, 3) } instead."; |
tadzik/panda…/Fast.pm :274: |
if nqp::eqat($text, 'alse', $pos) { |
tadzik/panda…/Fast.pm :278: |
die "at $pos: expected 'false', found { $initial ~ nqp::substr($text, $pos, 4) } instead."; |
tadzik/panda…/Fast.pm :281: |
my str $rest = nqp::substr($text, $pos, 6); |
tadzik/panda…/Fast.pm :294: |
my str $initial = nqp::substr($text, $pos, 1); |
tadzik/panda…/Fast.pm :310: |
if $pos != nqp::chars($text) { |
thundergnat/Rat-Precise…/Precise.pm6 :11: |
if nqp::eqaddr(self.WHAT,Rat) and $fract.Num == 1e0 { |
thundergnat/Rat-Precise…/Precise.pm6 :16: |
my $result = nqp::if(nqp::islt_I(self.numerator, 0), '-', '') ~ $whole; |
thundergnat/Rat-Precise…/Precise.pm6 :29: |
if nqp::isfalse(nqp::bitand_I(self.denominator, self.denominator - 1, Int)) { |
thundergnat/Rat-Precise…/Precise.pm6 :37: |
elsif nqp::eqaddr(self.WHAT,Rat) and self.denominator < 1000000000000000 { |
thundergnat/Rat-Precise…/Precise.pm6 :41: |
elsif nqp::eqaddr(self.WHAT,FatRat) and self.denominator < 10000000000000000000000000000000 { |
thundergnat/Rat-Precise…/Precise.pm6 :47: |
$precision = nqp::chars(self.denominator.Str) + 1; |
thundergnat/Rat-Precise…/Precise.pm6 :50: |
my $pow = nqp::pow_I(10, nqp::decont($precision), Num, Int); |
thundergnat/Rat-Precise…/Precise.pm6 :54: |
$result = nqp::if(nqp::islt_I(self.numerator, 0), '-', '') ~ ($whole + 1); |
thundergnat/Rat-Precise…/Precise.pm6 :57: |
my int $fc = nqp::chars($f); |
thundergnat/X11-Xdo…/libxdo.pm6 :1627: |
my int $a = nqp::unbox_i(nqp::decont(self)) + $off * nativesizeof(type); |
thundergnat/X11-Xdo…/libxdo.pm6 :1628: |
nqp::box_i($a, Pointer[type]); |
tony-o/perl6-slang-sql…/SQL.pm6 :42: |
nqp::atkey(nqp::findmethod(h, 'hash')(h), k) |
ugexe/zef…/CLI.pm6 :420: |
my $lib-sha1 = nqp::sha1($lib ~ CompUnit::Repository::Distribution.new($candi.dist.compat).id); |
ugexe/zef…/CLI.pm6 :451: |
my $source-path = $source-prefix.child(nqp::sha1($identity ~ CompUnit::Repository::Distribution.new($candi.dist.compat).id)); |
ugexe/zef…/CLI.pm6 :463: |
my @source_files = %meta<provides>.map({ nqp::sha1($_.key ~ CompUnit::Repository::Distribution.new($candi.dist.compat).id) }); |
ugexe/zef…/CLI.pm6 :475: |
my %sources = %meta<provides>.map({ $_.key => nqp::sha1($_.key ~ CompUnit::Repository::Distribution.new($candi.dist.compat).id) }).hash; |
ugexe/zef…/Distribution.pm6 :123: |
return nqp::sha1(self.Str); |
zoffixznet/perl6-Benchy…/Benchy.pm6 :20: |
nqp::until(nqp::islt_i($n, $i = nqp::add_i($i, 1)), bare, :nohandler); |
zoffixznet/perl6-Benchy…/Benchy.pm6 :24: |
nqp::until(nqp::islt_i($n, $i = nqp::add_i($i, 1)), old, :nohandler); |
zoffixznet/perl6-Benchy…/Benchy.pm6 :28: |
nqp::until(nqp::islt_i($n, $i = nqp::add_i($i, 1)), new, :nohandler); |
zoffixznet/perl6-Benchy…/Benchy.pm6 :32: |
nqp::until(nqp::islt_i($n, $i = nqp::add_i($i, 1)), bare, :nohandler); |
zoffixznet/perl6-Benchy…/Benchy.pm6 :36: |
nqp::until(nqp::islt_i($n, $i = nqp::add_i($i, 1)), new, :nohandler); |
zoffixznet/perl6-Benchy…/Benchy.pm6 :40: |
nqp::until(nqp::islt_i($n, $i = nqp::add_i($i, 1)), old, :nohandler); |
zoffixznet/perl6-Benchy…/01-operation.t :11: |
$ = nqp::iseq_s('', ''); |
zoffixznet/perl6-IO-CatHandle-AutoLines…/AutoLines.pm6 :14: |
with nqp::getattr(self, IO::CatHandle, '&!on-switch') -> $os { |
zoffixznet/perl6-IO-CatHandle-AutoLines…/AutoLines.pm6 :21: |
nqp::bindattr(self, IO::CatHandle, '&!on-switch', Proxy.new: |
zoffixznet/perl6-IO-Dir…/Dir.pm6 :31: |
$!dirh := nqp::opendir(nqp::unbox_s($!abspath)); |
zoffixznet/perl6-IO-Dir…/Dir.pm6 :37: |
$!dirh and try nqp::closedir($!dirh); |
zoffixznet/perl6-IO-Dir…/Dir.pm6 :62: |
nqp::until( |
zoffixznet/perl6-IO-Dir…/Dir.pm6 :63: |
nqp::isnull_s(my str $str-elem = nqp::nextfiledir($!dirh)) |
zoffixznet/perl6-IO-Dir…/Dir.pm6 :64: |
|| nqp::iseq_i(nqp::chars($str-elem),0), |
zoffixznet/perl6-IO-Dir…/Dir.pm6 :65: |
nqp::if( |
zoffixznet/perl6-IO-Dir…/Dir.pm6 :67: |
nqp::if( |
zoffixznet/perl6-IO-Dir…/Dir.pm6 :70: |
nqp::concat(nqp::if($relative,$!path,$!abspath),$str-elem)), |
zoffixznet/perl6-IO-Dir…/Dir.pm6 :71: |
nqp::if( |
zoffixznet/perl6-IO-Dir…/Dir.pm6 :74: |
nqp::concat($!path,$str-elem),:$!SPEC,:$CWD)), |
zoffixznet/perl6-IO-Dir…/Dir.pm6 :76: |
nqp::concat($!abspath,$str-elem),:$!SPEC,:$CWD)))))); |
zoffixznet/perl6-IO-Path-ChildSecure…/ChildSecure.pm6 :10: |
nqp::if( |
zoffixznet/perl6-IO-Path-ChildSecure…/ChildSecure.pm6 :11: |
nqp::istype((my $kid := SELF.child(child).resolve: :completely), |
zoffixznet/perl6-IO-Path-ChildSecure…/ChildSecure.pm6 :14: |
nqp::if( |
zoffixznet/perl6-IO-Path-ChildSecure…/ChildSecure.pm6 :15: |
nqp::istype((my $res-self := SELF.resolve: :completely), Failure), |
zoffixznet/perl6-IO-Path-ChildSecure…/ChildSecure.pm6 :17: |
nqp::if( |
zoffixznet/perl6-IO-Path-ChildSecure…/ChildSecure.pm6 :18: |
nqp::iseq_s( |
zoffixznet/perl6-IO-Path-ChildSecure…/ChildSecure.pm6 :19: |
($_ := nqp::concat($res-self.absolute, SELF.SPEC.dir-sep)), |
zoffixznet/perl6-IO-Path-ChildSecure…/ChildSecure.pm6 :20: |
nqp::substr($kid.absolute, 0, nqp::chars($_))), |
zoffixznet/perl6-Proxee…/Proxee.pm6 :15: |
!! nqp::istype($v, List) |
zoffixznet/perl6-Proxee…/Proxee.pm6 :27: |
unless nqp::istype(v, from); # on 2017.11 about 13x faster than ~~ |
zoffixznet/perl6-Proxee…/Proxee.pm6 :29: |
nqp::istype(v, to) ?? ($STORAGE := v) |
zoffixznet/perl6-Trait-IO…/IO.pm6 :8: |
try nqp::atkey( |
zoffixznet/perl6-Trait-IO…/IO.pm6 :9: |
nqp::ctxcaller( |
zoffixznet/perl6-Trait-IO…/IO.pm6 :10: |
nqp::ctxcaller( |
zoffixznet/perl6-Trait-IO…/IO.pm6 :11: |
nqp::ctxcaller( |
zoffixznet/perl6-Trait-IO…/IO.pm6 :12: |
nqp::ctxcaller( |
zoffixznet/perl6-Trait-IO…/IO.pm6 :13: |
nqp::ctxcaller( |
zoffixznet/perl6-Trait-IO…/IO.pm6 :14: |
nqp::ctx()))))), |
Created
April 15, 2020 21:08
-
-
Save Whateverable/fc82cf283b8b39269f142e05b8184929 to your computer and use it in GitHub Desktop.
greppable6
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| nqp:: |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment