= .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
LT == Leopold Toetsch [EMAIL PROTECTED] writes:
LT Ilya Martynov wrote:
Prints 'P3 is not NULL'
LT Yep, some minutes ago I've fixed it. Thanks for the test, I've added
LT it plus another one to CVS.
There is a small typo in comment for second test case:
Index: imcc/t/syn/pcc.t
Text::Diff instead of diff -u.
--
Ilya Martynov, [EMAIL PROTECTED]
CTO IPonWEB (UK) Ltd
Quality Perl Programming and Unix Support
UK managed @ offshore prices - http://www.iponweb.net
Personal website - http://martynov.org
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
Performs a deeper copy of y into x, using the vtable appropriate
--
Ilya Martynov (http://martynov.org/)
it
yourself: http://search.cpan.org/doc/JDUNCAN/Class-Tom-3.02/Tom.pm.
--
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
| Ilya Martynov (http://martynov.org/)|
| GnuPG 1024D/323BDEE6 D7F7 561E 4C1D 8A15 8E80 E4AE BE1A 53EB 323B DEE6
.
--
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
| Ilya Martynov (http://martynov.org/)|
| GnuPG 1024D/323BDEE6 D7F7 561E 4C1D 8A15 8E80 E4AE BE1A 53EB 323B DEE6 |
| AGAVA Software Company (http://www.agava.com/) |
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
usefull.
--
Ilya Martynov
AGAVA Software Company, http://www.agava.com
13 matches
Mail list logo