Audio-FindChunks
view release on metacpan or search on metacpan
next_symbol|||
nextargv|||
nextchar|||
ninstr|||n
no_bareword_allowed|||
no_fh_allowed|||
no_op|||
noperl_die|||vn
not_a_number|||
not_incrementable|||
nothreadhook||5.008000|
nuke_stacks|||
num_overflow|||n
oopsAV|||
oopsHV|||
op_append_elem||5.013006|
op_append_list||5.013006|
op_clear|||
op_contextualize||5.013006|
op_convert_list||5.021006|
op_dump||5.006000|
U32 DPPP_(my_PL_signals) = D_PPP_PERL_SIGNALS_INIT;
#else
extern U32 DPPP_(my_PL_signals);
#endif
#define PL_signals DPPP_(my_PL_signals)
#endif
/* Hint: PL_ppaddr
* Calling an op via PL_ppaddr requires passing a context argument
* for threaded builds. Since the context argument is different for
* 5.005 perls, you can use aTHXR (supplied by ppport.h), which will
* automatically be defined as the correct argument.
*/
#if (PERL_BCDVERSION <= 0x5005005)
/* Replace: 1 */
# define PL_ppaddr ppaddr
# define PL_no_modify no_modify
/* Replace: 0 */
#endif
PL_curcop->cop_stash = old_cop_stash;
PL_curstash = old_curstash;
PL_curcop->cop_line = oldline;
}
#endif
#endif
/*
* Boilerplate macros for initializing and accessing interpreter-local
* data from C. All statics in extensions should be reworked to use
* this, if you want to make the extension thread-safe. See ext/re/re.xs
* for an example of the use of these macros.
*
* Code that uses these macros is responsible for the following:
* 1. #define MY_CXT_KEY to a unique string, e.g. "DynaLoader_guts"
* 2. Declare a typedef named my_cxt_t that is a structure that contains
* all the data that needs to be interpreter-local.
* 3. Use the START_MY_CXT macro after the declaration of my_cxt_t.
* 4. Use the MY_CXT_INIT macro such that it is called exactly once
* (typically put in the BOOT: section).
* 5. Use the members of the my_cxt_t structure everywhere as
* 6. Use the dMY_CXT macro (a declaration) in all the functions that
* access MY_CXT.
*/
#if defined(MULTIPLICITY) || defined(PERL_OBJECT) || \
defined(PERL_CAPI) || defined(PERL_IMPLICIT_CONTEXT)
#ifndef START_MY_CXT
/* This must appear in all extensions that define a my_cxt_t structure,
* right after the definition (i.e. at file scope). The non-threads
* case below uses it to declare the data as static. */
#define START_MY_CXT
#if (PERL_BCDVERSION < 0x5004068)
/* Fetches the SV that keeps the per-interpreter data. */
#define dMY_CXT_SV \
SV *my_cxt_sv = get_sv(MY_CXT_KEY, FALSE)
#else /* >= perl5.004_68 */
#define dMY_CXT_SV \
SV *my_cxt_sv = *hv_fetch(PL_modglobal, MY_CXT_KEY, \
if (*sp + len <= send && memEQ(*sp, radix, len)) {
*sp += len;
return TRUE;
}
}
#else
/* older perls don't have PL_numeric_radix_sv so the radix
* must manually be requested from locale.h
*/
#include <locale.h>
dTHR; /* needed for older threaded perls */
struct lconv *lc = localeconv();
char *radix = lc->decimal_point;
if (radix && IN_LOCALE) {
STRLEN len = strlen(radix);
if (*sp + len <= send && memEQ(*sp, radix, len)) {
*sp += len;
return TRUE;
}
}
#endif
utils/auto-debug-module.example-gdb view on Meta::CPAN
# PREREQ_PM => { Data::Flow=>q[0.09] }
# VERSION_FROM => q[FindChunks.pm]
# clean => { FILES=>q[*.tmp tmp.*] }
# ==========================
Checking if your kit is complete...
Looks good
Writing Makefile for Audio::FindChunks
make[1]: Entering directory `/tmp/Audio-FindChunks-1.04/dbg-bld'
cp FindChunks.pm blib/lib/Audio/FindChunks.pm
/usr/bin/perl /usr/lib/perl5/5.8.8/ExtUtils/xsubpp -typemap /usr/lib/perl5/5.8.8/ExtUtils/typemap -typemap typemap FindChunks.xs > FindChunks.xsc && mv FindChunks.xsc FindChunks.c
gcc -c -I. -D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing -pipe -Wdeclaration-after-statement -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -I/usr/include/gdbm -g -DVERSION=\"1.04\" -DXS_VERSION=\"1.04\" -fPIC "-I/usr/lib/perl5/...
In file included from FindChunks.xs:5:
ppport.h:230:1: warning: "PERL_UNUSED_DECL" redefined
In file included from FindChunks.xs:2:
/usr/lib/perl5/5.8.8/i386-linux-thread-multi/CORE/perl.h:163:1: warning: this is the location of the previous definition
gcc -c -I. -D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing -pipe -Wdeclaration-after-statement -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -I/usr/include/gdbm -g -DVERSION=\"1.04\" -DXS_VERSION=\"1.04\" -fPIC "-I/usr/lib/perl5/...
Running Mkbootstrap for Audio::FindChunks ()
chmod 644 FindChunks.bs
rm -f blib/arch/auto/Audio/FindChunks/FindChunks.so
gcc -shared -O2 -g -pipe -Wall -Wp,-D_FORTIFY_SOURCE=2 -fexceptions -fstack-protector --param=ssp-buffer-size=4 -m32 -march=i386 -mtune=generic -fasynchronous-unwind-tables -L/usr/local/lib FindChunks.o wavestats.o -o blib/arch/auto/Audio/FindChunk...
\
chmod 755 blib/arch/auto/Audio/FindChunks/FindChunks.so
cp FindChunks.bs blib/arch/auto/Audio/FindChunks/FindChunks.bs
chmod 644 blib/arch/auto/Audio/FindChunks/FindChunks.bs
Manifying blib/man3/Audio::FindChunks.3pm
make[1]: Leaving directory `/tmp/Audio-FindChunks-1.04/dbg-bld'
[Thread debugging using libthread_db enabled]
1..32
# Running under perl version 5.008008 for linux
# Current time local: Thu Aug 26 20:49:41 2010
# Current time GMT: Fri Aug 27 03:49:41 2010
# Using Test.pm version 1.25
ok 1
ok 2
ok 3
Program received signal SIGSEGV, Segmentation fault.
utils/auto-debug-module.example-gdb view on Meta::CPAN
samples=1792, stat=0x81a2d48) at wavestats.c:13
13 buf[100000000] = 1;
=====================================
#0 0x00a3f0ef in le_short_sample_stats (buf=0x81aa1bc "\b", stride=4,
samples=1792, stat=0x81a2d48) at wavestats.c:13
#1 0x00a3e199 in XS_Audio__FindChunks_le_short_sample_stats (
my_perl=0x804c008, cv=0x805f4a8) at FindChunks.c:166
#2 0x0067f51d in Perl_pp_entersub ()
from /usr/lib/perl5/5.8.8/i386-linux-thread-multi/CORE/libperl.so
#3 0x0067898f in Perl_runops_standard ()
from /usr/lib/perl5/5.8.8/i386-linux-thread-multi/CORE/libperl.so
#4 0x0061e20e in perl_run ()
from /usr/lib/perl5/5.8.8/i386-linux-thread-multi/CORE/libperl.so
#5 0x0804921e in main ()
=====================================
eax 0xe1082bc 235963068
ecx 0x81a2d48 135933256
edx 0x81a2ffc 135933948
ebx 0xa40c30 10751024
esp 0xbfffe208 0xbfffe208
ebp 0xbfffe218 0xbfffe218
utils/auto-debug-module.example-gdb view on Meta::CPAN
my_perl=0x804c008, cv=0x805f4a8) at FindChunks.c:166
buf = 0x81aa1b8 ""
stride = 4
samples = 1792
stat = 0x81a2d48
sp = 0x81a3014
ax = 6
mark = 0xe1082bc
items = 4
#2 0x0067f51d in Perl_pp_entersub ()
from /usr/lib/perl5/5.8.8/i386-linux-thread-multi/CORE/libperl.so
No symbol table info available.
#3 0x0067898f in Perl_runops_standard ()
from /usr/lib/perl5/5.8.8/i386-linux-thread-multi/CORE/libperl.so
No symbol table info available.
#4 0x0061e20e in perl_run ()
from /usr/lib/perl5/5.8.8/i386-linux-thread-multi/CORE/libperl.so
No symbol table info available.
=====================================
process 1622
cmdline = '/usr/bin/perl'
cwd = '/tmp/Audio-FindChunks-1.04/dbg-bld'
exe = '/usr/bin/perl'
Mapped address spaces:
utils/auto-debug-module.example-gdb view on Meta::CPAN
0x450000 0x5a2000 0x152000 0 /lib/libc-2.5.so
0x5a2000 0x5a4000 0x2000 0x152000 /lib/libc-2.5.so
0x5a4000 0x5a5000 0x1000 0x154000 /lib/libc-2.5.so
0x5a5000 0x5a8000 0x3000 0x5a5000
0x5aa000 0x5d1000 0x27000 0 /lib/libm-2.5.so
0x5d1000 0x5d2000 0x1000 0x26000 /lib/libm-2.5.so
0x5d2000 0x5d3000 0x1000 0x27000 /lib/libm-2.5.so
0x5d5000 0x5d8000 0x3000 0 /lib/libdl-2.5.so
0x5d8000 0x5d9000 0x1000 0x2000 /lib/libdl-2.5.so
0x5d9000 0x5da000 0x1000 0x3000 /lib/libdl-2.5.so
0x5dc000 0x5f1000 0x15000 0 /lib/libpthread-2.5.so
0x5f1000 0x5f2000 0x1000 0x15000 /lib/libpthread-2.5.so
0x5f2000 0x5f3000 0x1000 0x16000 /lib/libpthread-2.5.so
0x5f3000 0x5f5000 0x2000 0x5f3000
0x5f7000 0x722000 0x12b000 0 /usr/lib/perl5/5.8.8/i386-linux-thread-multi/CORE/libperl.so
0x722000 0x727000 0x5000 0x12a000 /usr/lib/perl5/5.8.8/i386-linux-thread-multi/CORE/libperl.so
0x727000 0x729000 0x2000 0x727000
0xa3b000 0xa40000 0x5000 0 /tmp/Audio-FindChunks-1.04/dbg-bld/blib/arch/auto/Audio/FindChunks/FindChunks.so
0xa40000 0xa41000 0x1000 0x4000 /tmp/Audio-FindChunks-1.04/dbg-bld/blib/arch/auto/Audio/FindChunks/FindChunks.so
0xb80000 0xb82000 0x2000 0 /usr/lib/perl5/5.8.8/i386-linux-thread-multi/auto/Cwd/Cwd.so
0xb82000 0xb83000 0x1000 0x1000 /usr/lib/perl5/5.8.8/i386-linux-thread-multi/auto/Cwd/Cwd.so
0xd0c000 0xd21000 0x15000 0 /lib/libnsl-2.5.so
0xd21000 0xd22000 0x1000 0x14000 /lib/libnsl-2.5.so
0xd22000 0xd23000 0x1000 0x15000 /lib/libnsl-2.5.so
0xd23000 0xd25000 0x2000 0xd23000
0xd38000 0xd48000 0x10000 0 /lib/libresolv-2.5.so
0xd48000 0xd49000 0x1000 0xf000 /lib/libresolv-2.5.so
0xd49000 0xd4a000 0x1000 0x10000 /lib/libresolv-2.5.so
0xd4a000 0xd4c000 0x2000 0xd4a000
0xdda000 0xddc000 0x2000 0 /lib/libutil-2.5.so
0xddc000 0xddd000 0x1000 0x1000 /lib/libutil-2.5.so
( run in 0.274 second using v1.01-cache-2.11-cpan-3cd7ad12f66 )