On Sun, Jan 16, 2005 at 09:27:56PM -0800, Jonathan Lang wrote:
> How would I do the following in Perl 6?
Modulo any syntax foibles, I think it'd look like this:
>
> if a given condition is true for every element in a list, do something.
if all(LIST) > 3 { do_something }
>
> or
>
> if a g
Both of your questions are quite elegantly handled by junctions. If
the condition were, say, $elem > 10:
Jonathan Lang <[EMAIL PROTECTED]> wrote:
> if a given condition is true for every element in a list, do something.
if all(@list) > 10 { ... }
> if a given condition is true for any e
How would I do the following in Perl 6?
if a given condition is true for every element in a list, do something.
or
if a given condition is true for any element in a list, do something.
=
Jonathan "Dataweaver" Lang
__
Do you Yahoo!?
Ya
So, it's possible for someone to crash parrot by writing questionable PIR? ^_^
(This was working fine for quite some time, btw.)
Also, what do I need to do to save these subroutines? I'm doing dynamic
dispatch based on the tcl commands, so
proc foo {} {
puts "foo"
}
defines a sub in parrot's "Tcl"
# New Ticket Created by Bernhard Schmalhofer
# Please include the string: [perl #33801]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/rt3/Ticket/Display.html?id=33801 >
Hi,
I have been working on a dynamic PMC that calls into 'gdbm'. 'gdbm' is a
f
William Coleda <[EMAIL PROTECTED]> wrote:
> Running the tcl "examples/bench.tcl" script, I get the following backtrace:
> Program received signal EXC_BAD_ACCESS, Could not access memory.
> 0x0021cb38 in Parrot_Sub_invoke (interpreter=0xd001a0, pmc=0xed2b60,
> next=0xf20284) at classes/sub.c:239
>
Will Coleda <[EMAIL PROTECTED]> wrote:
> It seems that the use of P30 as the .STACK is fine until one of the
> built-on-the-fly subroutines is called, at which point P30 is NULL,
> and any attempts to twiddle the stack result in:
As P30 isn't passed on to the subroutine as an argument it doesn't
