Select Code to Download

entering perl callback handler...
my_perl == NULL
...
#3  0xb7ec94fb in start_thread () from /lib/tls/i686/cmov/libpthread.s
+o.0
#4  0xb7e4be5e in clone () from /lib/tls/i686/cmov/libc.so.6

void SWIG_Wrap_callback(int event, tMy_MSG *p_data)
{
...
      call_sv(sv, G_DISCARD);
      printf("Perl sub completed successfully...\n");
}

      printf("entering perl callback handler...\n");
      register PerlInterpreter *my_perl __attribute__((unused)) = ((Pe
+rlInterpreter *)pthread_getspecific((*Perl_Gthr_key_ptr(((void *)0)))
+));
...
      register SV **sp = (*Perl_Tstack_sp_ptr(((PerlInterpreter *)pthr
+ead_getspecific((*Perl_Gthr_key_ptr(((void *)0)))))));
      printf("Destruct level : %d...\n", (*Perl_Iperl_destruct_level_p
+tr(((PerlInterpreter *)pthread_getspecific((*Perl_Gthr_key_ptr(((void
+ *)0))))))));
      printf("DSP done...\n");

-Dbool=char -fpic -D_REENTRANT -D_GNU_SOURCE -DTHREADS_HAVE_PIDS -DDEB
+IAN -fno-strict-aliasing -pipe -isystem /usr/local/include -D_LARGEFI
+LE_SOURCE -D_FILE_OFFSET_BITS=64 -DSWIG -g -DMULTIPLICITY -DPERL_IMPL
+ICIT_CONTEXT -DTHREADS_HAVE_PIDS -DUSE_LARGE_FILES -DUSE_PERLIO -DUSE
+_REENTRANT_API -DBSA_CLIENT

Summary of my perl5 (revision 5 version 8 subversion 8) configuration:
  Platform:
    osname=linux, osvers=2.6.24-19-server, archname=i486-linux-gnu-thr
+ead-multi
...
    /etc/perl
    /usr/local/lib/perl/5.8.8
: