Parrot allows you to push all of the string registers (pointers, actually) and integer registers onto their own private stack with pushs, pushi and restore them with pops and popi. (Numerics and PMC's with n/p respectively.) So you *can* write recursive subroutines after a fashion but effectively you make the entire register set local to each recursion: 

         set I0, 100
         bsr FUNC
         print I0     # Gives 100
         end
FUNC:    pushi
         set I0, 56
         popi
         ret

[download]

local() for a particular registister can be emulated but it's a pain in the ass with something like: 

         set I0, 100
         set I1, 200
         set I6, 700
         bsr FUNC
         # 
         print I0  # 100, original value
         print I1  # 0, new value
         print I6  # 0, new value
         end

         # Local changes to I1 and I6 preserved
         # think of this as unlocal()  :)
FUNC:    pushi   # saves all integer registers
         set I0, 0
         set I1, 0
         set I6, 0
         save I1
         save I6
         popi
         restore I6
         restore I1
         ret

[download]
The answer to your other question (asked in /msg) is that no, you can't peer down the stack or get the stack's depth at this time. However you can simulate peering into the stack just fine with the tools given.

In reply to Re: Is recursion allowed? by clintp
in thread Algorithm Pop Quiz: Sorting by clintp

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.