use call_sv or call_pv to call yourself again. You can also do the hackish 
PUSHMARK(SP);
PUSHs(somesv);
PUTBACK;
XS_Foo__Bar_Func(aTHX_ cv);
SPAGAIN;
retval = POPs; /* did we get 1 elem? this code just assumes*/
/* ?????? */

[download]
Which bypasses the Interp almost completely and is more efficient. The problem with the above is, if the child XSUB being called raw dies/croaks, the error message will put the blame as the parent XSUB since the global state info wasn't updated in the interp. Also note the parent XSUB is passing its CV to the child XSUB, so ALIAS/XSANY will break if the parent isn't the child and the child relies on XSANY/ALIAS to operate. How to calculate the number of items XS_Foo__Bar_Func returned IDK. It probably involves the delta between C auto SV * mark and SP and +0, +1 or -1 SV*. Another thing, Perl uses malloc memory to implement pure perl opcode recursion, XSUBs use C stack memory. You might get an access vio/segv on deep recursion instead of a descriptive fatal error in pure perl.

In reply to Re: Recursing in XS? by bulk88
in thread Recursing in XS? by the.jxc

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.