Next refresh should show more results. ( run in 4.511 )
view release on metacpan or search on metacpan
AI-MaxEntropy.xs view on Meta::CPAN
#include "XSUB.h"
#include "ppport.h"
/* Macros for debugging */
/* uncomment the line below to enable tracing and timing */
/*#define __ENABLE_TRACING__*/
#ifdef __ENABLE_TRACING__
view release on metacpan or search on metacpan
#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"
/*
* Macros and symbolic constants
*/
#define RAND_WEIGHT ( ((float)rand() / (float)RAND_MAX) - 0.5 )
#define sqr(x) ((x) * (x))
view release on metacpan or search on metacpan
#ifdef __cplusplus
extern "C" {
#endif
/* Macros used to pack a C struct into Perl Hashes (from HPUX::Pstat) */
/* pack the integer value in p->name into hash hv
* using key "name"
*/
#define PACK_IV(name) \
view release on metacpan or search on metacpan
# Copyright (c) 2003 by Vsevolod (Simon) Ilyushchenko. All rights reserved.
# This program is free software; you can redistribute it and/or modify it
# under the same terms as Perl itself.
# The code is based on the -PHP project (http://amfphp.sourceforge.net/)
#This is a server-side script that responds to an Macromedia Flash client
#talking in ActionScript. See the FLAP project site (http://www.simonf.com/amfperl)
#for more information.
use strict;
view release on metacpan or search on metacpan
example/Show_ALink.pl view on Meta::CPAN
printl 3, "DDE not implemented in ARSperl.\n";
}
}
# SUBROUTINE
# ProcessMacroStruct
#
# DESCRIPTION
# This routine breaks down the macro structure and
# dumps the information contained in it.
sub ProcessMacroStruct {
my $t = shift; # how much indentation to use
my $m = shift; # the macro struct
my $i, @p;
if(defined($m)) {
printl $t, "Macro Name : \"$m->{macroName}\"\n";
printl $t, "Macro Params: $m->{macroParms}\n";
foreach (keys %{$m->{macroParms}}) {
printl $t+1, "$_ = $m->{macroParms}{$_}\n";
}
printl $t, "Macro Text :\n**START**\n$m->{macroText}\n**END**\n";
}
}
# SUBROUTINE
example/Show_ALink.pl view on Meta::CPAN
if(defined(@actions)) {
$act_num = 1;
foreach $action (@actions) {
printl 1, "Action $act_num:\n";
if(defined($action->{macro})) {
printl 2, "Macro:\n";
ProcessMacroStruct(3, $action->{macro});
}
if(defined($action->{assign_fields})) {
printl 2, "Set Fields:\n";
foreach $setFields (@{$action->{assign_fields}}) {
printl 3, "fieldId: $setFields->{fieldId}\n";
view release on metacpan or search on metacpan
acelib/messubs.c view on Meta::CPAN
static char messbuf[BUFSIZE] ;
/* Macro to format strings using va_xx calls, it calls uMessFormat whose */
/* prototype is given below. */
/* */
/* Arguments to the macro must have the following types: */
/* */
/* FORMAT_ARGS: va_list used to get the variable argument list. */
view release on metacpan or search on metacpan
lib/Acme/CPANLists/Import/TemplateRoundup.pm view on Meta::CPAN
package Acme::CPANLists::Import::TemplateRoundup;
our $DATE = '2016-12-28'; # DATE
our $VERSION = '0.03'; # VERSION
our @Module_Lists = ({description=>"This list is generated by extracting module names mentioned in the article [http://www.illusori.co.uk/projects/Template-Roundup/] (retrieved on 2016-07-19). For the full article, visit the URL.",entries=>[{module=>...
1;
# ABSTRACT: Perl Template Roundup (2010)
__END__
lib/Acme/CPANLists/Import/TemplateRoundup.pm view on Meta::CPAN
=item * L<Cache::FastMemoryCache>
=item * L<Cache::Ref::FIFO>
=item * L<HTML::Macro>
=item * L<HTML::Mason>
=item * L<Parse::Template>
view release on metacpan or search on metacpan
lib/Acme/CPANModules/Import/TemplateRoundup.pm view on Meta::CPAN
entries => [
{ module => "App::podweaver" },
{ module => "Cache::CacheFactory" },
{ module => "Cache::FastMemoryCache" },
{ module => "Cache::Ref::FIFO" },
{ module => "HTML::Macro" },
{ module => "HTML::Mason" },
{ module => "Parse::Template" },
{ module => "Perl::Critic" },
{ module => "Solution" },
{ module => "Template::Benchmark" },
lib/Acme/CPANModules/Import/TemplateRoundup.pm view on Meta::CPAN
=item * L<Cache::FastMemoryCache>
=item * L<Cache::Ref::FIFO>
=item * L<HTML::Macro>
=item * L<HTML::Mason>
=item * L<Parse::Template>
view release on metacpan or search on metacpan
lib/Acme/DependOnEverything.pm view on Meta::CPAN
use Chemistry::File::XYZ;
use Chemistry::FormulaPattern;
use Chemistry::Harmonia;
use Chemistry::InternalCoords;
use Chemistry::Isotope;
use Chemistry::MacroMol;
use Chemistry::MidasPattern;
use Chemistry::Mok;
use Chemistry::Mol;
use Chemistry::MolecularMass;
use Chemistry::OpenBabel;
lib/Acme/DependOnEverything.pm view on Meta::CPAN
use File::Lock::Multi;
use File::Lock::ParentLock;
use File::Log;
use File::LogReader;
use File::LsColor;
use File::Macro;
use File::Maintenance;
use File::Maker;
use File::Mangle;
use File::Map;
use File::Marker;
lib/Acme/DependOnEverything.pm view on Meta::CPAN
use Filter::Heredoc;
use Filter::HereDocIndent;
use Filter::Include;
use Filter::Indent::HereDoc;
use Filter::LiterateComments;
use Filter::Macro;
use Filter::NumberLines;
use Filter::Object::Simple;
use Filter::PerlTags;
use Filter::PerlTags::Extra;
use Filter::PPI::Transform::v;
lib/Acme/DependOnEverything.pm view on Meta::CPAN
use HTML::Lister::_;
use HTML::ListScraper;
use HTML::ListToTree;
use HTML::Location;
use HTML::LoL;
use HTML::Macro::tgz;
use HTML::Make;
use HTML::Manipulator;
use HTML::Mason;
use HTML::Mason::ApacheHandler;
use HTML::Mason::PlackHandler;
lib/Acme/DependOnEverything.pm view on Meta::CPAN
use Salvation::AnyNotify::Plugin::Daemon::targ;
use Salvation::AnyNotify::Plugin::Graphite::tar;
use Salvation::AnyNotify::Plugin::Monitor::tar;
use Salvation::AnyNotify::Plugin::Server::targ;
use Salvation::DaemonDecl;
use Salvation::MacroProcessor;
use Salvation::Method::Signatures;
use Salvation::MongoMgr;
use Salvation::PluginCore;
use Salvation::TC;
use Salvation::UpdateGvFLAGS;
lib/Acme/DependOnEverything.pm view on Meta::CPAN
use Text::Lorem::More;
use Text::Lorem::Moretext;
use Text::Lossy::v;
use Text::LTSV;
use Text::LTSV::Liner;
use Text::Macros;
use Text::MacroScript;
use Text::Macro::tgz;
use Text::Markdown;
use Text::Markdown::ApacheHandler;
use Text::Markdown::Discount;
use Text::Markdown::Hoedown;
use Text::Markdown::PerlExtensions;
view release on metacpan or search on metacpan
pogl_glut.xs view on Meta::CPAN
static int _done_glutInit = 0;
static int _done_glutCloseFunc_warn = 0;
/* Macros for GLUT callback and handler declarations */
# define DO_perl_call_sv(handler, flag) perl_call_sv(handler, flag)
# define ENSURE_callback_thread
# define GLUT_PUSH_NEW_SV(sv) XPUSHs(sv_2mortal(newSVsv(sv)))
# define GLUT_PUSH_NEW_IV(i) XPUSHs(sv_2mortal(newSViv(i)))
# define GLUT_PUSH_NEW_U8(c) XPUSHs(sv_2mortal(newSViv((int)c)))
view release on metacpan or search on metacpan
lib/Acme/MetaSyntactic/asterix.pm view on Meta::CPAN
# names en_us
Asterix
Obelix
Dogmatix
Magigimmix
Arthritix Macroeconomix
Belladonna
Malacoustix
Fulliautomatix
Epidemix
Bacteria
view release on metacpan or search on metacpan
lib/Acme/MetaSyntactic/legotheincredibles.pm view on Meta::CPAN
Hypershock
Icebreaker
Kari_McKeen
Krushauer
Frozone
Macroburst
Meta_Man
Mirage
Municiberg_Mayor
Nomanisan_Guard
Old_Lady
view release on metacpan or search on metacpan
lib/Affix/Wrap.pm view on Meta::CPAN
return $definition->affix if defined $definition;
builtin::blessed($type) ? $type->affix : Void;
}
}
class #
Affix::Wrap::Macro : isa(Affix::Wrap::Entity) {
field $value : reader : param //= ();
method set_value ($v) { $value = $v }
method affix_type {
$value // return '';
lib/Affix/Wrap.pm view on Meta::CPAN
$current_file = $self->_normalize($node_file);
$last_seen_file = $current_file;
}
elsif ( defined $last_seen_file ) { $current_file = $last_seen_file; }
if ( $self->_is_valid_file($current_file) && !$node->{isImplicit} ) {
if ( $kind eq 'MacroDefinitionRecord' ) {
if ( $node->{range} ) { $self->_macro( $node, $acc, $current_file ); }
}
elsif ( $kind eq 'TypedefDecl' ) { $self->_typedef( $node, $acc, $current_file ); }
elsif ( $kind eq 'RecordDecl' || $kind eq 'CXXRecordDecl' ) {
$self->_record( $node, $acc, $current_file );
lib/Affix/Wrap.pm view on Meta::CPAN
method _macro( $n, $acc, $f ) {
my ( $s, $e, $l, $el ) = $self->_meta($n);
my $val = $self->_extract_macro_val( $n, $f );
push @$acc,
Affix::Wrap::Macro->new(
name => $n->{name},
file => $f,
line => $l,
end_line => $el,
value => $val,
lib/Affix/Wrap.pm view on Meta::CPAN
}
'';
}
method _scan_macros_fallback($acc) {
my %seen = map { $_->name => 1 } grep { ref($_) eq 'Affix::Wrap::Macro' } @$acc;
for my $f ( keys %$allowed_files ) {
next unless $self->_is_valid_file($f);
my $c = $self->_get_content($f);
while ( $c =~ /^\s*#\s*define\s+(\w+)(?:[ \t]+(.*?))?\s*$/mg ) {
my $name = $1;
lib/Affix/Wrap.pm view on Meta::CPAN
my $line = ( $pre =~ tr/\n// ) + 1;
$val =~ s/\/\/.*$//;
$val =~ s/\/\*.*?\*\///g;
$val =~ s/^\s+|\s+$//g;
push @$acc,
Affix::Wrap::Macro->new(
name => $name,
file => $f,
line => $line,
end_line => $line,
value => $val,
lib/Affix/Wrap.pm view on Meta::CPAN
}
method _scan( $f, $acc ) {
my $c = $self->_read($f);
# Macros
while ( $c =~ /^\s*#\s*define\s+(\w+)(?:[ \t]+(.*?))?$/gm ) {
my $name = $1;
my $val = $2 // '';
my $s = $-[0];
my $e = $+[0];
$val =~ s/\/\/.*$//;
$val =~ s/\/\*.*?\*\///g;
$val =~ s/^\s+|\s+$//g;
push @$acc,
Affix::Wrap::Macro->new(
name => $name,
value => $val,
file => $f,
line => $self->_ln( $c, $s ),
end_line => $self->_ln( $c, $e ),
lib/Affix/Wrap.pm view on Meta::CPAN
}
method _resolve_macros ($nodes) {
my %macros;
for my $node (@$nodes) {
if ( $node isa Affix::Wrap::Macro ) {
my $val = $node->value // '';
$val =~ s/(?<=\d)[Uu][Ll]{0,2}//g;
$macros{ $node->name } = $val;
}
}
lib/Affix/Wrap.pm view on Meta::CPAN
# Fallback: Treat as simple alias (A -> B)
return $cache{$token} = $resolve->($expr);
};
for my $node (@$nodes) {
if ( $node isa Affix::Wrap::Macro ) {
my $val = $resolve->( $node->name );
if ( defined $val ) {
$node->set_value($val);
}
}
lib/Affix/Wrap.pm view on Meta::CPAN
my $type_str = builtin::blessed($type) ? $type : "$type";
Affix::typedef( $name, $type_str );
}
my @nodes = $self->parse;
# Macro resolution pass
$self->_resolve_macros( \@nodes );
# Generation pass
my @installed;
for my $node (@nodes) {
view release on metacpan or search on metacpan
Algorithm-LBFGS.xs view on Meta::CPAN
#include "ppport.h"
#include "lbfgs.h"
/* Macros for debugging */
/* uncomment the line below to enable tracing and timing */
/* #define __ENABLE_TRACING__ */
#ifdef __ENABLE_TRACING__
view release on metacpan or search on metacpan
src/liblinear/blas/blas.h view on Meta::CPAN
#include "blasp.h" /* Prototypes for all BLAS functions */
#define FALSE 0
#define TRUE 1
/* Macro functions */
#define MIN(a,b) ((a) <= (b) ? (a) : (b))
#define MAX(a,b) ((a) >= (b) ? (a) : (b))
#endif
view release on metacpan or search on metacpan
corpus/libpalindrome/m4/ltoptions.m4 view on Meta::CPAN
])
])# _LT_SET_OPTIONS
## --------------------------------- ##
## Macros to handle LT_INIT options. ##
## --------------------------------- ##
# _LT_MANGLE_DEFUN(MACRO-NAME, OPTION-NAME)
# -----------------------------------------
m4_define([_LT_MANGLE_DEFUN],