= .param_num
loop:
if $I1 == 0 goto return
# retrieves a parameter by its number
$P2 = .param($I1)
add $P1, $P2
dec $I1
goto loop
return:
.pcc_begin_return
.return $P1
.pcc_end_return
.end
--
Ilya Martynov, [EMAIL PROTECTED]
CTO
LT == Leopold Toetsch [EMAIL PROTECTED] writes:
LT Ilya Martynov [EMAIL PROTECTED] wrote:
Hello all,
1) First question is how to tell if variadic function recieved 11 or
12 or more params (for simplicity let's suppose that we use only
pmc parameters).
According calling conventions (pdd03
JR == Jens Rieks [EMAIL PROTECTED] writes:
JR Hi,
JR On Monday 22 March 2004 10:44, Ilya Martynov wrote:
Hello all,
1) First question is how to tell if variadic function recieved 11 or
12 or more params (for simplicity let's suppose that we use only
pmc parameters).
According calling
server: failed to obtain dir lock in repository
TG `/cvs/public/parrot/Parrot'
TG cvs [server aborted]: read lock failed - giving up
TG Both cvs co and cvs update work fine.
Looks like you have no permissions to check in.
--
Ilya Martynov (http://martynov.org/)
Re-enable GC
-=back
+=cut
op collecton() {
if (interpreter-GC_block_level) {
--
Ilya Martynov (http://martynov.org/)
and puts it in $1
+If $2 = 0, gets the type of entry at that depth from the top of the
+stack and puts it in $1, with 0 being the top entry. If $2 0, then
+gets the type of entry |$2| entries from the bottom of the stack and
+puts it in $1.
=cut
--
Ilya Martynov (http://martynov.org/)
On Mon, 29 Apr 2002 18:58:18 -0400, Jeff [EMAIL PROTECTED] said:
J Ilya Martynov wrote:
Index: core.ops
[..snip..]
J Applied, thanks.
I've just found other POD bugs in core.ops
Index: core.ops
===
RCS file: /cvs/public