Alt-FFI-Raw-Platypus

 view release on metacpan or  search on metacpan

lib/FFI/Raw.pm  view on Meta::CPAN

package FFI::Raw;

use strict;
use warnings;
use base qw( FFI::Platypus::Legacy::Raw );
use FFI::Raw::Callback;
use FFI::Raw::Ptr;
use FFI::Raw::MemPtr;

# ABSTRACT: Perl bindings to the portable FFI library (libffi)
our $VERSION = '0.32';

foreach my $function (qw( memptr callback void int uint short ushort long ulong int64 uint64 char uchar float double str ptr ))
{
  no strict 'refs';
  *$function = *{"FFI::Platypus::Legacy::Raw::$function"};
}

sub platypus
{

lib/FFI/Raw.pm  view on Meta::CPAN

1;

__END__

=pod

=encoding UTF-8

=head1 NAME

FFI::Raw - Perl bindings to the portable FFI library (libffi)

=head1 VERSION

version 0.04

=head1 SYNOPSIS

 use FFI::Raw;
 
 my $cos = FFI::Raw->new(

t/ffi/overload.c  view on Meta::CPAN

extern void
foo()
{
    /* noop, for successful binding only */
}



( run in 2.845 seconds using v1.01-cache-2.11-cpan-2398b32b56e )