How does an XSUB find out what package it is compiled into?

It's easy in a pure Perl sub -- just use __PACKAGE__ -- but accessing 
that from an XSUB doesn't work (or at least, not like this):

#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

MODULE = Foo        PACKAGE = Foo       

void
foo()
PPCODE:
{
    warn("I'm compiled into %s\n", SvPVX(eval_pv("__PACKAGE__", 0)));
}

The above outputs:

I'm compiled into main

How do I get the "Foo" that I wanted?

- Steve



------------------------------------------------
Radan Computational Ltd.

The information contained in this message and any files transmitted with it are 
confidential and intended for the addressee(s) only.  If you have received this 
message in error or there are any problems, please notify the sender immediately.  The 
unauthorized use, disclosure, copying or alteration of this message is strictly 
forbidden.  Note that any views or opinions presented in this email are solely those 
of the author and do not necessarily represent those of Radan Computational Ltd.  The 
recipient(s) of this message should check it and any attached files for viruses: Radan 
Computational will accept no liability for any damage caused by any virus transmitted 
by this email.

Reply via email to