Re: Creating an XSUB on the fly

bulk88 -

That's exactly what I needed! Thank you! Now I have to figure out how
to add args processing to this jit-compiled C function, but that's a
different problem. :-)

David

On Sat, Jul 21, 2012 at 2:31 AM, bulk 88 <[email protected]> wrote:
>
>
> --Forwarded Message Attachment--
> Date: Tue, 20 Mar 2012 11:34:37 -0500
> Subject: Creating an XSUB on the fly
> From: [email protected]
> To: [email protected]
>
> Hello everybody -
>
> I'm looking into hooking the Tiny C Compiler into Perl. Among other things, it can JIT-compile a string of C code and let you get a function pointer (or a pointer to any other structure of the compiled code that is globally scoped) that you can subsequently call from your original C program. I would like to try to use this to build Perl CVs/XSUBs, but I see no interface for creating an XSUB that is not installed into a package.
>
>
> The easy work around is to have a designated package into which all such xsubs are installed and simply use newxs (see http://perldoc.perl.org/perlembed.html). The name given to the Perl-side function would be composed from a hashing algorithm of some sort to avoid collisions. Still, I would really like to create simple function references without having to create the entry in the package.
>
>
> Thoughts? Wisdom?
> David
> .......................................................
> _______________________________________________________
> Per, http://perl5.git.perl.org/perl.git/blob/d845901fab02ff3b498515ad6e2d06c711724d24:/op.c#l7375 , I think if the package name is NULL, you get an anonymous CV that has no package with a refcount of 1.
>



-- 
 "Debugging is twice as hard as writing the code in the first place.
  Therefore, if you write the code as cleverly as possible, you are,
  by definition, not smart enough to debug it." -- Brian Kernighan