Luke Palmer wrote: > > 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...
If our DoD is no longer walking the C stack, then stacktop should no longer be needed. Until the code is changed, just pass NULL. > 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 -- $a=24;split//,240513;s/\B/ => /for@@=qw(ac ab bc ba cb ca );{push(@b,$a),($a-=6)^=1 for 2..$a/6x--$|;print "[EMAIL PROTECTED] ]\n";((6<=($a-=6))?$a+=$_[$a%6]-$a%6:($a=pop @b))&&redo;}