Leopold Toetsch <[EMAIL PROTECTED]> wrote:
[ fullquote ]
> A recent discussion with Sam has shown that the current calling
> conventions for overloaded operators don't match Python semantics (nor
> Perl6 when I interpret S06 and S13 correctly).
> The difference is that Parrot is passing in the d
Dan Sugalski <[EMAIL PROTECTED]> wrote:
> The register coloring algorithm's not dirtying registers right, and
> looks to be assuming that things are in registers across method calls
> when they really aren't.
Fixed and thanks for the test case,
leo
On Sat, Dec 11, 2004 at 04:42:54AM +0100, Leopold Toetsch wrote:
> Patrick R. Michaud <[EMAIL PROTECTED]> wrote:
>
> > Just as C returns its first non-false argument, the interpretation
> > of C would be that it returns its single non-false argument, or 1 if
> > both (all?) arguments logically eva
James deBoer <[EMAIL PROTECTED]> wrote:
> I would even go further than that and say that if we went with
> PGE::Rule's "split", the split opcode should be obsoleted.
All these function/method like opcodes will be refactured somewhen.
WRT split (you write):
PGE::Rule."split"()
in general
$
Patrick R. Michaud <[EMAIL PROTECTED]> wrote:
> Just as C returns its first non-false argument, the interpretation
> of C would be that it returns its single non-false argument, or 1 if
> both (all?) arguments logically evaluate to false.
Yep, except *0* if both evaluate to either true or false.
Leopold Toetsch <[EMAIL PROTECTED]> wrote:
> Dan Sugalski <[EMAIL PROTECTED]> wrote:
>> The register coloring algorithm's not dirtying registers right,
> There are still some compatibility hooks inside parrot that set P1 on
> the caller's end (or on both sides). I'll remove this remenants RSN.
L
Sam Ruby writes:
> Mike Guy wrote:
> >
> >Perl5 C always returns a "standard" boolean value, i.e.
> >dualvar(0, '') or dualvar(1, '1').Perl6/Parrot should do the same
> >thing.
>
> Try:
>
> perl -le "print 'day' xor 'night'"
>
> On the version of Perl I have installed, I get "day" as the
On Fri, Dec 10, 2004 at 01:28:10PM -0500, Sam Ruby wrote:
> Mike Guy wrote:
> >
> >Perl5 C always returns a "standard" boolean value, i.e.
> >dualvar(0, '') or dualvar(1, '1').Perl6/Parrot should do the same
> >thing.
>
> Try:
>
> perl -le "print 'day' xor 'night'"
>
> On the version of
Patrick R. Michaud wrote:
On Fri, Dec 10, 2004 at 01:34:03PM -0500, James deBoer wrote:
Currently, the split opcode is declared as 'split(out PMC, in STR, in
STR)' where $2 is a regex.
PGE, however, currently supports three types of regular expressions, and
more are likely going to be added.
[ From p6i ]
Patrick R. Michaud writes:
> On Fri, Dec 10, 2004 at 08:50:46PM +0100, Leopold Toetsch wrote:
> > Not quite. It gives one value if one is true or 0 (false). This is more
> > information then the perl5 implementation returns. The returned value (if
> > any) is still true but usable, if
On Fri, 2004-12-10 at 07:23 -0800, via RT wrote:
> trying to compile parrot (cvs) in a linux ppc machine I get the following
> error. It looks like the configure process gets confused and does not compile
> the ppc jit code when it is under linux:
This is a duplicate of #32514, which still awai
On Fri, Dec 10, 2004 at 08:50:46PM +0100, Leopold Toetsch wrote:
> >> We need language lawyers ;)
>
> > IANAL, but I am a mathematician.Because C necessarily always
> > depends on *both* its arguments, analogies with C and C are
> > inappropriate.C cannot short-circuit, and it is not sensi
Mike Guy <[EMAIL PROTECTED]> wrote:
> Leopold Toetsch <[EMAIL PROTECTED]> wrote
>> dropping bitwise xor, and including "undef xor undef" reveals that Perl5
> has a different opinion then Parrot (or Perl6?).
> inline op xor(out INT, in INT, in INT) :base_core {
> $1 = ($2 && ! $3) ? $2 : ($3 && !
Dan Sugalski <[EMAIL PROTECTED]> wrote:
> The register coloring algorithm's not dirtying registers right,
There are still some compatibility hooks inside parrot that set P1 on
the caller's end (or on both sides). I'll remove this remenants RSN.
leo
# New Ticket Created by Dan Sugalski
# Please include the string: [perl #32996]
# in the subject line of all future correspondence about this issue.
# http://rt.perl.org:80/rt3/Ticket/Display.html?id=32996 >
The register coloring algorithm's not dirtying registers right, and
looks to be assu
On Fri, Dec 10, 2004 at 01:34:03PM -0500, James deBoer wrote:
> Currently, the split opcode is declared as 'split(out PMC, in STR, in
> STR)' where $2 is a regex.
>
> PGE, however, currently supports three types of regular expressions, and
> more are likely going to be added. So, which type of r
Dave Whipp wrote:
Attributes are declared with C, but also have a unique signil
C<$.>. So is it strictly necessary to declare them? Or rather, is it
Cly necessary -- i.e. is the following legal?
no strict;
class Foo {
method bar {
say $.a++
}
}
For the standard layout, I'd think it'd be g
Mike Guy wrote:
Perl5 C always returns a "standard" boolean value, i.e.
dualvar(0, '') or dualvar(1, '1').Perl6/Parrot should do the same
thing.
Try:
perl -le "print 'day' xor 'night'"
On the version of Perl I have installed, I get "day" as the result.
- Sam Ruby
Precedence.
print("day\n" xor "night\n");
--
Gordon Henriksen
IT Manager
ICLUBcentral Inc.
[EMAIL PROTECTED]
-Original Message-
From: Sam Ruby [mailto:[EMAIL PROTECTED]
Sent: Friday December 10, 2004 13:28
To: [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Subject: Re: [CVS ci] class refact
Currently, the split opcode is declared as 'split(out PMC, in STR, in
STR)' where $2 is a regex.
PGE, however, currently supports three types of regular expressions, and
more are likely going to be added. So, which type of regular expression
should split use?
The Perl6's split function will li
On Fri, Dec 10, 2004 at 10:01:44AM -0800, Ovid ([EMAIL PROTECTED]) wrote:
> I would add Test::MockModule to the test modules. I've stopped using
> my Sub::Override since I encountered this very useful tool.
>
> On the test guidelines, perhaps there should be an "or die "
> recommendation after "u
# New Ticket Created by [EMAIL PROTECTED]
# Please include the string: [perl #32989]
# in the subject line of all future correspondence about this issue.
# http://rt.perl.org:80/rt3/Ticket/Display.html?id=32989 >
---
osname= linux
osvers= 2.6.9-gentoo-r9
arch= powerpc-linux-thread-multi
cc=
Two comments:
I would add Test::MockModule to the test modules. I've stopped using
my Sub::Override since I encountered this very useful tool.
On the test guidelines, perhaps there should be an "or die "
recommendation after "use_ok". Life gets pretty miserable if that
fails but many subsequen
On Thu, Dec 09, 2004 at 11:18:34AM -0800, Larry Wall wrote:
> On Wed, Dec 08, 2004 at 08:24:20PM -0800, Ashley Winters wrote:
> : I'm still going to prefer using :=, simply as a good programming
> : practice. My mind sees a big difference between building a parse-tree
> : object and just grepping f
Attributes are declared with C, but also have a unique signil
C<$.>. So is it strictly necessary to declare them? Or rather, is it
Cly necessary -- i.e. is the following legal?
no strict;
class Foo {
method bar {
say $.a++
}
}
Leopold Toetsch <[EMAIL PROTECTED]> wrote
> dropping bitwise xor, and including "undef xor undef" reveals that Perl5
has a different opinion then Parrot (or Perl6?).
inline op xor(out INT, in INT, in INT) :base_core {
$1 = ($2 && ! $3) ? $2 : ($3 && ! $2) ? $3 : 0;
goto NEXT();
}
> We need la
Klaas-Jan Stol wrote:
Sam Ruby wrote:
Klaas-Jan Stol wrote:
Hello,
I just got a fresh cvs checkout, compiled it, compiled pge and tried
to make tcl.
This is what I get:
(cd ../../ && ./parrot --output=languages/tcl/lib/tcllib.pbc
languages/tcl/lib/tcllib.imc)
Couldn't load 'tcl_group': tcl_group
After quite a bit of feedback on the first beta, I'm pleased to
announce the second beta. Get it from:
http://cpanplus.xs4all.nl/~kane/CPANPLUS-0.050_02.tar.gz
Or soon, a CPAN near you.
Changes for 0.050_02Fri Dec 10 15:03:39 CET 2004
*
http://qa.perl.org/testing-guidelines.html is updated. So is
http://qa.perl.org/test-modules.html, with new modules and some
reorganization.
xoxo,
Andy
--
Andy Lester => [EMAIL PROTECTED] => www.petdance.com => AIM:petdance
Sam Ruby wrote:
Klaas-Jan Stol wrote:
Hello,
I just got a fresh cvs checkout, compiled it, compiled pge and tried
to make tcl.
This is what I get:
(cd ../../ && ./parrot --output=languages/tcl/lib/tcllib.pbc
languages/tcl/lib/tcllib.imc)
Couldn't load 'tcl_group': tcl_group: cannot open shared o
Consider a class (e.g., the hypothetical Geometry::Triangle) that can
have several attributes (side1, side2, side3, angle1, ang_bisector1,
side_bisector, altitude1 and so forth), most of which will not be
needed for most instances of Geometry::Triangle.
I know how this can be done in P5. Using
Eirik Berg Hanssen <[EMAIL PROTECTED]> wrote:
> Which Perl5 (xor, undef) would this be? It does not look like the
> result is undef around here:
> [EMAIL PROTECTED]:~$ perl -le 'print defined($_)?"defined":"undef", ": «$_»"
> for map {(undef xor $_), ($_ xor undef), (undef ^ $_), ($_ ^ undef)}
Michele Dondi writes:
> On Mon, 6 Dec 2004, Larry Wall wrote:
>
> >to return an infinite list, or even
> >
> > return 0..., 0...;
> >
> >to return a surreal list. Either of those may be bound to an array
>
> Hope not to bark something utterly stupid, but... if one iterates over
> such a list,
On Sat, 4 Dec 2004 22:03:19 -0800, Larry Wall <[EMAIL PROTECTED]> wrote:
On Sun, Dec 05, 2004 at 02:15:51AM +0300, Alexey Trofimenko wrote:
: oh! that it. I've found example which could make it clear to me
:
: sub test {
: return sub {
: for 1..3 {
:state $var = 1;
:print $var
Sam Ruby <[EMAIL PROTECTED]> wrote:
> Leopold Toetsch wrote:
>> # find_method class 'A' method '__absolute': Sub
>> # Calling sub '__absolute'
> But only for classes that inherit from delegate.
Yes of course. Objects's derived from ParrotObject (i.e. Parrot standard
objects) dispatch to overload
Leopold Toetsch <[EMAIL PROTECTED]> writes:
> Sam Ruby <[EMAIL PROTECTED]> wrote:
>
>> I took a look into this. Apparently, in Perl5, the result of xor'ing
>> undef with anything is undef. I'm not suggesting that this is either
>> right or wrong (it actually was surprising to me),
>
> Yep. It do
Eirik Berg Hanssen wrote:
Leopold Toetsch <[EMAIL PROTECTED]> writes:
Sam Ruby <[EMAIL PROTECTED]> wrote:
I took a look into this. Apparently, in Perl5, the result of xor'ing
undef with anything is undef. I'm not suggesting that this is either
right or wrong (it actually was surprising to me),
Michele Dondi wrote:
On Sun, 5 Dec 2004, Matthew Walton wrote:
At least we had the sense to call them subroutines instead of functions.
Of course, that also upset the mathematicians, who wanted to call them
functions anyway. Go figure.
That might be because the mathematicians haven't heard of a v
Leopold Toetsch wrote:
Sam Ruby <[EMAIL PROTECTED]> wrote:
I took a look into this. Apparently, in Perl5, the result of xor'ing
undef with anything is undef. I'm not suggesting that this is either
right or wrong (it actually was surprising to me),
Yep. It doesn't really follow the definition of x
On Mon, 6 Dec 2004, Larry Wall wrote:
to return an infinite list, or even
return 0..., 0...;
to return a surreal list. Either of those may be bound to an array
Hope not to bark something utterly stupid, but... if one iterates over
such a list, may it be that on the first C one really starts ov
On Mon, 6 Dec 2004, Luke Palmer wrote:
Well, there's always "domain" and "range", if we want to be
mathematical.
[snip]
What you want here is "domain" and "codomain". Which leads me to
believe that you don't want either.
For the record, in most connections "range" would be just as good. Indeed
"
On Sun, 5 Dec 2004, Matthew Walton wrote:
At least we had the sense to call them subroutines instead of functions.
Of course, that also upset the mathematicians, who wanted to call them
functions anyway. Go figure.
That might be because the mathematicians haven't heard of a variant of a
function
On Fri, 3 Dec 2004, Brent 'Dax' Royal-Gordon wrote:
Larry Wall <[EMAIL PROTECTED]> wrote:
So optimizing to a state variable won't necessarily help your loop
overhead, but it could help your subroutine overhead, at least in Perl
5, if Perl 5 had state variables. Best you can do in Perl 5 is an
"our
Sam Ruby <[EMAIL PROTECTED]> wrote:
> Leopold Toetsch wrote:
>> -=item C
> IMHO, all of these can go. The invoke methods need to be on the PMCs
> returned by get_class.
That's exactly how it worked - the PMCs get_class returns a PMC of the
same type, so they act as their own class. But the "i
Sam Ruby <[EMAIL PROTECTED]> wrote:
> I took a look into this. Apparently, in Perl5, the result of xor'ing
> undef with anything is undef. I'm not suggesting that this is either
> right or wrong (it actually was surprising to me),
Yep. It doesn't really follow the definition of xor, nor does it
On Fri, 3 Dec 2004, Larry Wall wrote:
On Fri, Dec 03, 2004 at 06:43:05PM +, Herbert Snorrason wrote:
: This whole issue kind of makes me go 'ugh'. One of the things I like
: best about Perl is the amazing simplicity of the <> input construct.
Hmm.
while (<>) {...}
for .lines {...}
Looks l
On Fri, 3 Dec 2004, Larry Wall wrote:
On Sat, Dec 04, 2004 at 01:11:30AM +0100, Juerd wrote:
: What happens to the flip flop operator? Will .. in scalar context remain
: the same?
I don't think so. It's definitely a candidate for a longer
Huffmanization simply in terms of frequency of use. On top
Leopold Toetsch wrote:
Sam Ruby <[EMAIL PROTECTED]> wrote:
I continue to disagree with the part of this conclusion where you insert
find_method into the discussion. To give a concrete example: at the
moment the lookup involved in abs_p_p does not involve the use of
find_method.
$ cat abs.imc
.sub
Leopold Toetsch wrote:
Leopold Toetsch wrote:
Currently one test (t/pmc/pmc_43.pasm) is failing due to wrong
inheritance.
Actually not because of inheritance. The implementation of
PerlUndef.logical_xor was bogus. I've fixed this and the test.
I took a look into this. Apparently, in Perl5, the r
> I use Text::Differences for this, as it will show which lines are
> different, rather than just the first 50 characters. Much
> easier for me to diagnose problems.
Something I put at the top of a lot of my test scripts is:
if(eval "require Test::Differences; 1") {
no warnings 'redefine';
Klaas-Jan Stol wrote:
Hello,
I just got a fresh cvs checkout, compiled it, compiled pge and tried to
make tcl.
This is what I get:
(cd ../../ && ./parrot --output=languages/tcl/lib/tcllib.pbc
languages/tcl/lib/tcllib.imc)
Couldn't load 'tcl_group': tcl_group: cannot open shared object file: No
William Coleda wrote:
Can you give us a copy of the generated "myconfig" file in the top
level parrot directory?
yep,
this is it:
=
Summary of my parrot 0.1.1 configuration:
configdate='Thu Dec 9 23:53:50 2004'
Platform:
osname=linux, archname=i486-linux
52 matches
Mail list logo
