Embedding Parrot in Perl

[Luke Palmer]

I started working on some XS code for embedding a Parrot interpreter in
Perl.  I ran into a few problems:

    1) I don't know XS :-)   (good way to learn, though)
    
    2) What do I put as stacktop in Parrot_init()?  I can't just use a
       local variable in the calling function, because it will return and
       there might be something lower than that later...
    
    3) I'd like to have the PIR compiler available to this embedded
       interpreter.  What would be the best way to do that?

Thanks,
Luke