view release on metacpan or search on metacpan
lib/SPVM/Resource/Eigen.native/include/Eigen/src/Core/arch/SYCL/SyclMemoryModel.h view on Meta::CPAN
typename pointerMap_t::iterator retVal;
bool reuse = false;
if (!m_freeList.empty()) {
// try to re-use an existing block
for (auto freeElem : m_freeList) {
if (freeElem->second.m_size >= requiredSize) {
retVal = freeElem;
reuse = true;
// Element is not going to be free anymore
m_freeList.erase(freeElem);
break;
view release on metacpan or search on metacpan
.tmp/libpng/scripts/options.awk view on Meta::CPAN
}
}
} else if (val == "requires" || val == "if" || val == "enables" || val =="sets") {
key = val
} else if (key == "requires") {
requires[opt] = requires[opt] " " val
} else if (key == "if") {
iffs[opt] = iffs[opt] " " val
} else if (key == "enables") {
enabledby[val] = enabledby[val] " " opt
} else if (key == "sets") {
view release on metacpan or search on metacpan
lib/SQL/Admin/Driver/DB2/Parser.pm view on Meta::CPAN
use SQL::Admin::Utils qw( refhash refarray );
######################################################################
my $grammar = require SQL::Admin::Driver::DB2::Grammar;
my $cached;
######################################################################
######################################################################
sub new { # ;
view release on metacpan or search on metacpan
t/900_regtest.t view on Meta::CPAN
if ( $@ ) {
diag "$api not installed";
skip "$api not installed, skipping tests", $tests = 1;
}
-d "t" && chdir "t";
$tests = require "./900_regtest.pl";
}
done_testing($tests);
view release on metacpan or search on metacpan
t/eval_barrier.t view on Meta::CPAN
push @events, ["b0"];
@value = sub {
push @events, ["c0"];
$cont = current_escape_function;
push @events, ["c1"];
@value = require("t/eval_barrier_req.pl");
push @events, ["c3", [@value]];
("c4a", "c4b");
}->();
push @events, ["b1", [@value]];
("b2a", "b2b");
view release on metacpan or search on metacpan
;version_rel_month = 8
;version_rel_day = 26
;version_rel_hour = 00
;version_rel_time_zone = Pacific/Auckland
-phase = develop
-relationship = requires
Dist::Zilla::Plugin::Author::KENTNL::CONTRIBUTING = 0.001003
Dist::Zilla::Plugin::Author::KENTNL::RecommendFixes = 0.004002
Dist::Zilla::Plugin::Author::KENTNL::TravisCI = 0.001002
Dist::Zilla::Plugin::Authority = 1.006
Dist::Zilla::Plugin::AutoPrereqs = 0
view release on metacpan or search on metacpan
t/Firefox-Profile.t view on Meta::CPAN
# This extension rewrites any page url to a single <h1>. The
# following javascript is in redisplay.xpi's
# resources/gempesaw/lib/main.js:
# var pageMod = require("sdk/page-mod");
# pageMod.PageMod({
# include: "*",
# contentScript: 'document.body.innerHTML = ' +
# ' "<h1>Page matches ruleset</h1>";'
# });
view release on metacpan or search on metacpan
remove = warnings
remove = utf8
[EnsurePrereqsInstalled]
:version = 0.003
type = requires
type = recommends
[GitHub::Meta]
repo = git@github.com:robrwo/SemanticWeb-Schema.git
view release on metacpan or search on metacpan
; version_rel_day = 24
; version_rel_hour = 16
; version_rel_time_zone = Pacific/Auckland
; auto_prereqs_skip = File::Find
-phase = develop
-relationship = requires
Dist::Zilla::Plugin::Author::KENTNL::CONTRIBUTING = 0.001003
Dist::Zilla::Plugin::Author::KENTNL::RecommendFixes = 0.004002
Dist::Zilla::Plugin::Author::KENTNL::TravisCI = 0.001002
Dist::Zilla::Plugin::Authority = 1.006
Dist::Zilla::Plugin::AutoPrereqs = 0
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
But, it's more interesting than that. You can load it with C<require>
and call C<arguments> to get the data structure it passes to
C<WriteMakefile>:
my $package = require '/path/to/Makefile.PL';
my $arguments = $package->arguments;
Note that C<require>-ing a file makes an entry in C<%INC> for exactly
that name. If you try to C<require> another file with the same name,
even from a different path, C<require> thinks it has already loaded
view release on metacpan or search on metacpan
[Prereqs / TestRequires]
Test::More = 0.62
[EnsurePrereqsInstalled]
:version = 0.003
type = requires
type = recommends
[GitHub::Meta]
repo = git://github.com/robrwo/Set-Light.git
view release on metacpan or search on metacpan
[Meta::Dynamic::Config]
[DynamicPrereqs / DynamicPrereqsUnixWithoutProc]
-condition = ($^O ne 'dos' && $^O ne 'VMS' && $^O ne 'MSWin32' && eval { my $ppid = getppid; 1 }) && ! do { require File::Spec; -e File::Spec->catfile('', 'proc', getppid, 'cmdline') }
-body = requires('Unix::Process');
[DynamicPrereqs / DynamicPrereqsWinblows]
-condition = $^O eq 'MSWin32'
-body = requires('Win32::Getppid');
-body = requires('Win32::Process::List');
view release on metacpan or search on metacpan
lib/Sidef.pm view on Meta::CPAN
$self->{$lang}{_time_hash}{$md5} = time;
}
my $compressed_code = $self->{$lang}{_code_hash}{$md5};
state $_x = require IO::Uncompress::RawInflate;
IO::Uncompress::RawInflate::rawinflate(\$compressed_code => \my $decompressed_code)
or die "rawinflate failed: $IO::Uncompress::RawInflate::RawInflateError";
return Encode::decode_utf8($decompressed_code);
}
lib/Sidef.pm view on Meta::CPAN
delete @{$self->{$lang}{_time_hash}}{@delete_keys};
delete @{$self->{$lang}{_code_hash}}{@delete_keys};
}
}
state $_x = require IO::Compress::RawDeflate;
IO::Compress::RawDeflate::rawdeflate(\$code => \my $compressed_code)
or die "rawdeflate failed: $IO::Compress::RawDeflate::RawDeflateError";
$self->{$lang}{_time_hash}{$md5} = time;
$self->{$lang}{_code_hash}{$md5} = $compressed_code;
view release on metacpan or search on metacpan
lib/Simd/Avx512.pm view on Meta::CPAN
confess "128|256|512 required for operand" unless $n == 128 or $n == 256 or $n == 512;
}
sub flipBitsUnderMask($$) # Flip the bits in a string where the corresponding mask bit is 1 else leave the bit as is
{my ($string, $mask) = @_; # Bit string, mask
my $l = requireSameLength $string, $mask;
my $f = '';
for my $i(0..$l-1) # Each character in the string and mask
{my $s = substr($string, $i, 1);
$f .= substr($mask, $i, 1) eq '0' ? $s : $s eq '0' ? '1' : '0'
}
$f
}
sub compareTwosComplement($$) # Compare two numbers in two's complement formats and return -1 if the first number is less than the second, 0 if they are equal, else +1
{my ($a, $b) = @_; # First, second
my $n = requireSameLength $a, $b;
return -1 if substr($a, 0, 1) eq '1' and substr($b, 0, 1) eq '0'; # Leading sign bit
return +1 if substr($a, 0, 1) eq '0' and substr($b, 0, 1) eq '1';
for(1..$n) # Non sign bits
lib/Simd/Avx512.pm view on Meta::CPAN
#D1 VPTEST # Packed TEST
#D2 VPTESTM # Packed TEST MASK
sub andAndTest($$) #P And two bit strings of the same length and return 0 if the result is 0 else 1
{my ($a, $b) = @_; # Element, element
my $N = requireSameLength $a, $b; # Check that the two elements have the same length
for(0..$N-1) # Look for match
{return 1 if substr($a, $_, 1) eq '1' and substr($b, $_, 1) eq '1';
}
0
}
lib/Simd/Avx512.pm view on Meta::CPAN
#D2 VPCOMPRESS # Packed COMPRESS
sub vpcompress($$$$$) #P Packed COMPRESS
{my ($size, $xmm1, $k2, $z, $xmm2) = @_; # Size of each element in bits, Compression target, compression mask, clear upper elements, source to compress
require64 $k2;
my $n = require128or256or512 $xmm1, $xmm2;
my $N = $n / $size; # Number of elements
$xmm1 = '0' x length $xmm1 if $z; # Clear target if requested
my $p = 0; # Position in target
for(1..$N) # Compress selected elements
{if (substr($k2, -$_, 1) eq '1')
lib/Simd/Avx512.pm view on Meta::CPAN
#D2 VPEXPAND # Packed EXPAND
sub vpexpand($$$$$) #P Packed EXPAND
{my ($size, $xmm1, $k2, $z, $xmm2) = @_; # Size of each element in bits, Compression target, expansion mask, clear upper elements, source to expand
require64 $k2;
my $n = require128or256or512 $xmm1, $xmm2;
my $N = $n / $size; # Number of elements
$xmm1 = '0' x length $xmm1 if $z; # Clear target if requested
my $p = 0; # Position in target
for(1..$N) # Compress selected elements
{if (substr($k2, -$_, 1) eq '1')
view release on metacpan or search on metacpan
lib/Slovo/resources/public/js/editormd/languages/en.js view on Meta::CPAN
factory(editormd);
});
} else { // for Sea.js
define(function(require) {
var editormd = require("../editormd");
factory(editormd);
});
}
}
else
view release on metacpan or search on metacpan
xs/sc_ssl/openssl/source/crypto/ec/ec2_smpl.c view on Meta::CPAN
}
return 1;
}
/* ret := required output buffer length */
field_len = (EC_GROUP_get_degree(group) + 7) / 8;
ret = (form == POINT_CONVERSION_COMPRESSED) ? 1 + field_len : 1 + 2*field_len;
/* if 'buf' is NULL, just return required length */
if (buf != NULL)
view release on metacpan or search on metacpan
[Prereqs]
Moo = 1.006000
[Prereqs / DevelopRequires ]
-phase = develop
-relationship = requires
Test::CPAN::Changes = 0
Software::Security::Policy::Individual = 0.10
[Prereqs / TestRequires]
[EnsurePrereqsInstalled]
:version = 0.003
type = requires
type = recommends
[SecurityPolicy]
-policy = Individual
timeframe = 2 weeks
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
But, it's more interesting than that. You can load it with C<require>
and call C<arguments> to get the data structure it passes to
C<WriteMakefile>:
my $package = require '/path/to/Makefile.PL';
my $arguments = $package->arguments;
Note that C<require>-ing a file makes an entry in C<%INC> for exactly
that name. If you try to C<require> another file with the same name,
even from a different path, C<require> thinks it has already loaded
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
But, it's more interesting than that. You can load it with C<require>
and call C<arguments> to get the data structure it passes to
C<WriteMakefile>:
my $package = require '/path/to/Makefile.PL';
my $arguments = $package->arguments;
Note that C<require>-ing a file makes an entry in C<%INC> for exactly
that name. If you try to C<require> another file with the same name,
even from a different path, C<require> thinks it has already loaded
view release on metacpan or search on metacpan
Ref::Util = 0.112
Sub::Quote = 0
[DynamicPrereqs]
-condition = $] >= 5.010
-body = requires('XString')
[MetaNoIndex]
directory = t/lib
[PurePerlTests]
view release on metacpan or search on metacpan
license = MIT
copyright_holder = Jesse Luehrs
[Prereqs / TestMoreDoneTesting]
-phase = test
-type = requires
Test::More = 0.88
[GatherDir]
prune_directory = nytprof
exclude_filename = t/ahihi.t
view release on metacpan or search on metacpan
skip = ^Moose::Util
skip = ^Spreadsheet::XLSX::Reader::LibXML::LogSpace
[Prereqs / ConfigureRecomends]
-phase = configure
-relationship = requires
Alien::LibXML = 0.003
[Prereqs / TestRecomends]
-phase = test
-relationship = requires
perl = 5.010
Archive::Zip = 0
Carp = 0
Clone = 0
view release on metacpan or search on metacpan
[Prereqs / @Author::KENTNL/::Role::BundleDeps]
; twitter_extra_hash_tags =
; auto_prereqs_skip = File::Find
-phase = develop
-relationship = requires
Dist::Zilla::Plugin::Author::KENTNL::CONTRIBUTING = 0.001003
Dist::Zilla::Plugin::Author::KENTNL::RecommendFixes = 0.004002
Dist::Zilla::Plugin::Author::KENTNL::TravisCI = 0.001002
Dist::Zilla::Plugin::Authority = 1.006
Dist::Zilla::Plugin::AutoPrereqs = 0
view release on metacpan or search on metacpan
# OR (Use Animal inherited persistance):
$Animal::shp->{'dbh'} = $dbh;
# TODO: Create reference file anim_data.pl to be used for population AND deep compare
# Create this statically with features of 03selects.t
#LOAD:
my $animarr = require("anim_data.pl");
ok(ref($animarr), "Got Animal data (Perl)");
my $icnt = scalar(@$animarr);
my $ocnt = scalar( grep({ref($_) eq 'HASH';} @$animarr) );
ok($ocnt == $icnt, "All ($icnt) are Hashes"); # Check all are hashes
# BLESS: ?
view release on metacpan or search on metacpan
lib/Strehler/public/strehler/js/jquery.js view on Meta::CPAN
// For CommonJS and CommonJS-like environments where a proper window is present,
// execute the factory and get jQuery
// For environments that do not inherently posses a window with a document
// (such as Node.js), expose a jQuery-making factory as module.exports
// This accentuates the need for the creation of a real window
// e.g. var jQuery = require("jquery")(window);
// See ticket #14549 for more info
module.exports = global.document ?
factory( global, true ) :
function( w ) {
if ( !w.document ) {
view release on metacpan or search on metacpan
lib/String/Redactable.pm view on Meta::CPAN
;
my %keys = ();
my $new_key = sub ($class, $length = 512) {
state $rc = require List::Util;
substr(
join( '',
List::Util::shuffle(
map { List::Util::shuffle( 'A' .. 'Z', 'a' .. 'z', qw(= ! : ;) ) } 1 .. 25
)
lib/String/Redactable.pm view on Meta::CPAN
The value that is substituted for the actual string.
=cut
sub placeholder ( $class ) {
state $rc = require Carp;
Carp::cluck(
"Possible unintended interpolation of a redactable string",
) if warnings::enabled();
'<redacted data>'
}
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
But, it's more interesting than that. You can load it with C<require>
and call C<arguments> to get the data structure it passes to
C<WriteMakefile>:
my $package = require '/path/to/Makefile.PL';
my $arguments = $package->arguments;
Note that C<require>-ing a file makes an entry in C<%INC> for exactly
that name. If you try to C<require> another file with the same name,
even from a different path, C<require> thinks it has already loaded
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
But, it's more interesting than that. You can load it with C<require>
and call C<arguments> to get the data structure it passes to
C<WriteMakefile>:
my $package = require '/path/to/Makefile.PL';
my $arguments = $package->arguments;
Note that C<require>-ing a file makes an entry in C<%INC> for exactly
that name. If you try to C<require> another file with the same name,
even from a different path, C<require> thinks it has already loaded
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
But, it's more interesting than that. You can load it with C<require>
and call C<arguments> to get the data structure it passes to
C<WriteMakefile>:
my $package = require '/path/to/Makefile.PL';
my $arguments = $package->arguments;
Note that C<require>-ing a file makes an entry in C<%INC> for exactly
that name. If you try to C<require> another file with the same name,
even from a different path, C<require> thinks it has already loaded
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
But, it's more interesting than that. You can load it with C<require>
and call C<arguments> to get the data structure it passes to
C<WriteMakefile>:
my $package = require '/path/to/Makefile.PL';
my $arguments = $package->arguments;
Note that C<require>-ing a file makes an entry in C<%INC> for exactly
that name. If you try to C<require> another file with the same name,
even from a different path, C<require> thinks it has already loaded