Result:
found more than 919 distributions - search limited to the first 2001 files matching your query
( run in 2.087 )
Alien-Selenium
view release on metacpan or search on metacpan
inc/My/Module/Build.pm view on Meta::CPAN
write_file("$fakemoduledir/Build.PL", $sample_Build_PL);
mkdir("$fakemoduledir/lib");
mkdir("$fakemoduledir/lib/Fake");
=begin this_pod_is_not_mine
=cut
my $fakemodule = <<'FAKE_MODULE';
#!perl -w
inc/My/Module/Build.pm view on Meta::CPAN
package This::Package::Should::Not::Be::Reported::In::METAyml;
FAKE_MODULE
=end this_pod_is_not_mine
=cut
write_file("$fakemoduledir/lib/Fake/Module.pm", $fakemodule);
Alien-SmokeQt
view release on metacpan or search on metacpan
generator/parser/lexer.cpp view on Meta::CPAN
ADD_TOKEN(long);
ADD_TOKEN(mutable);
ADD_TOKEN(namespace);
ADD_TOKEN(new);
ADD_TOKEN(not);
ADD_TOKEN(not_eq);
ADD_TOKEN(operator);
ADD_TOKEN(or);
ADD_TOKEN(or_eq);
ADD_TOKEN(private);
ADD_TOKEN(protected);
generator/parser/lexer.cpp view on Meta::CPAN
void Lexer::scan_not()
{
/*
'!' ::= not
'!=' ::= not_equal
*/
++cursor;
if (*cursor == '=')
{
++cursor;
(*session->token_stream)[index++].kind = Token_not_eq;
}
else
{
(*session->token_stream)[index++].kind = '!';
}
Alien-Tar-Size
view release on metacpan or search on metacpan
xt/boilerplate.t view on Meta::CPAN
use warnings;
use Test::More;
plan tests => 3;
sub not_in_file_ok {
my ($filename, %regex) = @_;
open( my $fh, '<', $filename )
or die "couldn't open $filename for reading: $!";
my %violated;
xt/boilerplate.t view on Meta::CPAN
}
}
sub module_boilerplate_ok {
my ($module) = @_;
not_in_file_ok($module =>
'the great new $MODULENAME' => qr/ - The great new /,
'boilerplate description' => qr/Quick summary of what the module/,
'stub function definition' => qr/function[12]/,
);
}
TODO: {
local $TODO = "Need to replace the boilerplate text";
not_in_file_ok(README =>
"The README is used..." => qr/The README is used/,
"'version information here'" => qr/to provide version information/,
);
not_in_file_ok(Changes =>
"placeholder date/time" => qr(Date/time)
);
module_boilerplate_ok('lib/Alien/Tar/Size.pm');
Alien-TinyCC
view release on metacpan or search on metacpan
src/tccasm.c view on Meta::CPAN
break;
next();
asm_expr_logic(s1, &e2);
if (op == '+') {
if (pe->sym != NULL && e2.sym != NULL)
goto cannot_relocate;
pe->v += e2.v;
if (pe->sym == NULL && e2.sym != NULL)
pe->sym = e2.sym;
} else {
pe->v -= e2.v;
src/tccasm.c view on Meta::CPAN
/* OK */
} else if (pe->sym->r == e2.sym->r && pe->sym->r != 0) {
/* we also accept defined symbols in the same section */
pe->v += pe->sym->jnext - e2.sym->jnext;
} else {
goto cannot_relocate;
}
pe->sym = NULL; /* same symbols can be substracted to NULL */
} else {
cannot_relocate:
tcc_error("invalid operation with label");
}
}
}
}
Alien-TinyCCx
view release on metacpan or search on metacpan
src/tccasm.c view on Meta::CPAN
break;
next();
asm_expr_logic(s1, &e2);
if (op == '+') {
if (pe->sym != NULL && e2.sym != NULL)
goto cannot_relocate;
pe->v += e2.v;
if (pe->sym == NULL && e2.sym != NULL)
pe->sym = e2.sym;
} else {
pe->v -= e2.v;
src/tccasm.c view on Meta::CPAN
/* OK */
} else if (pe->sym->r == e2.sym->r && pe->sym->r != 0) {
/* we also accept defined symbols in the same section */
pe->v += pe->sym->jnext - e2.sym->jnext;
} else {
goto cannot_relocate;
}
pe->sym = NULL; /* same symbols can be subtracted to NULL */
} else {
cannot_relocate:
tcc_error("invalid operation with label");
}
}
}
}
Alien-XGBoost
view release on metacpan or search on metacpan
xgboost/R-package/R/callbacks.R view on Meta::CPAN
if (is.null(env$bst) && is.null(env$bst_folds))
stop("Parent frame has neither 'bst' nor 'bst_folds'")
# Some parameters are not allowed to be changed,
# since changing them would simply wreck some chaos
not_allowed <- pnames %in%
c('num_class', 'num_output_group', 'size_leaf_vector', 'updater_seq')
if (any(not_allowed))
stop('Parameters ', paste(pnames[not_allowed]), " cannot be changed during boosting.")
for (n in pnames) {
p <- new_params[[n]]
if (is.function(p)) {
if (length(formals(p)) != 2)
Alien-boost-mini
view release on metacpan or search on metacpan
include/boost/mpl/aux_/preprocessed/bcc/list.hpp
include/boost/mpl/aux_/preprocessed/bcc/list_c.hpp
include/boost/mpl/aux_/preprocessed/bcc/map.hpp
include/boost/mpl/aux_/preprocessed/bcc/minus.hpp
include/boost/mpl/aux_/preprocessed/bcc/modulus.hpp
include/boost/mpl/aux_/preprocessed/bcc/not_equal_to.hpp
include/boost/mpl/aux_/preprocessed/bcc/or.hpp
include/boost/mpl/aux_/preprocessed/bcc/placeholders.hpp
include/boost/mpl/aux_/preprocessed/bcc/plus.hpp
include/boost/mpl/aux_/preprocessed/bcc/quote.hpp
include/boost/mpl/aux_/preprocessed/bcc/reverse_fold_impl.hpp
include/boost/mpl/aux_/preprocessed/bcc551/list.hpp
include/boost/mpl/aux_/preprocessed/bcc551/list_c.hpp
include/boost/mpl/aux_/preprocessed/bcc551/map.hpp
include/boost/mpl/aux_/preprocessed/bcc551/minus.hpp
include/boost/mpl/aux_/preprocessed/bcc551/modulus.hpp
include/boost/mpl/aux_/preprocessed/bcc551/not_equal_to.hpp
include/boost/mpl/aux_/preprocessed/bcc551/or.hpp
include/boost/mpl/aux_/preprocessed/bcc551/placeholders.hpp
include/boost/mpl/aux_/preprocessed/bcc551/plus.hpp
include/boost/mpl/aux_/preprocessed/bcc551/quote.hpp
include/boost/mpl/aux_/preprocessed/bcc551/reverse_fold_impl.hpp
include/boost/mpl/aux_/preprocessed/bcc_pre590/list.hpp
include/boost/mpl/aux_/preprocessed/bcc_pre590/list_c.hpp
include/boost/mpl/aux_/preprocessed/bcc_pre590/map.hpp
include/boost/mpl/aux_/preprocessed/bcc_pre590/minus.hpp
include/boost/mpl/aux_/preprocessed/bcc_pre590/modulus.hpp
include/boost/mpl/aux_/preprocessed/bcc_pre590/not_equal_to.hpp
include/boost/mpl/aux_/preprocessed/bcc_pre590/or.hpp
include/boost/mpl/aux_/preprocessed/bcc_pre590/placeholders.hpp
include/boost/mpl/aux_/preprocessed/bcc_pre590/plus.hpp
include/boost/mpl/aux_/preprocessed/bcc_pre590/quote.hpp
include/boost/mpl/aux_/preprocessed/bcc_pre590/reverse_fold_impl.hpp
include/boost/mpl/aux_/preprocessed/dmc/list.hpp
include/boost/mpl/aux_/preprocessed/dmc/list_c.hpp
include/boost/mpl/aux_/preprocessed/dmc/map.hpp
include/boost/mpl/aux_/preprocessed/dmc/minus.hpp
include/boost/mpl/aux_/preprocessed/dmc/modulus.hpp
include/boost/mpl/aux_/preprocessed/dmc/not_equal_to.hpp
include/boost/mpl/aux_/preprocessed/dmc/or.hpp
include/boost/mpl/aux_/preprocessed/dmc/placeholders.hpp
include/boost/mpl/aux_/preprocessed/dmc/plus.hpp
include/boost/mpl/aux_/preprocessed/dmc/quote.hpp
include/boost/mpl/aux_/preprocessed/dmc/reverse_fold_impl.hpp
include/boost/mpl/aux_/preprocessed/gcc/list.hpp
include/boost/mpl/aux_/preprocessed/gcc/list_c.hpp
include/boost/mpl/aux_/preprocessed/gcc/map.hpp
include/boost/mpl/aux_/preprocessed/gcc/minus.hpp
include/boost/mpl/aux_/preprocessed/gcc/modulus.hpp
include/boost/mpl/aux_/preprocessed/gcc/not_equal_to.hpp
include/boost/mpl/aux_/preprocessed/gcc/or.hpp
include/boost/mpl/aux_/preprocessed/gcc/placeholders.hpp
include/boost/mpl/aux_/preprocessed/gcc/plus.hpp
include/boost/mpl/aux_/preprocessed/gcc/quote.hpp
include/boost/mpl/aux_/preprocessed/gcc/reverse_fold_impl.hpp
include/boost/mpl/aux_/preprocessed/msvc60/list.hpp
include/boost/mpl/aux_/preprocessed/msvc60/list_c.hpp
include/boost/mpl/aux_/preprocessed/msvc60/map.hpp
include/boost/mpl/aux_/preprocessed/msvc60/minus.hpp
include/boost/mpl/aux_/preprocessed/msvc60/modulus.hpp
include/boost/mpl/aux_/preprocessed/msvc60/not_equal_to.hpp
include/boost/mpl/aux_/preprocessed/msvc60/or.hpp
include/boost/mpl/aux_/preprocessed/msvc60/placeholders.hpp
include/boost/mpl/aux_/preprocessed/msvc60/plus.hpp
include/boost/mpl/aux_/preprocessed/msvc60/quote.hpp
include/boost/mpl/aux_/preprocessed/msvc60/reverse_fold_impl.hpp
include/boost/mpl/aux_/preprocessed/msvc70/list.hpp
include/boost/mpl/aux_/preprocessed/msvc70/list_c.hpp
include/boost/mpl/aux_/preprocessed/msvc70/map.hpp
include/boost/mpl/aux_/preprocessed/msvc70/minus.hpp
include/boost/mpl/aux_/preprocessed/msvc70/modulus.hpp
include/boost/mpl/aux_/preprocessed/msvc70/not_equal_to.hpp
include/boost/mpl/aux_/preprocessed/msvc70/or.hpp
include/boost/mpl/aux_/preprocessed/msvc70/placeholders.hpp
include/boost/mpl/aux_/preprocessed/msvc70/plus.hpp
include/boost/mpl/aux_/preprocessed/msvc70/quote.hpp
include/boost/mpl/aux_/preprocessed/msvc70/reverse_fold_impl.hpp
include/boost/mpl/aux_/preprocessed/mwcw/list.hpp
include/boost/mpl/aux_/preprocessed/mwcw/list_c.hpp
include/boost/mpl/aux_/preprocessed/mwcw/map.hpp
include/boost/mpl/aux_/preprocessed/mwcw/minus.hpp
include/boost/mpl/aux_/preprocessed/mwcw/modulus.hpp
include/boost/mpl/aux_/preprocessed/mwcw/not_equal_to.hpp
include/boost/mpl/aux_/preprocessed/mwcw/or.hpp
include/boost/mpl/aux_/preprocessed/mwcw/placeholders.hpp
include/boost/mpl/aux_/preprocessed/mwcw/plus.hpp
include/boost/mpl/aux_/preprocessed/mwcw/quote.hpp
include/boost/mpl/aux_/preprocessed/mwcw/reverse_fold_impl.hpp
include/boost/mpl/aux_/preprocessed/no_ctps/list.hpp
include/boost/mpl/aux_/preprocessed/no_ctps/list_c.hpp
include/boost/mpl/aux_/preprocessed/no_ctps/map.hpp
include/boost/mpl/aux_/preprocessed/no_ctps/minus.hpp
include/boost/mpl/aux_/preprocessed/no_ctps/modulus.hpp
include/boost/mpl/aux_/preprocessed/no_ctps/not_equal_to.hpp
include/boost/mpl/aux_/preprocessed/no_ctps/or.hpp
include/boost/mpl/aux_/preprocessed/no_ctps/placeholders.hpp
include/boost/mpl/aux_/preprocessed/no_ctps/plus.hpp
include/boost/mpl/aux_/preprocessed/no_ctps/quote.hpp
include/boost/mpl/aux_/preprocessed/no_ctps/reverse_fold_impl.hpp
include/boost/mpl/aux_/preprocessed/no_ttp/list.hpp
include/boost/mpl/aux_/preprocessed/no_ttp/list_c.hpp
include/boost/mpl/aux_/preprocessed/no_ttp/map.hpp
include/boost/mpl/aux_/preprocessed/no_ttp/minus.hpp
include/boost/mpl/aux_/preprocessed/no_ttp/modulus.hpp
include/boost/mpl/aux_/preprocessed/no_ttp/not_equal_to.hpp
include/boost/mpl/aux_/preprocessed/no_ttp/or.hpp
include/boost/mpl/aux_/preprocessed/no_ttp/placeholders.hpp
include/boost/mpl/aux_/preprocessed/no_ttp/plus.hpp
include/boost/mpl/aux_/preprocessed/no_ttp/quote.hpp
include/boost/mpl/aux_/preprocessed/no_ttp/reverse_fold_impl.hpp
include/boost/mpl/aux_/preprocessed/plain/list.hpp
include/boost/mpl/aux_/preprocessed/plain/list_c.hpp
include/boost/mpl/aux_/preprocessed/plain/map.hpp
include/boost/mpl/aux_/preprocessed/plain/minus.hpp
include/boost/mpl/aux_/preprocessed/plain/modulus.hpp
include/boost/mpl/aux_/preprocessed/plain/not_equal_to.hpp
include/boost/mpl/aux_/preprocessed/plain/or.hpp
include/boost/mpl/aux_/preprocessed/plain/placeholders.hpp
include/boost/mpl/aux_/preprocessed/plain/plus.hpp
include/boost/mpl/aux_/preprocessed/plain/quote.hpp
include/boost/mpl/aux_/preprocessed/plain/reverse_fold_impl.hpp
include/boost/preprocessor/comparison/equal.hpp
include/boost/preprocessor/comparison/greater.hpp
include/boost/preprocessor/comparison/greater_equal.hpp
include/boost/preprocessor/comparison/less.hpp
include/boost/preprocessor/comparison/less_equal.hpp
include/boost/preprocessor/comparison/not_equal.hpp
include/boost/preprocessor/config/config.hpp
include/boost/preprocessor/config/limits.hpp
include/boost/preprocessor/control.hpp
include/boost/preprocessor/control/deduce_d.hpp
include/boost/preprocessor/control/detail/dmc/while.hpp
Alien-cares
view release on metacpan or search on metacpan
libcares/CHANGES.0 view on Meta::CPAN
with the low-level curl debug memory tracking 'feature' to allow decoupled
setting from --enable-debug, allowing again to build c-ares independently
out of the CVS tree.
For the c-ares library option --enable-debug enables debug build features
which are _not_ related with memory tracking. For the c-ares library when
--enable-debug is given it does not enable the memory tracking feature. If
you wish to enable the curl debug memory tracking you must use configure
option --enable-curldebug explicitily to do so.
Internally, definition of preprocessor symbol DEBUGBUILD restricts code
Alien-catch
view release on metacpan or search on metacpan
src/catch.hpp view on Meta::CPAN
};
}
#endif // CATCH_CONFIG_ENABLE_TUPLE_STRINGMAKER
namespace Catch {
struct not_this_one {}; // Tag type for detecting which begin/ end are being selected
// Import begin/ end from std here so they are considered alongside the fallback (...) overloads in this namespace
using std::begin;
using std::end;
not_this_one begin( ... );
not_this_one end( ... );
template <typename T>
struct is_range {
static const bool value =
!std::is_same<decltype(begin(std::declval<T>())), not_this_one>::value &&
!std::is_same<decltype(end(std::declval<T>())), not_this_one>::value;
};
#if defined(_MANAGED) // Managed types are never ranges
template <typename T>
struct is_range<T^> {
src/catch.hpp view on Meta::CPAN
toLowerInPlace( lc );
return lc;
}
std::string trim( std::string const& str ) {
static char const* whitespaceChars = "\n\r\t ";
std::string::size_type start = str.find_first_not_of( whitespaceChars );
std::string::size_type end = str.find_last_not_of( whitespaceChars );
return start != std::string::npos ? str.substr( start, 1+end-start ) : std::string();
}
bool replaceInPlace( std::string& str, std::string const& replaceThis, std::string const& withThis ) {
src/catch.hpp view on Meta::CPAN
ReusableStringStream rss;
rss << std::setprecision( precision )
<< std::fixed
<< value;
std::string d = rss.str();
std::size_t i = d.find_last_not_of( '0' );
if( i != std::string::npos && i != d.size()-1 ) {
if( d[i] == '.' )
i++;
d = d.substr( 0, i+1 );
}
Alien-libFLAC
view release on metacpan or search on metacpan
xt/boilerplate.t view on Meta::CPAN
use warnings;
use Test::More;
plan tests => 3;
sub not_in_file_ok {
my ($filename, %regex) = @_;
open( my $fh, '<', $filename )
or die "couldn't open $filename for reading: $!";
my %violated;
xt/boilerplate.t view on Meta::CPAN
}
}
sub module_boilerplate_ok {
my ($module) = @_;
not_in_file_ok($module =>
'the great new $MODULENAME' => qr/ - The great new /,
'boilerplate description' => qr/Quick summary of what the module/,
'stub function definition' => qr/function[12]/,
);
}
TODO: {
local $TODO = "Need to replace the boilerplate text";
not_in_file_ok(README =>
"The README is used..." => qr/The README is used/,
"'version information here'" => qr/to provide version information/,
);
not_in_file_ok(Changes =>
"placeholder date/time" => qr(Date/time)
);
module_boilerplate_ok('lib/Alien/libFLAC.pm');
Alien-libextism
view release on metacpan or search on metacpan
xt/boilerplate.t view on Meta::CPAN
use warnings;
use Test::More;
plan tests => 3;
sub not_in_file_ok {
my ($filename, %regex) = @_;
open( my $fh, '<', $filename )
or die "couldn't open $filename for reading: $!";
my %violated;
xt/boilerplate.t view on Meta::CPAN
}
}
sub module_boilerplate_ok {
my ($module) = @_;
not_in_file_ok($module =>
'the great new $MODULENAME' => qr/ - The great new /,
'boilerplate description' => qr/Quick summary of what the module/,
'stub function definition' => qr/function[12]/,
);
}
TODO: {
local $TODO = "Need to replace the boilerplate text";
not_in_file_ok(README =>
"The README is used..." => qr/The README is used/,
"'version information here'" => qr/to provide version information/,
);
not_in_file_ok(Changes =>
"placeholder date/time" => qr(Date/time)
);
module_boilerplate_ok('lib/Alien/libextism.pm');
Alien-libpanda
view release on metacpan or search on metacpan
1.0.5 08.09.2017
- string::append now can use COW in case of empty string
1.0.4 07.05.2017
- shared_ptr::operator bool is explicit now
1.0.3 16.05.2017
- fix default pos value for find_last_of, find_last_not_of
1.0.2 16.05.2017
- bugfix for stoX group of functions in case of no pos argument
1.0.1 15.05.2017
- do not bootstrap so library (no XS code inside), it will be loaded automatically because of "-l" linker flag
1.0.0 11.05.2017
Alien-libsecp256k1
view release on metacpan or search on metacpan
libsecp256k1/include/secp256k1_extrakeys.h view on Meta::CPAN
*
* The tweaked pubkey is represented by its 32-byte x-only serialization and
* its pk_parity, which can both be obtained by converting the result of
* tweak_add to a secp256k1_xonly_pubkey.
*
* Note that this alone does _not_ verify that the tweaked pubkey is a
* commitment. If the tweak is not chosen in a specific way, the tweaked pubkey
* can easily be the result of a different internal_pubkey and tweak.
*
* Returns: 0 if the arguments are invalid or the tweaked pubkey is not the
* result of tweaking the internal_pubkey with tweak32. 1 otherwise.
Alien-uv
view release on metacpan or search on metacpan
libuv/src/unix/udp.c view on Meta::CPAN
assert(handle->send_queue_count == 0);
/* Now tear down the handle. */
handle->recv_cb = NULL;
handle->alloc_cb = NULL;
/* but _do not_ touch close_cb */
}
static void uv__udp_run_completed(uv_udp_t* handle) {
uv_udp_send_t* req;
AlignDB-IntSpan
view release on metacpan or search on metacpan
lib/AlignDB/IntSpan.pm view on Meta::CPAN
use Scalar::Util;
use Scalar::Util::Numeric;
use overload (
q{0+} => sub { Carp::confess "Can't numerify an AlignDB::IntSpan\n" },
q{bool} => q{is_not_empty},
q{""} => q{as_string},
# use Perl standard behaviours for other operations
fallback => 1,
);
lib/AlignDB/IntSpan.pm view on Meta::CPAN
my $self = shift;
my $result = $self->edge_size == 0 ? 1 : 0;
return $result;
}
sub is_not_empty {
my $self = shift;
return !$self->is_empty;
}
sub is_neg_inf {
lib/AlignDB/IntSpan.pm view on Meta::CPAN
#@returns AlignDB::IntSpan
sub cover {
my $self = shift;
my $cover = Scalar::Util::blessed($self)->new;
if ( $self->is_not_empty ) {
$cover->add_pair( $self->min, $self->max );
}
return $cover;
}
lib/AlignDB/IntSpan.pm view on Meta::CPAN
=head2 is_empty
Return true if the set is empty.
=head2 is_not_empty
Return true if the set is not empty.
=head2 is_neg_inf
AlignDB-IntSpanXS
view release on metacpan or search on metacpan
benchmark/test_ai.pl view on Meta::CPAN
print Dump {
edge_size => $itx->edge_size,
edges => [ $itx->edges ],
ranges => [ $itx->ranges ],
is_empty => $itx->is_empty,
is_not_empty => $itx->is_not_empty,
as_string => $itx->as_string,
};
for ( -5, 29, 100 ) {
printf "val %d contain %d\n", $_, $itx->contains($_);
Alt-Acme-Math-XS-CPP
view release on metacpan or search on metacpan
inc/Inline.pm view on Meta::CPAN
my @pkgparts = split(/::/, $o->{API}{pkg});
my $realname = File::Spec->catfile(@pkgparts) . '.pm';
my $realname_unix = File::Spec::Unix->catfile(@pkgparts) . '.pm';
my $realpath = $INC{$realname_unix}
or croak M27_module_not_indexed($realname_unix);
my ($volume,$dir,$file) = File::Spec->splitpath($realpath);
my @dirparts = File::Spec->splitdir($dir);
pop @dirparts unless $dirparts[-1];
push @dirparts, $file;
inc/Inline.pm view on Meta::CPAN
local ($/, *CODE);
open CODE, "< $code" or croak M06_code_file_failed_open($code);
$o->{API}{code} = <CODE>;
}
else {
croak M07_code_file_does_not_exist($code);
}
}
else {
$o->{API}{code} = $code;
}
inc/Inline.pm view on Meta::CPAN
croak M59_bad_inline_file($lang) unless $langfile =~ /^[A-Z]\w*$/;
croak M60_no_inline_files()
unless (defined $INC{File::Spec::Unix->catfile("Inline","Files.pm")} and
$Inline::Files::VERSION =~ /^\d\.\d\d$/ and
$Inline::Files::VERSION ge '0.51');
croak M61_not_parsed() unless $lang = Inline::Files::get_filename($pkg);
{
no strict 'refs';
local $/;
$Inline::FILE = \*{"${pkg}::$langfile"};
# open $Inline::FILE;
inc/Inline.pm view on Meta::CPAN
#==============================================================================
sub install {
my ($module, $DIRECTORY);
my $o = shift;
croak M64_install_not_c($o->{API}{language_id})
unless uc($o->{API}{language_id}) =~ /^(C|CPP|Java|Python|Ruby|Lisp|Pdlpp)$/ ;
croak M36_usage_install_main()
if ($o->{API}{pkg} eq 'main');
croak M37_usage_install_auto()
if $o->{CONFIG}{AUTONAME};
inc/Inline.pm view on Meta::CPAN
my $o = shift;
my @configs;
for my $mod (@{$o->{CONFIG}{WITH}}) {
my $ref = eval { $mod->Inline($o->{API}{language}); };
croak M25_no_WITH_support($mod, $@) if $@;
croak M65_WITH_not_lang($mod, $o->{API}{language}) unless $ref;
push @configs, %$ref;
}
return @configs;
}
inc/Inline.pm view on Meta::CPAN
END
#'
}
sub M07_code_file_does_not_exist {
my ($file) = @_;
return <<END;
Inline assumes '$file' is a filename,
and that file does not exist.
inc/Inline.pm view on Meta::CPAN
Specifying VERSION option without NAME option is not permitted.
END
}
sub M27_module_not_indexed {
my ($mod) = @_;
return <<END;
You are attempting to load an extension for '$mod',
but there is no entry for that module in %INC.
inc/Inline.pm view on Meta::CPAN
You need to explicitly 'use Inline::Files;' before your 'use Inline'.
END
}
sub M61_not_parsed {
return <<END;
It does not appear that your program has been properly parsed by Inline::Files.
END
}
inc/Inline.pm view on Meta::CPAN
You may need to reinstall this module.
END
}
sub M64_install_not_c {
my ($lang) = @_;
return <<END;
Invalid attempt to install an Inline module using the '$lang' language.
Only C and CPP (C++) based modules are currently supported.
END
}
sub M65_WITH_not_lang {
my ($mod, $lang) = @_;
return <<END;
$mod gave no 'with' hints for $lang.
END
}
Alt-Acme-Math-XS-ModuleBuild
view release on metacpan or search on metacpan
inc/Inline.pm view on Meta::CPAN
my @pkgparts = split(/::/, $o->{API}{pkg});
my $realname = File::Spec->catfile(@pkgparts) . '.pm';
my $realname_unix = File::Spec::Unix->catfile(@pkgparts) . '.pm';
my $realpath = $INC{$realname_unix}
or croak M27_module_not_indexed($realname_unix);
my ($volume,$dir,$file) = File::Spec->splitpath($realpath);
my @dirparts = File::Spec->splitdir($dir);
pop @dirparts unless $dirparts[-1];
push @dirparts, $file;
inc/Inline.pm view on Meta::CPAN
local ($/, *CODE);
open CODE, "< $code" or croak M06_code_file_failed_open($code);
$o->{API}{code} = <CODE>;
}
else {
croak M07_code_file_does_not_exist($code);
}
}
else {
$o->{API}{code} = $code;
}
inc/Inline.pm view on Meta::CPAN
croak M59_bad_inline_file($lang) unless $langfile =~ /^[A-Z]\w*$/;
croak M60_no_inline_files()
unless (defined $INC{File::Spec::Unix->catfile("Inline","Files.pm")} and
$Inline::Files::VERSION =~ /^\d\.\d\d$/ and
$Inline::Files::VERSION ge '0.51');
croak M61_not_parsed() unless $lang = Inline::Files::get_filename($pkg);
{
no strict 'refs';
local $/;
$Inline::FILE = \*{"${pkg}::$langfile"};
# open $Inline::FILE;
inc/Inline.pm view on Meta::CPAN
#==============================================================================
sub install {
my ($module, $DIRECTORY);
my $o = shift;
croak M64_install_not_c($o->{API}{language_id})
unless uc($o->{API}{language_id}) =~ /^(C|CPP|Java|Python|Ruby|Lisp|Pdlpp)$/ ;
croak M36_usage_install_main()
if ($o->{API}{pkg} eq 'main');
croak M37_usage_install_auto()
if $o->{CONFIG}{AUTONAME};
inc/Inline.pm view on Meta::CPAN
my $o = shift;
my @configs;
for my $mod (@{$o->{CONFIG}{WITH}}) {
my $ref = eval { $mod->Inline($o->{API}{language}); };
croak M25_no_WITH_support($mod, $@) if $@;
croak M65_WITH_not_lang($mod, $o->{API}{language}) unless $ref;
push @configs, %$ref;
}
return @configs;
}
inc/Inline.pm view on Meta::CPAN
END
#'
}
sub M07_code_file_does_not_exist {
my ($file) = @_;
return <<END;
Inline assumes '$file' is a filename,
and that file does not exist.
inc/Inline.pm view on Meta::CPAN
Specifying VERSION option without NAME option is not permitted.
END
}
sub M27_module_not_indexed {
my ($mod) = @_;
return <<END;
You are attempting to load an extension for '$mod',
but there is no entry for that module in %INC.
inc/Inline.pm view on Meta::CPAN
You need to explicitly 'use Inline::Files;' before your 'use Inline'.
END
}
sub M61_not_parsed {
return <<END;
It does not appear that your program has been properly parsed by Inline::Files.
END
}
inc/Inline.pm view on Meta::CPAN
You may need to reinstall this module.
END
}
sub M64_install_not_c {
my ($lang) = @_;
return <<END;
Invalid attempt to install an Inline module using the '$lang' language.
Only C and CPP (C++) based modules are currently supported.
END
}
sub M65_WITH_not_lang {
my ($mod, $lang) = @_;
return <<END;
$mod gave no 'with' hints for $lang.
END
}
Alt-Acme-Math-XS-ModuleInstall
view release on metacpan or search on metacpan
inc/Inline.pm view on Meta::CPAN
my @pkgparts = split(/::/, $o->{API}{pkg});
my $realname = File::Spec->catfile(@pkgparts) . '.pm';
my $realname_unix = File::Spec::Unix->catfile(@pkgparts) . '.pm';
my $realpath = $INC{$realname_unix}
or croak M27_module_not_indexed($realname_unix);
my ($volume,$dir,$file) = File::Spec->splitpath($realpath);
my @dirparts = File::Spec->splitdir($dir);
pop @dirparts unless $dirparts[-1];
push @dirparts, $file;
inc/Inline.pm view on Meta::CPAN
local ($/, *CODE);
open CODE, "< $code" or croak M06_code_file_failed_open($code);
$o->{API}{code} = <CODE>;
}
else {
croak M07_code_file_does_not_exist($code);
}
}
else {
$o->{API}{code} = $code;
}
inc/Inline.pm view on Meta::CPAN
croak M59_bad_inline_file($lang) unless $langfile =~ /^[A-Z]\w*$/;
croak M60_no_inline_files()
unless (defined $INC{File::Spec::Unix->catfile("Inline","Files.pm")} and
$Inline::Files::VERSION =~ /^\d\.\d\d$/ and
$Inline::Files::VERSION ge '0.51');
croak M61_not_parsed() unless $lang = Inline::Files::get_filename($pkg);
{
no strict 'refs';
local $/;
$Inline::FILE = \*{"${pkg}::$langfile"};
# open $Inline::FILE;
inc/Inline.pm view on Meta::CPAN
#==============================================================================
sub install {
my ($module, $DIRECTORY);
my $o = shift;
croak M64_install_not_c($o->{API}{language_id})
unless uc($o->{API}{language_id}) =~ /^(C|CPP|Java|Python|Ruby|Lisp|Pdlpp)$/ ;
croak M36_usage_install_main()
if ($o->{API}{pkg} eq 'main');
croak M37_usage_install_auto()
if $o->{CONFIG}{AUTONAME};
inc/Inline.pm view on Meta::CPAN
my $o = shift;
my @configs;
for my $mod (@{$o->{CONFIG}{WITH}}) {
my $ref = eval { $mod->Inline($o->{API}{language}); };
croak M25_no_WITH_support($mod, $@) if $@;
croak M65_WITH_not_lang($mod, $o->{API}{language}) unless $ref;
push @configs, %$ref;
}
return @configs;
}
inc/Inline.pm view on Meta::CPAN
END
#'
}
sub M07_code_file_does_not_exist {
my ($file) = @_;
return <<END;
Inline assumes '$file' is a filename,
and that file does not exist.
inc/Inline.pm view on Meta::CPAN
Specifying VERSION option without NAME option is not permitted.
END
}
sub M27_module_not_indexed {
my ($mod) = @_;
return <<END;
You are attempting to load an extension for '$mod',
but there is no entry for that module in %INC.
inc/Inline.pm view on Meta::CPAN
You need to explicitly 'use Inline::Files;' before your 'use Inline'.
END
}
sub M61_not_parsed {
return <<END;
It does not appear that your program has been properly parsed by Inline::Files.
END
}
inc/Inline.pm view on Meta::CPAN
You may need to reinstall this module.
END
}
sub M64_install_not_c {
my ($lang) = @_;
return <<END;
Invalid attempt to install an Inline module using the '$lang' language.
Only C and CPP (C++) based modules are currently supported.
END
}
sub M65_WITH_not_lang {
my ($mod, $lang) = @_;
return <<END;
$mod gave no 'with' hints for $lang.
END
}
Alt-CWB-CL-ambs
view release on metacpan or search on metacpan
croak_on_error(int error_code) {
croak("%s (aborted)", cwb_cl_error_message(error_code));
}
static int
not_here(s)
char *s;
{
croak("%s not implemented on this architecture", s);
return -1;
}
Alt-CWB-ambs
view release on metacpan or search on metacpan
t/11_cwb_file.t view on Meta::CPAN
test_read_write_file(".bz2", 0); # 1-argument form, T18
test_read_write_file(".bz2", 1); # 2-argument form
}
## test that reading non-existent compressed file fails immediately
eval { CWB::OpenFile("data/files/does_not_exist.gz") };
like($@, qr/does not exist/, "error condition when opening non-existent .gz file"); # T21
## check if specified tool is available in user's path
sub is_available {
my $cmd = shift;
Alt-Crypt-OpenSSL-PKCS12-Broadbean
view release on metacpan or search on metacpan
__ASSERT_|5.019007|5.008008|p
ASSERT_CURPAD_ACTIVE|5.008001||Viu
ASSERT_CURPAD_LEGAL|5.008001||Viu
ASSERT_IS_LITERAL|||Viu
ASSERT_IS_PTR|||Viu
assert_not_glob|5.009004||Viu
ASSERT_NOT_PTR|5.035004||Viu
assert_not_ROK|5.008001||Viu
assert_uft8_cache_coherent|5.013003||Viu
assignment_type|5.021005||Viu
ASSUME|5.019006|5.003007|p
atfork_lock|5.007003|5.007003|nu
atfork_unlock|5.007003|5.007003|nu
noperl_die|5.021006||vVniu
NORETURN_FUNCTION_END|5.009003||Viu
NORMAL|5.003007||Viu
NOSTR|5.027010||Viu
NO_TAINT_SUPPORT|5.017006||Viu
not_a_number|5.005000||Viu
NOTE3|5.027001||Viu
NOTHING|5.003007||Viu
NOTHING_t8|5.035004||Viu
NOTHING_t8_p8|5.033003||Viu
NOTHING_t8_pb|5.033003||Viu
NOTHING_tb|5.035004||Viu
NOTHING_tb_p8|5.033003||Viu
NOTHING_tb_pb|5.033003||Viu
nothreadhook|5.008000|5.008000|
notify_parser_that_changed_to_utf8|5.025010||Viu
not_incrementable|5.021002||Viu
NOT_IN_PAD|5.005000||Viu
NOT_REACHED|5.019006|5.003007|poVnu
NPOSIXA|5.017003||Viu
NPOSIXA_t8|5.035004||Viu
NPOSIXA_t8_p8|5.033003||Viu
WHILEM_t8_pb|5.033003||Viu
WHILEM_tb|5.035004||Viu
WHILEM_tb_p8|5.033003||Viu
WHILEM_tb_pb|5.033003||Viu
WIDEST_UTYPE|5.015004|5.003007|poVnu
win32_croak_not_implemented|5.017006||Vniu
WIN32SCK_IS_STDSCK|5.007001||Viu
win32_setlocale|5.027006||Viu
withinCOUNT|5.031004||Viu
withinCOUNT_KNOWN_VALID|5.033005||Viu
WITH_LC_NUMERIC_SET_TO_NEEDED|5.031003|5.031003|
# include <patchlevel.h>
# endif
# if ! defined(PERL_VERSION) \
&& ! defined(PERL_VERSION_MAJOR) \
&& ( ! defined(SUBVERSION) || ! defined(PATCHLEVEL) )
# include <could_not_find_Perl_patchlevel.h>
# endif
#endif
#ifdef PERL_VERSION_MAJOR
# define D_PPP_MAJOR PERL_VERSION_MAJOR
Alt-Devel-GlobalDestruction-XS-Inline
view release on metacpan or search on metacpan
inc/Inline.pm view on Meta::CPAN
my @pkgparts = split(/::/, $o->{API}{pkg});
my $realname = File::Spec->catfile(@pkgparts) . '.pm';
my $realname_unix = File::Spec::Unix->catfile(@pkgparts) . '.pm';
my $realpath = $INC{$realname_unix}
or croak M27_module_not_indexed($realname_unix);
my ($volume,$dir,$file) = File::Spec->splitpath($realpath);
my @dirparts = File::Spec->splitdir($dir);
pop @dirparts unless $dirparts[-1];
push @dirparts, $file;
inc/Inline.pm view on Meta::CPAN
local ($/, *CODE);
open CODE, "< $code" or croak M06_code_file_failed_open($code);
$o->{API}{code} = <CODE>;
}
else {
croak M07_code_file_does_not_exist($code);
}
}
else {
$o->{API}{code} = $code;
}
inc/Inline.pm view on Meta::CPAN
croak M59_bad_inline_file($lang) unless $langfile =~ /^[A-Z]\w*$/;
croak M60_no_inline_files()
unless (defined $INC{File::Spec::Unix->catfile("Inline","Files.pm")} and
$Inline::Files::VERSION =~ /^\d\.\d\d$/ and
$Inline::Files::VERSION ge '0.51');
croak M61_not_parsed() unless $lang = Inline::Files::get_filename($pkg);
{
no strict 'refs';
local $/;
$Inline::FILE = \*{"${pkg}::$langfile"};
# open $Inline::FILE;
inc/Inline.pm view on Meta::CPAN
#==============================================================================
sub install {
my ($module, $DIRECTORY);
my $o = shift;
croak M64_install_not_c($o->{API}{language_id})
unless uc($o->{API}{language_id}) =~ /^(C|CPP|Java|Python|Ruby|Lisp|Pdlpp)$/ ;
croak M36_usage_install_main()
if ($o->{API}{pkg} eq 'main');
croak M37_usage_install_auto()
if $o->{CONFIG}{AUTONAME};
inc/Inline.pm view on Meta::CPAN
my $o = shift;
my @configs;
for my $mod (@{$o->{CONFIG}{WITH}}) {
my $ref = eval { $mod->Inline($o->{API}{language}); };
croak M25_no_WITH_support($mod, $@) if $@;
croak M65_WITH_not_lang($mod, $o->{API}{language}) unless $ref;
push @configs, %$ref;
}
return @configs;
}
inc/Inline.pm view on Meta::CPAN
END
#'
}
sub M07_code_file_does_not_exist {
my ($file) = @_;
return <<END;
Inline assumes '$file' is a filename,
and that file does not exist.
inc/Inline.pm view on Meta::CPAN
Specifying VERSION option without NAME option is not permitted.
END
}
sub M27_module_not_indexed {
my ($mod) = @_;
return <<END;
You are attempting to load an extension for '$mod',
but there is no entry for that module in %INC.
inc/Inline.pm view on Meta::CPAN
You need to explicitly 'use Inline::Files;' before your 'use Inline'.
END
}
sub M61_not_parsed {
return <<END;
It does not appear that your program has been properly parsed by Inline::Files.
END
}
inc/Inline.pm view on Meta::CPAN
You may need to reinstall this module.
END
}
sub M64_install_not_c {
my ($lang) = @_;
return <<END;
Invalid attempt to install an Inline module using the '$lang' language.
Only C and CPP (C++) based modules are currently supported.
END
}
sub M65_WITH_not_lang {
my ($mod, $lang) = @_;
return <<END;
$mod gave no 'with' hints for $lang.
END
}
Alt-IO-All-new
view release on metacpan or search on metacpan
inc/Pegex/Optimizer.pm view on Meta::CPAN
my $result;
if ($result = $self->$method($ref, $parent)) {
$self->trace("got_$ref$note");
}
else {
$self->trace("not_$ref$note");
}
return $result;
}
}
Alt-Math-Prime-FastSieve-Inline
view release on metacpan or search on metacpan
inc/Inline.pm view on Meta::CPAN
my @pkgparts = split(/::/, $o->{API}{pkg});
my $realname = File::Spec->catfile(@pkgparts) . '.pm';
my $realname_unix = File::Spec::Unix->catfile(@pkgparts) . '.pm';
my $realpath = $INC{$realname_unix}
or croak M27_module_not_indexed($realname_unix);
my ($volume,$dir,$file) = File::Spec->splitpath($realpath);
my @dirparts = File::Spec->splitdir($dir);
pop @dirparts unless $dirparts[-1];
push @dirparts, $file;
inc/Inline.pm view on Meta::CPAN
local ($/, *CODE);
open CODE, "< $code" or croak M06_code_file_failed_open($code);
$o->{API}{code} = <CODE>;
}
else {
croak M07_code_file_does_not_exist($code);
}
}
else {
$o->{API}{code} = $code;
}
inc/Inline.pm view on Meta::CPAN
croak M59_bad_inline_file($lang) unless $langfile =~ /^[A-Z]\w*$/;
croak M60_no_inline_files()
unless (defined $INC{File::Spec::Unix->catfile("Inline","Files.pm")} and
$Inline::Files::VERSION =~ /^\d\.\d\d$/ and
$Inline::Files::VERSION ge '0.51');
croak M61_not_parsed() unless $lang = Inline::Files::get_filename($pkg);
{
no strict 'refs';
local $/;
$Inline::FILE = \*{"${pkg}::$langfile"};
# open $Inline::FILE;
inc/Inline.pm view on Meta::CPAN
#==============================================================================
sub install {
my ($module, $DIRECTORY);
my $o = shift;
croak M64_install_not_c($o->{API}{language_id})
unless uc($o->{API}{language_id}) =~ /^(C|CPP|Java|Python|Ruby|Lisp|Pdlpp)$/ ;
croak M36_usage_install_main()
if ($o->{API}{pkg} eq 'main');
croak M37_usage_install_auto()
if $o->{CONFIG}{AUTONAME};
inc/Inline.pm view on Meta::CPAN
my $o = shift;
my @configs;
for my $mod (@{$o->{CONFIG}{WITH}}) {
my $ref = eval { $mod->Inline($o->{API}{language}); };
croak M25_no_WITH_support($mod, $@) if $@;
croak M65_WITH_not_lang($mod, $o->{API}{language}) unless $ref;
push @configs, %$ref;
}
return @configs;
}
inc/Inline.pm view on Meta::CPAN
END
#'
}
sub M07_code_file_does_not_exist {
my ($file) = @_;
return <<END;
Inline assumes '$file' is a filename,
and that file does not exist.
inc/Inline.pm view on Meta::CPAN
Specifying VERSION option without NAME option is not permitted.
END
}
sub M27_module_not_indexed {
my ($mod) = @_;
return <<END;
You are attempting to load an extension for '$mod',
but there is no entry for that module in %INC.
inc/Inline.pm view on Meta::CPAN
You need to explicitly 'use Inline::Files;' before your 'use Inline'.
END
}
sub M61_not_parsed {
return <<END;
It does not appear that your program has been properly parsed by Inline::Files.
END
}
inc/Inline.pm view on Meta::CPAN
You may need to reinstall this module.
END
}
sub M64_install_not_c {
my ($lang) = @_;
return <<END;
Invalid attempt to install an Inline module using the '$lang' language.
Only C and CPP (C++) based modules are currently supported.
END
}
sub M65_WITH_not_lang {
my ($mod, $lang) = @_;
return <<END;
$mod gave no 'with' hints for $lang.
END
}
Alt-Sub-Delete-NewPackageSeparator
view release on metacpan or search on metacpan
t/Test/More.pm view on Meta::CPAN
$tb->_unoverload_str(\$e1, \$e2);
# Either they're both references or both not.
my $same_ref = !(!ref $e1 xor !ref $e2);
my $not_ref = (!ref $e1 and !ref $e2);
if( defined $e1 xor defined $e2 ) {
$ok = 0;
}
elsif ( $e1 == $DNE xor $e2 == $DNE ) {
$ok = 0;
}
elsif ( $same_ref and ($e1 eq $e2) ) {
$ok = 1;
}
elsif ( $not_ref ) {
push @Data_Stack, { type => '', vals => [$e1, $e2] };
$ok = 0;
}
else {
if( $Refs_Seen{$e1} ) {
AltaVista-PerlSDK
view release on metacpan or search on metacpan
#endif
#include "avs.h"
static int
not_here(s)
char *s;
{
croak("%s not implemented on this architecture", s);
return -1;
}
case 'A':
if (strEQ(name, "AVS_ADDDOC_IO_ERR"))
#ifdef AVS_ADDDOC_IO_ERR
return AVS_ADDDOC_IO_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_BADARGS_ERR"))
#ifdef AVS_BADARGS_ERR
return AVS_BADARGS_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_CHARSET_ASCII8"))
#ifdef AVS_CHARSET_ASCII8
return AVS_CHARSET_ASCII8;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_CHARSET_LATIN1"))
#ifdef AVS_CHARSET_LATIN1
return AVS_CHARSET_LATIN1;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_CHARSET_UTF8"))
#ifdef AVS_CHARSET_UTF8
return AVS_CHARSET_UTF8;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_COMPACT_IO_ERR"))
#ifdef AVS_COMPACT_IO_ERR
return AVS_COMPACT_IO_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_COUNTS_ERR"))
#ifdef AVS_COUNTS_ERR
return AVS_COUNTS_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_DATE_ERR"))
#ifdef AVS_DATE_ERR
return AVS_DATE_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_DOCDATA_ERR"))
#ifdef AVS_DOCDATA_ERR
return AVS_DOCDATA_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_DOCID_ERR"))
#ifdef AVS_DOCID_ERR
return AVS_DOCID_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_DOCLIST_ERR"))
#ifdef AVS_DOCLIST_ERR
return AVS_DOCLIST_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_DOC_EXISTS"))
#ifdef AVS_DOC_EXISTS
return AVS_DOC_EXISTS;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_DOC_LIMIT_ERR"))
#ifdef AVS_DOC_LIMIT_ERR
return AVS_DOC_LIMIT_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_DOC_NOTFOUND"))
#ifdef AVS_DOC_NOTFOUND
return AVS_DOC_NOTFOUND;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_FIELD_ERR"))
#ifdef AVS_FIELD_ERR
return AVS_FIELD_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_FILTER_ERR"))
#ifdef AVS_FILTER_ERR
return AVS_FILTER_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_GETDATA_ERR"))
#ifdef AVS_GETDATA_ERR
return AVS_GETDATA_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_INDEX_ERR"))
#ifdef AVS_INDEX_ERR
return AVS_INDEX_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_LICENSE_EXPIRED"))
#ifdef AVS_LICENSE_EXPIRED
return AVS_LICENSE_EXPIRED;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_LOCK_ERR"))
#ifdef AVS_LOCK_ERR
return AVS_LOCK_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_MALLOC_ERR"))
#ifdef AVS_MALLOC_ERR
return AVS_MALLOC_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_MAX_BUCKETS"))
#ifdef AVS_MAX_BUCKETS
return AVS_MAX_BUCKETS;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_MAX_DOCDATA"))
#ifdef AVS_MAX_DOCDATA
return AVS_MAX_DOCDATA;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_MAX_DOCID"))
#ifdef AVS_MAX_DOCID
return AVS_MAX_DOCID;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_MAX_TIERS"))
#ifdef AVS_MAX_TIERS
return AVS_MAX_TIERS;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_MAX_WORDSIZE"))
#ifdef AVS_MAX_WORDSIZE
return AVS_MAX_WORDSIZE;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_MKSTABLE_IO_ERR"))
#ifdef AVS_MKSTABLE_IO_ERR
return AVS_MKSTABLE_IO_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_MKVIS_IO_ERR"))
#ifdef AVS_MKVIS_IO_ERR
return AVS_MKVIS_IO_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_NOMORE_WORDS"))
#ifdef AVS_NOMORE_WORDS
return AVS_NOMORE_WORDS;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_OK"))
#ifdef AVS_OK
return AVS_OK;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_OPEN_ERR"))
#ifdef AVS_OPEN_ERR
return AVS_OPEN_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_OPTION_RANKBYDATE"))
#ifdef AVS_OPTION_RANKBYDATE
return AVS_OPTION_RANKBYDATE;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_OPTION_SEARCHBYDATE"))
#ifdef AVS_OPTION_SEARCHBYDATE
return AVS_OPTION_SEARCHBYDATE;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_OPTION_SEARCHSINCE"))
#ifdef AVS_OPTION_SEARCHSINCE
return AVS_OPTION_SEARCHSINCE;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_OPTION_NOBLOCK"))
#ifdef AVS_OPTION_NOBLOCK
return AVS_OPTION_NOBLOCK;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_OPTION_INDEX_CJK_CHARS_AS_WORDS"))
#ifdef AVS_OPTION_INDEX_CJK_CHARS_AS_WORDS
return AVS_OPTION_INDEX_CJK_CHARS_AS_WORDS;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_OPTION_NOPROXIMITY"))
#ifdef AVS_OPTION_NOPROXIMITY
return AVS_OPTION_NOPROXIMITY;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_OPT_FLAGS_RANK_TO_BOOL"))
#ifdef AVS_OPT_FLAGS_RANK_TO_BOOL
return AVS_OPT_FLAGS_RANK_TO_BOOL;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_PARSE_ERR"))
#ifdef AVS_PARSE_ERR
return AVS_PARSE_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_PARSE_SGML"))
#ifdef AVS_PARSE_SGML
return AVS_PARSE_SGML;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_RESULTNUM_ERR"))
#ifdef AVS_RESULTNUM_ERR
return AVS_RESULTNUM_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_SEARCH_ERR"))
#ifdef AVS_SEARCH_ERR
return AVS_SEARCH_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_STARTDOC_ERR"))
#ifdef AVS_STARTDOC_ERR
return AVS_STARTDOC_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_SYNC_ERR"))
#ifdef AVS_SYNC_ERR
return AVS_SYNC_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_UNK_EXCEPTION_ERR"))
#ifdef AVS_UNK_EXCEPTION_ERR
return AVS_UNK_EXCEPTION_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_UPDATE_ERR"))
#ifdef AVS_UPDATE_ERR
return AVS_UPDATE_ERR;
#else
goto not_there;
#endif
if (strEQ(name, "AVS_VERSION_ERR"))
#ifdef AVS_VERSION_ERR
return AVS_VERSION_ERR;
#else
goto not_there;
#endif
break;
case 'B':
break;
case 'C':
case 'I':
if (strEQ(name, "IN"))
#ifdef IN
return IN;
#else
goto not_there;
#endif
break;
case 'J':
break;
case 'K':
case 'O':
if (strEQ(name, "OUT"))
#ifdef OUT
return OUT;
#else
goto not_there;
#endif
break;
case 'P':
break;
case 'Q':
case 'V':
if (strEQ(name, "VALTYPE_NAME_LEN"))
#ifdef VALTYPE_NAME_LEN
return VALTYPE_NAME_LEN;
#else
goto not_there;
#endif
break;
case 'W':
break;
case 'X':
break;
}
errno = EINVAL;
return 0;
not_there:
errno = ENOENT;
return 0;
}
Alter
view release on metacpan or search on metacpan
nextchar|||
ninstr|||
no_bareword_allowed|||
no_fh_allowed|||
no_op|||
not_a_number|||
nothreadhook||5.008000|
nuke_stacks|||
num_overflow|||n
offer_nice_chunk|||
oopsAV|||
# if !defined(__PATCHLEVEL_H_INCLUDED__) && !(defined(PATCHLEVEL) && defined(SUBVERSION))
# define PERL_PATCHLEVEL_H_IMPLICIT
# include <patchlevel.h>
# endif
# if !(defined(PERL_VERSION) || (defined(SUBVERSION) && defined(PATCHLEVEL)))
# include <could_not_find_Perl_patchlevel.h>
# endif
# ifndef PERL_REVISION
# define PERL_REVISION (5)
/* Replace: 1 */
# define PERL_VERSION PATCHLEVEL
Alzabo
view release on metacpan or search on metacpan
lib/Alzabo/Exceptions.pm view on Meta::CPAN
'Alzabo::Exception::NotNullable' =>
{ description => 'An exception generated when there is an attempt is made to set a non-nullable column to NULL',
isa => 'Alzabo::Exception::Params',
fields => [ 'column_name', 'table_name', 'schema_name' ],
alias => 'not_nullable_exception',
},
'Alzabo::Exception::Panic' =>
{ description => 'An exception generated when something totally unexpected happens',
isa => 'Alzabo::Exception',
Amazon-CreatorsAPI
view release on metacpan or search on metacpan
xt/09_inclusive.t view on Meta::CPAN
{
my @files = File::Find::Rule
->extras({ untaint => 1 })
->file
->ascii
->not_name('09_inclusive.t')
->exec(sub {
return if $_[2] =~ m!^\.git/!;
open my $fh, '<', $_ or die "Could not open '$_'";
my $content = do { local $/; <$fh> };
return 1 if $content =~ m!$cond!i;
( run in 2.087 seconds using v1.01-cache-2.11-cpan-39bf76dae61 )