Re: The speed (improvement) of Rakudo
On Sat, 17 Jun 2017 07:46:46 +0300, Gabor Szabo <szab...@gmail.com> wrote: > Hi, > > Is there some measurements regarding the speed of Rakudo? Mine are probably the longest record of speed measurements, but it is just measuring one task (that uses a lot of operations). It is not measuring all aspects of perl6 http://tux.nl/Talks/CSV6/speed4.html And a comparison of that task to other languages http://tux.nl/Talks/CSV6/speed5.html And the explanation of what it shows https://github.com/Tux/CSV/blob/master/README.speed Is that what you were looking for? > e.g. It would be nice to have a graph of some hand-picked operations > measured at different points in time of the development of Rakudo and > then graphed in a nice way. Is there anything like that? > > Gabor -- H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/ using perl5.00307 .. 5.27 porting perl5 on HP-UX, AIX, and openSUSE http://mirrors.develooper.com/hpux/http://www.test-smoke.org/ http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/ pgpaB9OlGkeSn.pgp Description: OpenPGP digital signature
Re: list named argument in MAIN
On Thu, 1 Jun 2017 14:11:47 +0200, Timo Paulssen <t...@wakelift.de>
wrote:
> It seems like this only works if you supply --dirs= multiple times
>
> perl6 -e 'sub MAIN (List :$dirs=[]) { .say for @$dirs }' --dirs=d1
> --dirs=d2 --dirs=d3
>
> d1
> d2
> d3
took me a bit as it needs both .List *and* flat. Got help on IRC
$ perl6 -e 'sub MAIN (List :$dirs=[]) { .say for flat @$dirs.List».split: /","/
}' --dirs=d1 --dirs=d2 --dirs=d3,d4,d5
d1
d2
d3
d4
d5
--
H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/
using perl5.00307 .. 5.25 porting perl5 on HP-UX, AIX, and openSUSE
http://mirrors.develooper.com/hpux/http://www.test-smoke.org/
http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/
pgpKNPVEGGeH8.pgp
Description: OpenPGP digital signature
Re: maintainability and "or"
On Tue, 21 Mar 2017 12:50:18 +0100, Elizabeth Mattijsen
<l...@dijkmat.nl> wrote:
> > On 21 Mar 2017, at 12:38, ToddAndMargo <toddandma...@zoho.com> wrote:
> > This is just one of those chatter posts.
> >
> > To me, the holy grail of coding is maintainability,
> > which is why I code in Top Down.
> >
> > Code like below get my goat because I have to look
> > at it several times before I realize what is going on
> >
> > $Name.IO.f or $Name.IO.open(:w).close;
> >
> > Basically the above says:
> >
> >If the the first part of the logical OR passes,
> >then don't bother testing the second part. And
> >if the second part of the Logical OR passes or
> >fails, then "so what”.
>
> FWIW, I agree with you. I don’t like the use of and/or in this
> capacity. But many people swear by it. To each its own.
I am in the opposite camp. I use this all the time, as - to me - it
makes perfect sense. I am rather consequent (in perl5) using the mix of
|| (between expressions) and or (between an expression and an action)
expression or action;
expression || expression and action;
> > I'd much rather see
> > if not $PathAndName.IO.f { $PathAndName.IO.open(:w).close; }
I can live with that, but I still prefer the or, because it reads
cleaner
> > Which to me says:
> >
> >If this does not pass, then do something about it.
> >
> > To me, it is much more maintainable.
>
> And then there is the postfix if/unless way, which I personally like:
>
> $PathAndName.IO.open(:w).close unless $PathAndName.IO.f;
Which I really abhor/hate. *THAT* makes me have to read the line thrice
> Which to me reads:
>
> Create the file unless it already exists.
To me it reads "Create the file". Oh shit I shouldn't have as some
idiot told me too late not to if it rains.
Program minds differ :)
> Liz
--
H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/
using perl5.00307 .. 5.25 porting perl5 on HP-UX, AIX, and openSUSE
http://mirrors.develooper.com/hpux/http://www.test-smoke.org/
http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/
pgpYAgQdaBz5i.pgp
Description: OpenPGP digital signature
Re: Is there a list out there of all the \n characters?
On Tue, 7 Mar 2017 00:23:38 -0800, ToddAndMargo <toddandma...@zoho.com>
wrote:
> >>> 002b93NEWLINE RIGHT
> >>> 003037IDEOGRAPHIC TELEGRAPH LINE FEED SEPARATOR SYMBOL
> >>> 004dd7HEXAGRAM FOR RETURN
> >>
> >> Do these have "\x" escape characters like "\n"?
> >
> > perl5 -wE'say "\x{2028}"'
> > perl6 -e'say "\x[23ce]"'
>
> Great example. Thank you!
yw.
Note however that perl6 is pure-utf8 by default, and perl5 is not,
which is why my example will warn in perl5:
$ perl5 -wE'say "\x{23ce}"'
Wide character in say at -e line 1.
⏎
In perl5 you'll need several hoops to jump through to ensure your data
is valid both on input and output
$ perl5 -CO -wE'say "\x{23ce}"'
⏎
$ perl5 -wE'binmode STDOUT, ":encoding(utf-8)"; say "\x{23ce}"'
⏎
That means that if your IO contains non-utf8, like JPG images, you'll
need that extra stretch in perl6. As working with text is more common
than working with images (raw binary data), I think poerl6 made the
best options default.
--
H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/
using perl5.00307 .. 5.25 porting perl5 on HP-UX, AIX, and openSUSE
http://mirrors.develooper.com/hpux/http://www.test-smoke.org/
http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/
pgpqozuYMzbcB.pgp
Description: OpenPGP digital signature
Re: Is there a list out there of all the \n characters?
On Tue, 7 Mar 2017 00:13:49 -0800, ToddAndMargo <toddandma...@zoho.com>
wrote:
> On 03/06/2017 09:35 AM, H.Merijn Brand wrote:
>
> > 0aLINE FEED
> > 0cFORM FEED
> > 0dCARRIAGE RETURN
> > 1eRECORD SEPARATOR
> > 1fUNIT SEPARATOR
> > 8dREVERSE LINE FEED
> > 002028LINE SEPARATOR
> > 0023ce ⏎ RETURN SYMBOL
> > 00240a ␊ SYMBOL FOR LINE FEED
> > 00240c ␌ SYMBOL FOR FORM FEED
> > 00240d ␍ SYMBOL FOR CARRIAGE RETURN
> > 00241e ␞ SYMBOL FOR RECORD SEPARATOR
> > 00241f ␟ SYMBOL FOR UNIT SEPARATOR
> > 002424  SYMBOL FOR NEWLINE
> > 002b90RETURN LEFT
> > 002b91RETURN RIGHT
> > 002b92NEWLINE LEFT
> > 002b93NEWLINE RIGHT
> > 003037IDEOGRAPHIC TELEGRAPH LINE FEED SEPARATOR SYMBOL
> > 004dd7HEXAGRAM FOR RETURN
>
> Do these have "\x" escape characters like "\n"?
perl5 -wE'say "\x{2028}"'
perl6 -e'say "\x[23ce]"'
--
H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/
using perl5.00307 .. 5.25 porting perl5 on HP-UX, AIX, and openSUSE
http://mirrors.develooper.com/hpux/http://www.test-smoke.org/
http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/
pgp2PRPeerAwF.pgp
Description: OpenPGP digital signature
Re: Is there a list out there of all the \n characters?
On Mon, 6 Mar 2017 18:08:47 +0100, Luca Ferrari <fluca1...@infinito.it> wrote: > On Mon, Mar 6, 2017 at 11:14 AM, ToddAndMargo <toddandma...@zoho.com> wrote: > > Hi All, > > > > Is there a list of all the \n pairs out there somewhere? > > > > Not sure, but if you mean a newline than I'm aware only of: > - \n (unix) > - \r\n (dos) > - \n\r (old mac) > > At least I'm not unlucky enough to have encountered another combination. > > Luca Don't rule out the idiots :) 0aLINE FEED 0cFORM FEED 0dCARRIAGE RETURN 1eRECORD SEPARATOR 1fUNIT SEPARATOR 8dREVERSE LINE FEED 002028LINE SEPARATOR 0023ce ⏎ RETURN SYMBOL 00240a ␊ SYMBOL FOR LINE FEED 00240c ␌ SYMBOL FOR FORM FEED 00240d ␍ SYMBOL FOR CARRIAGE RETURN 00241e ␞ SYMBOL FOR RECORD SEPARATOR 00241f ␟ SYMBOL FOR UNIT SEPARATOR 002424  SYMBOL FOR NEWLINE 002b90RETURN LEFT 002b91RETURN RIGHT 002b92NEWLINE LEFT 002b93NEWLINE RIGHT 003037IDEOGRAPHIC TELEGRAPH LINE FEED SEPARATOR SYMBOL 004dd7HEXAGRAM FOR RETURN Other than that, I am not aware of other default combinations than \n \r\n \r But don't be surprised to see \r\r\n On files written by perl5 on Windows with "\r\n" as $/ (for safety reasons, so people on Windows can read the text too HaHa), as the default ":crlf" layer converts the \n in \r\n into \r\n resulting in a doubled \r -- H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/ using perl5.00307 .. 5.25 porting perl5 on HP-UX, AIX, and openSUSE http://mirrors.develooper.com/hpux/http://www.test-smoke.org/ http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/ pgpT_EzSJycVv.pgp Description: OpenPGP digital signature
Re: serial communication over usb on linux
On Tue, 03 Jan 2017 01:11:06 +0100, Erik Colson <e...@ecocode.net> wrote:
> Elizabeth Mattijsen <l...@dijkmat.nl> writes:
>
> > How about starting with Inline::Perl5 and “use
> > Device::SerialPort:from” ?
>
> I considered that solution, but had some fears.. So I figured I might be
> overlooking other (maybe bether) options ?
>
> About Device::SerialPort
>
> The module uses XS. Is that supported with Inline ?
Yes
> How do I install the module ? Do I just issue cpanm Device::SerialPort ?
I personally use «cpan Device::SerialPart», but yes, that's it
> How do I tell perl6 which perl5 to use ? Is Inline launching a separate
> perl5 with the usual environment settings (PATH, PERL5LIB etc) ?
Here are my (still working) Text::CSV_XS and DBI examples. These
scripts are from April 2015, so the syntax might have been made even
easier by now
--8<--- Text::CSV_XS
#!perl6
use v6;
use Slang::Tuxic;
use Inline::Perl5;
my $p5 = Inline::Perl5.new;
$p5.use ("Text::CSV_PP");
my @rows;
my $csv = $p5.invoke ("Text::CSV_PP", "new")
or die "Cannot use CSV: ", $p5.invoke ("Text::CSV_PP", "error_diag");
$csv.binary (1);
$csv.auto_diag (1);
my Int $sum = 0;
for lines () :eager {
$csv.parse ($_);
$sum += $csv.fields.elems;
}
$sum.say;
-->8---
--8<--- DBI
#!perl6
use v6;
use Slang::Tuxic;
use Inline::Perl5;
my $p5 = Inline::Perl5.new;
$p5.use ("DBI");
my $dbh = $p5.invoke ("DBI", "connect", "dbi:Pg:");
my $sth = $dbh.prepare ("select count (*) from url");
$sth.execute;
$sth.bind_columns (\my $count);
my @count = $sth.fetchrow_array;
@count[0].say;
-->8---
--
H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/
using perl5.00307 .. 5.25 porting perl5 on HP-UX, AIX, and openSUSE
http://mirrors.develooper.com/hpux/http://www.test-smoke.org/
http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/
pgp4wcb1F4gJV.pgp
Description: OpenPGP digital signature
Re: Killer Features of Perl 6
On Sat, 20 Aug 2016 21:14:42 +0100, Tony Edwardson <tony.edward...@gmail.com> wrote: > Hi All > > In a few weeks I will be presenting a talk on a technical meeting for > Milton Keynes Perl Mongers and I have decided to try and sell the > benefits of Perl 6 to a bunch of Perl 5 experts. > I am interested in your opinion on which of the many features of Perl 6 > are the main reasons why anyone would migrate to Perl 6 from Perl 5. > Any opinions greatly appreciated. Constructive (colored) Clear Error Messages! Whatever other killer feature is mentioned, if you fuck up, the error is HELPing you. Really > Tony -- H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/ using perl5.00307 .. 5.25 porting perl5 on HP-UX, AIX, and openSUSE http://mirrors.develooper.com/hpux/http://www.test-smoke.org/ http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/ pgpIJ_5xyYVSx.pgp Description: OpenPGP digital signature
Re: Any way to change rakudobrew's default installation location?
On Wed, 13 Apr 2016 06:30:35 -0500, Tom Browder <tom.brow...@gmail.com> wrote: > Is there any easy way to change the default installation location from > '~/.rakudobrew' to something else, say by changing or defining an > environment variable? I changed it in bin/rakudobrew -my $prefix = catdir($RealBin, updir()); +my $prefix = "/my/path/to/rakudobrew"; -- H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/ using perl5.00307 .. 5.23 porting perl5 on HP-UX, AIX, and openSUSE http://mirrors.develooper.com/hpux/http://www.test-smoke.org/ http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/ pgp3_oq0CyxFx.pgp Description: OpenPGP digital signature
Re: Nice-to-have class methods
On Wed, 27 Jan 2016 14:14:17 +, Philip Hazelden <philip.hazel...@gmail.com> wrote: > For a "convert files to $format" thing, you'd want to replace the > extension. You don't need to specify the previous extension(s) if it's a > quick-and-dirty thing where you know everything passed to it will be > acceptable; and you don't want to, if you're passing out to some other > service which can handle various input formats. (e.g. a wrapper around > ffmpeg or ImageMagick or something - they can handle a lot of filetypes > with a lot of likely extensions.) > > On Wed, Jan 27, 2016 at 1:43 PM Peter Pentchev <r...@ringlet.net> wrote: > > > On Wed, Jan 27, 2016 at 07:00:11AM -0600, Tom Browder wrote: > > > Given so many handy methods for built-in classes, it would be nice to > > have > > > a couple of more for some, for instance: > > > > > > IO:Path.stemname > > > Like basename except any suffix is removed > > > > Hmm, this sounds like a nice idea on a first glance, but then again, > > can you tell me exactly what situations would that be useful for? > > Is it for compressed files (e.g. .zip vs .tar.gz) or MS-DOS/Windows > > executables (.com, .exe, .bat), or something else? > > When I strip filename extensions, I usually know exactly what extensions > > I want to strip - e.g. ".conf" or ".pl" or something like that. There > > are very, very rare cases when any extension should be stripped - and > > there's also a problem with that. tcsh has stackable modifiers % set s=/tmp/bar/foo.a.b.c.d.e.f % echo $s /tmp/bar/foo.a.b.c.d.e.f % echo $s:h /tmp/bar % echo $s:r /tmp/bar/foo.a.b.c.d.e % echo $s:r:r /tmp/bar/foo.a.b.c.d % echo $s:r:r:r /tmp/bar/foo.a.b.c % echo $s:r:r:r:r /tmp/bar/foo.a.b % echo $s:r:r:r:r:r /tmp/bar/foo.a % echo $s:r:r:r:r:r:r /tmp/bar/foo % echo $s:r:r:r:r:r:r:r /tmp/bar/foo % echo $s:r:r:r:r:r:r:r:r /tmp/bar/foo % echo $s:t foo.a.b.c.d.e.f % echo $s:t:t foo.a.b.c.d.e.f % echo $s:t:t:r foo.a.b.c.d.e > > You see, I was kind of surprised many years ago when I first met > > somebody who routinely used a dot as a word separator in filenames - > > a file that I would've called "yearly-report.txt" or "YearlyReport.txt", > > he would call "yearly.report.txt". Over the years after that, I > > stumbled into many other people who do that - not a majority, certainly, > > but, well, many people indeed. > > > > So a function that would remove *any* filename extensions, that is, > > anything after and including the first dot, would produce really weird > > results if applied to filenames created by such people. > > > > G'luck, > > Peter -- H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/ using perl5.00307 .. 5.23 porting perl5 on HP-UX, AIX, and openSUSE http://mirrors.develooper.com/hpux/http://www.test-smoke.org/ http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/ pgphWKohF6PVz.pgp Description: OpenPGP digital signature
Re: CPAN and LWP::UserAgent question?
On Wed, 13 Jan 2016 12:48:47 -0800, ToddAndMargo <toddandma...@zoho.com> wrote: > Hi All, > > I am thinking of starting the transition from Perl 5 to 6. > > The major CPAN modules I use in Perl 5 are: > > use Term::ANSIColor qw ( BOLD BLUE RED GREEN RESET ); > use Term::ReadKey qw ( ReadKey ReadMode ); > use Net::Nslookup qw ( nslookup ); > use LWP::UserAgent; > use LWP::Protocol qw ( https ); > use constant MaxTime1 => 20; # Seconds > > The one I really could not do without is LWP:UserAgent. > > What is the story on CPAN and Perl 6. Just wait a > while for them to catch up? > > Is there a separate Perl6 repository for CPAN? http://modules.perl6.org Maybe this one will do for you: http://modules.perl6.org/#q=LWP > Many thanks, > -T > -- H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/ using perl5.00307 .. 5.23 porting perl5 on HP-UX, AIX, and openSUSE http://mirrors.develooper.com/hpux/http://www.test-smoke.org/ http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/ pgpBTaHqBrgSp.pgp Description: OpenPGP digital signature
Re: Can I use my Perl5 .pm modules in Perl6?
On Wed, 13 Jan 2016 16:31:15 -0800, ToddAndMargo
<toddandma...@zoho.com> wrote:
> On 01/13/2016 12:51 PM, David H. Adler wrote:
> > On Wed, Jan 13, 2016 at 12:50:19PM -0800, ToddAndMargo wrote:
> >> Hi All,
> >>
> >> I have written myself several Perl 5 modules (.pm).
> >> Is there a way to call them from Perl6? Or should I
> >> must I rewrite them?
> >
> > https://doc.perl6.org/language/faq#Can_I_use_Perl_5_modules_from_Perl_6%3F
> >
> > dha
> >
>
> Hi David,
>
> Not to be dense, but will inline::Perl5 also work with
> all those CPAN modules?
>
> Also, does inline::Perl5 get installed natively when I
> install Perl6, or do I need to install it afterwards?
You need to install it afterwards:
$ panda install Inline::Perl5
Most (if not all) perl5 modules will work, but not out of the box.
If you e.g. have an XS module (compiled C code), you might need to do
more changes.
Here's an example of ported DBI code:
--8<---
#!perl6
use v6;
use Inline::Perl5;
my $p5 = Inline::Perl5.new;
$p5.use("Text::CSV_XS");
my @rows;
my $csv = $p5.invoke("Text::CSV_XS", "new")
or die "Cannot use CSV: ", $p5.invoke("Text::CSV_XS", "error_diag");
$csv.binary(1);
$csv.auto_diag(1);
my Int $sum = 0;
for lines() {
$csv.parse($_);
$sum += $csv.fields.elems;
}
$sum.say;
-->8---
> Many thanks,
> -T
>
--
H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/
using perl5.00307 .. 5.23 porting perl5 on HP-UX, AIX, and openSUSE
http://mirrors.develooper.com/hpux/http://www.test-smoke.org/
http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/
pgpaYdxq6ggjB.pgp
Description: OpenPGP digital signature
Re: [perl #123980] * does not allow // in map
On Sat, 29 Aug 2015 04:09:22 -0700, Will Coleda via RT
perl6-bugs-follo...@perl.org wrote:
On Wed Mar 04 00:16:25 2015, hmbrand wrote:
$ perl6 -e '(1,Str,a).map(*)[1].say'
(Str)
$ perl6 -e '(1,Str,a).map(*)[1].perl.say'
Str
$ perl6 -e '(1,Str,a).map(~*)[1].say'
use of uninitialized value of type Str in string context in block
unit at -e:1
$ perl6 -e '(1,Str,a).map(~*)[1].perl.say'
use of uninitialized value of type Str in string context in block
unit at -e:1
$ perl6 -e '(1,Str,a).map({$_//-})[1].say'
-
$ perl6 -e '(1,Str,a).map({$_//-})[1].perl.say'
-
$ perl6 -e '(1,Str,a).map(*//-)[1].say'
(Str)
$ perl6 -e '(1,Str,a).map(*//-)[1].perl.say'
Str
06:47 [Tux] [Coke] in RT#123980, I hoped .map(*//-) to do the same as
.map({*//-})
Actually: .map(*//-) to be the same as .map({$_//-})
sorry if my IRC comment caused confusion
--
H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/
using perl5.00307 .. 5.21 porting perl5 on HP-UX, AIX, and openSUSE
http://mirrors.develooper.com/hpux/http://www.test-smoke.org/
http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/
pgpHB9DXZKr1m.pgp
Description: OpenPGP digital signature
Re: What are Perl 6's killer advantages over Perl 5?
On Wed, 26 Aug 2015 10:26:23 +0200, Moritz Lenz mor...@faui2k3.org wrote: I could continue with other Perl 5 deficiencies (no strict by default, Using strict *STILL* is not enabled by default for perl6 one-liners either: $ perl6 -e'my Int $this = 1; $thıs++; say $this;' 1 $ perl6 -Mstrict -e'my Int $this = 1; $thıs++; say $this;' ===SORRY!=== Error while compiling -e Variable '$thıs' is not declared. Did you mean '$this'? at -e:1 -- my Int $this = 1; ⏏$thıs++; say $this; That, IMHO, is a huge deficiency! lack of easy threading, too many globals, obscure regex syntax), but the individual problems aren't the point. My main point is that large parts of Perl 5 are still stuck in the past, with no good way forward. -- H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/ using perl5.00307 .. 5.21 porting perl5 on HP-UX, AIX, and openSUSE http://mirrors.develooper.com/hpux/http://www.test-smoke.org/ http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/ pgpAZ7AgFClDH.pgp Description: OpenPGP digital signature
Re: What are Perl 6's killer advantages over Perl 5?
On Tue, 11 Aug 2015 21:41:21 -0400, David H. Adler d...@pobox.com wrote: The reason for my request is to help with a better introduction in my modest draft tutorial on converting Perl 5 to Perl 6 code at the Perl Monastery. I am comfortable with the example code I use there (which is not currently intended to showcase new features), but I am getting several comments on why one should even bother with Perl 6? In talking to Perl 5 people about my Perl 5 to Perl 6 docuentation, trying to get some feedback on it from people who aren't already doing Perl 6, I get this question a lot. So, yes, some kind of document saying these are reasons Perl 6 is actually useful would be very helpful. dha *THE* killer feature that will be seen by all beginning perl6 programmers is its awesome error messages. It is a shame that -e runs no-strict, but as I understand it, that is still under discussion. $ perl6 -e'use v6; my Int $this = 1; $thıs++; say $this;' ===SORRY!=== Error while compiling -e Variable '$thıs' is not declared. Did you mean '$this'? at -e:1 -- use v6; my Int $this = 1; ⏏$thıs++; say $this; -- H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/ using perl5.00307 .. 5.21 porting perl5 on HP-UX, AIX, and openSUSE http://mirrors.develooper.com/hpux/http://www.test-smoke.org/ http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/ pgpbHSsqyiUAy.pgp Description: OpenPGP digital signature
Regex vs Grammar
Liz told me to post here
In my work to post Text::CSV_XS from perl5 to perl6, am am close to
feature complete now, but the performance is not what I hoped for:
seconds to parse 1 lines of CSV
perl5
Text::CSV::Easy_XS 0.016
Text::CSV::Easy_PP 0.017
Text::CSV_XS w/ bindc 0.034
Text::CSV_XS 0.039
Text::CSV_PP 0.525
Pegex::CSV 1.340
perl6
csv.pl 7.270 state machine
csv-ip5xs 17.267 Inline::Perl5 with Text::CSV_XS
csv-ip5xsio 17.243 Inline::Perl5 with Text::CSV_XS w/ IO
csv-ip5pp 18.218 Inline::Perl5 with Text::CSV_PP
csv_gram.pl 14.226 A Grammar-based parser
test.pl 44.541 A reference parser (when I started)
test-t.pl 39.887 Current parser, all options implemented
csv-parser.pl 25.712 Tony-o's parser
So, currently for this kid of work, perl6 is between 2780 and 5.2 times
slower than perl5 (worst vs best / best vs worst)
As Text::CSV is allowing all setting to be changed between any call,
a static grammar engine is out of the question. As I started working
alongside someone else, we decided that I would explore the regular
expression approach and he would explore that grammar approach. The
latter never really happened :(
Currently, the regular expression is causing the parse line to be
returned as chunks of interest, where I take advantage of the first in
alternative is most important so having a quotation sequence that is
equal to part of eon-of-line sequence is still valid.
my sub chunks (Str $str, Regex:D $re) {
$str.defined or return ();
$str eqand return ();
$str.split ($re, :all).flat.map: {
if $_ ~~ Str {
$_ if .chars;
}
else {
.Str if .Bool;
};
};
}
and then later
my Regex $chx = $!eol.defined
?? rx{ $eol | $sep | $quo | $esc }
!! rx{ \r\n | \r | \n | $sep | $quo | $esc };
$buffer.defined and @ch.push: chunks ($buffer, $chx);
@ch or return parse_error (2012);
as it stands, the chunks function could be reconstructed into using a
grammar that only changes whenever any of $eol, $sep, $quo, or $esc
would change. None of the other options - in the current program flow -
would be of influence on the parser, as long as chunks would return the
same list of tokens
Is it worth while to try to reconstruct chunks to use a dynamic grammar
or do I wait for the regex engine to become faster.
As a side note: currently none of these four parts are allowed to be a
regular expression. If I stick to regular expressions, that could be an
option for future enhancements. All four are to be considered fixed
strings, where an undefined $eol means either \r\n, or \n, or \r
Code is available in the perl6 ecosystem http://modules.perl6.org/
GIT repo is at https://github.com/Tux/CSV
Documentation is https://github.com/Tux/CSV/blob/master/Text-CSV.pod
The csv *function* is still work in progress.
The style used is not a point of discussion.
--
H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/
using perl5.00307 .. 5.21 porting perl5 on HP-UX, AIX, and openSUSE
http://mirrors.develooper.com/hpux/http://www.test-smoke.org/
http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/
pgplR7UTSYSYb.pgp
Description: OpenPGP digital signature
Re: [perl #124082] Conflicting Range values cannot be used
On Thu, 19 Mar 2015 12:02:36 -0700, Carl Mäsak via RT perl6-bugs-follo...@perl.org wrote: I see two things in this ticket. Correct me if I'm wrong. $ p6 -e'Num.Range.say' No such method 'Range' for invocant of type 'Num' in block unit at -e:1 First thing: Num doesn't have a Range coercer. $ p6 -e'my Int $i = Int.Range.max; $i.say' Type check failed in assignment to '$i'; expected 'Int' but got 'Num' in block unit at -e:1 Second thing: can't put Inf in Int, In which case Int.Range.max should not return Inf IMHO. Maybe it should return int8.Range.max instead. If you cannot put Int.Range.max in Int, that is extremely counter-inutitive which is a dupe of https://rt.perl.org/Ticket/Display.html?id=61602, which is currently blocking on https://github.com/perl6/specs/issues/27 but the last word on which is http://irclog.perlgeek.de/perl6/2014-08-20#i_9217322, IMO. That, at the moment, is beyond my current level of understanding the core :) So, mind if I change the name of this ticket to Num doesn't have a Range coercer? :) Is ok. -- H.Merijn Brand http://tux.nl Perl Monger http://amsterdam.pm.org/ using perl5.00307 .. 5.21 porting perl5 on HP-UX, AIX, and openSUSE http://mirrors.develooper.com/hpux/http://www.test-smoke.org/ http://qa.perl.org http://www.goldmark.org/jeff/stupid-disclaimers/ pgphwVx3E7x4Z.pgp Description: OpenPGP digital signature
Re: [PATCH] Avoid //-style comments.
On Thu, 22 Mar 2007 08:59:05 -0400 (EDT), Andy Dougherty
[EMAIL PROTECTED] wrote:
Please avoid //-style comments. Older compilers don't understand
them.
Not only 'older' compilers, also 'stricter' compilers.
One of my pet-peeves. Sorry. // comments are bad style.
my $a = 1 // This is comment :);
Also, and more importantly, this section of code has several commented out
lines, but no comments explaining why those lines are commented out. It
makes it more difficult to understand.
--- parrot-current/lib/Parrot/Pmc2c/PMETHODs.pm 2007-03-17
19:15:14.0 -0400
+++ parrot-andy/lib/Parrot/Pmc2c/PMETHODs.pm 2007-03-21 11:56:34.73000
-0400
@@ -439,7 +439,7 @@
/* if (PMC_cont(ccont)-address) { */
{
-//parrot_context_t * const caller_ctx = PMC_cont(ccont)-to_ctx;
+/* parrot_context_t * const caller_ctx = PMC_cont(ccont)-to_ctx; */
if (! caller_ctx) {
/* there is no point calling real_exception here, because
PDB_backtrace can't deal with a missing to_ctx either. */
--
H.Merijn Brand Amsterdam Perl Mongers (http://amsterdam.pm.org/)
using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11,
11.23, SuSE 10.0 10.2, AIX 4.3 5.2, and Cygwin. http://qa.perl.org
http://mirrors.develooper.com/hpux/http://www.test-smoke.org
http://www.goldmark.org/jeff/stupid-disclaimers/
Re: Time for a Revolution
On Fri, 14 Jul 2006 01:25:51 +0200, A. Pagaltzis [EMAIL PROTECTED] wrote: * chromatic [EMAIL PROTECTED] [2006-07-14 00:55]: Sure, but it's only one thing people need to remember. One thing is easier than N things, especially as N changes every time the core changes. Yes, I agree. Don’t get me wrong, I’m not saying Bundle::PerlPlus is a bad idea (though in adding a grain to the sandpile it *can* have a detrimental effect). I’m just saying that I don’t see how it will achieve the purpose for which you proposed it. Sure would be handy, but will hardly single-handedly rejuvenate Perl. I've been talking with someone who has to learn perl over and over again, because this poor person forgets the details because perl is not used on a daily basis. If I got it right, the wish that was expressed is more like the wish for an installer with a GUI. Let's assume YaST2 or so. The interface should be able to show package groups (Graphic, Development, Databases, Network, Math, ...) and squares to tick: I want this module installed. The install program should then automatically tick all the modules it needs to make the install happen. At this point the user should not want to know if it is *possible* that this module *can* be installed at all (at least that is what that user told me). e.g. DBD-Pg needs DBI, but there is no Postgres installed. I for one would shed no tear if CGI would be removed from the CORE, and I will bet that most of you would cheer if all formatting related stuff would be removed from the CORE, which I use heavily on a daily basis. We have to realize that one person's PerlPlus necessities are not the same as someone else's. We - as seasoned perl users/programmers - quite often assume too much, and think too technical in ways of things to be possible or not. That is not how our target audience perceives it. I hope I have expressed the conclusion of that chat correctly. But it *does* make sense to me. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: Time for a Revolution
On Thu, 13 Jul 2006 23:52:02 -0700, chromatic [EMAIL PROTECTED] wrote: On Thursday 13 July 2006 23:37, H.Merijn Brand wrote: If I got it right, the wish that was expressed is more like the wish for an installer with a GUI. Nope, just for a nice, easily-installable bundle of modules that work around the unpleasant backwards compatibilities and warts of Perl 5. I was talking about the wish of the person I talked to. Not your wish :) But your exposition makes some things quite clear. For example, I use SUPER a lot because it's completely silly that the method redispatcher works based on the stash of the subroutine, set to its compile time package, not on the current class and method name. I'm warming up to Class::MOP because I'm tired of fiddling with package variables and symbolic references to deal with @ISA. It would include a profiler that actually works, unlike Devel::DProf which, as far as I can tell, is a Perl module to segfault. It would include File::Find::Rule because it has an interface less prone to face-stabbing than File::Find, which is only in the core because it's been in the core forever, not because its interface is nice (it isn't) or the code is nice (it really isn't). It would include Class::Std or Object::InsideOut or one of those because it's about time Perl encouraged people to write classes that make sense. It would include documentation about which modules I chose and why and when to use them. That's what I want -- the useful modules that aren't in the core that do things that should have been in the language for the start but weren't. In other words, it's the modules I use all the time to be productive. For *you* to be productive. For *me*, I would see all that as bloat. I *hate* OO programming. Not only in Perl. It is that DBI and Tk have no alternatives, so I have to do some OO, but it still does not feel like the FUN I get out of the other corners of the many perl features Novices shouldn't have to spent eight years learning the language and the good modules the way I did to be productive. What makes someone productive? They want to get the job done. If they only convert CVS to MS-Excel or vise-versa, they will never ever need all the things you mention. If they want to set up a simple web page with MySQL and DBI, they don't need it either. I cheer your plan. Really I do, but then there should be targetted bundles. Not 'Plus' or 'Extra'. What is Plus for one is Minus or Bloat for others. Look at the list of modules I include in my perl distributions for HP-UX at http://mirrors.develooper.com/hpux/#Perl and you might get an idea of what I think are useful modules that my work more effective. Not quite like yours is it? -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: Time for a Revolution
On Fri, 14 Jul 2006 07:45:55 -0400, Clayton O'Neill [EMAIL PROTECTED] wrote: Why off-list? this is a good reaction. On 7/14/06, H.Merijn Brand [EMAIL PROTECTED] wrote: Look at the list of modules I include in my perl distributions for HP-UX at http://mirrors.develooper.com/hpux/#Perl and you might get an idea of what I think are useful modules that my work more effective. Not quite like yours is it? I think a core difference between your list and Chromatic's is that yours would be part of the standard library in a lot of languages, whereas Chromatic seems to be aiming more for things that would be part of the language. Not to disparage your list, but I think his is oriented more towards higher level abstractions, whereas yours is more task oriented. Probably correct. Because of that, I don't really see the dichotomy as strongly as you. I think you can argue over which inside out object module to use, but that's a different sort of argument than whether or not XPath or SOAP support should be included in core, or some PerlPlus bundle. At least it seems that way to me. IMHO none of those should be included in the core at all. It should be made easier to *add* them after the core is installed. Either by a website or a GUI or whatever. Select the box OO programming choose functionality, tick all that apply, and hit [Install]. If that script/site calls 'curl ...' or 'perl -MCPAN ...' or frobnicator2 ...' is not of any interrest to me at this point. If I'm not mistaken, there has been a lot of effort to enable inside-out objects in perl-5.9 from the core side of view. So it is being appreciated that people want it. Not that I am likely to ever use it, but that is not being discussed here. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: fetching module version from the command line
On Thu, 13 Jul 2006 14:29:38 +0300, Gabor Szabo [EMAIL PROTECTED] wrote: On 7/13/06, Fergal Daly [EMAIL PROTECTED] wrote: I could change it so that it tries to figure out whether it's being used for real or not and disable the END block code but that's stress and hassle. As a module author, as far as I'm concerned, if MakeMaker can figure out my version then my job is done, So the only thing that would be correct is to search @INC for the .pm file and then grep it with the same regex MakeMaker uses. Which is essentially waht bot V and MakeMaker do -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: fetching module version from the command line
On Wed, 12 Jul 2006 13:41:16 +0300, Gabor Szabo [EMAIL PROTECTED] wrote: While checking if the versions of all the modules are as required in our installation I am using the following one liner to fetch the version numbers. perl -MModule -e'print $Module::VERSION' Not really reliable :) But the more reliable ways take some post-processing pc09:/home/merijn 108 perl -le'require V;print V::get_version(DBI)' 1.51 pc09:/home/merijn 109 perl -MExtUtils::Installed -le'print ExtUtils::Installed-new-version(DBI)' 1.51 pc09:/home/merijn 110 perl -MV=DBI DBI /pro/lib/perl5/site_perl/5.8.7/i686-linux-64int/DBI.pm: 1.51 pc09:/home/merijn 111 perl -le'require V;print V::get_version(DBI)' 1.51 pc09:/home/merijn 112 perl -MDBI=99 DBI version 99 required--this is only version 1.51 at /pro/lib/perl5/5.8.7/Exporter/Heavy.pm line 121. BEGIN failed--compilation aborted. Exit 9 pc09:/home/merijn 113 V is not (yet) on CPAN: http://www.test-smoke.org/otherperl.html Some of the modules print extra error messages and some print only error messages. I have sent e-mail to the respective module authors reporting this issue but I wonder if it would this a good practice in the genric case. Is there a Test module that test just the above? Is the a CPANST score one can get if all the modules in a distro provide the correct version information and if they don't print anything else to STDOUT or STDERR. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: fetching module version from the command line
On 12 Jul 2006 11:52:07 -, Rafael Garcia-Suarez [EMAIL PROTECTED] wrote: Gabor Szabo wrote in perl.qa : While checking if the versions of all the modules are as required in our installation I am using the following one liner to fetch the version numbers. perl -MModule -e'print $Module::VERSION' You should probably use -mModule to avoid calling Module::import(). (also, in some pathological cases, one can imagine that UNIVERSAL::VERSION() has been overidden) Side note: Abe Timmerman has a module, V, useful to get versions of installed modules: http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2006-03/msg01038.html I never use -m. I should :) # perl -mV -le'print V::get_version(DBI)' 1.51 -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: CPANTS is not a game.
On Tue, 23 May 2006 09:35:27 -0500, Chris Dolan [EMAIL PROTECTED] wrote: On May 23, 2006, at 8:39 AM, David Golden wrote: How does is_prereq improve quality? Or, put differently, how does measuring something that an author can't control create an incentive to improve? is_prereq is usually a proxy metric for software maturity: if someone thinks your module is good enough that he would rather depend on it than reinvent it, then it's probably a better-than-average module on CPAN. Very true for base modules like Getopt::Long, Test::More, or DBI They are built to be used as basic blocks. DBI on itself is quite useless. It only shows it's value combined with a DBD. The DBD itself however is more unlikely to be required, as it is an end-block. That does not inhibit other authors to extend on it (see DBD::Pg), but the functionality on itself quite often is enough to not invite people to make it a requirement for a new module (see DBD::mysql). These modules however are mature enough to compete. is_prereq is usually a vote of confidence, I respectfully disagree completely. It's been more than once that I did *not* install a module because it required a module that I did not trust, either because of (the programming style of) the author of that module, or because that module required yet another zillion things I do not want installed (think YAML). so it is likely a good proxy for quality. In fact I believe that because the author (usually) can't control it directly, is_prereq is one of the best proxies for quality among the current kwalitee metrics. I'd say: drop it. It's a worthless metric. CPANTS by itself does nothing to improve quality. However, by drawing attention to kwalitee metrics, I argue that CPANTS draws attention to quality too. Even if many authors don't understand that, the ones that do makes CPANTS worthwhile. If making it a game helps to further raise awareness, then I think that should be tolerated until CPANTS matures. Hurray! Yes, I used it to go over all my modules again, and use Covarage and pod testing because of CPANTS. That indeed increased the qualitee of my modules IMHO, the best way to improve CPANTS and move away from the game mentality is to continually add more tests. Each added test diminishes the weight of previous tests. This will annoy the gamers because their modules keep dropping in kwalitee, while those that genuinely care about quality will appreciate the additional measurements. If some gamers get annoyed enough to quit the game, that's not a big deal because they didn't really understand the point of CPANTS anyway. If some keep playing the game by cleaving to the standards the community sets for them, then all the better for the rest of us. Tests should make sense. I still think there should be a test for copyright notices, and TODO lists. As an example, consider pod_coverage. It's a rather annoying metric, most of us agree. Test::Pod::Coverage really only needs to be run on the author's machine, not on every user's machine. However, by adding pod_coverage to kwalitee we got LOTS of authors to improve their POD with the cost of wasting cycles on users' machines. Yep. Here too. I think that's a price worth paying -- at least until we rewrite the metric to actually test POD coverage (which is a decent proxy for POD quality) instead of just checking for the presence of a t/ pod_coverage.t file (which is a weak proxy for POD quality, but dramatically easier to measure). -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: Test me please: P/PE/PETDANCE/Test-Harness-2.57_06.tar.gz
On Sun, 23 Apr 2006 12:07:18 +0100, Adrian Howard [EMAIL PROTECTED] wrote: On 23 Apr 2006, at 07:02, Andy Lester wrote: [snip] I've removed the meaningless percentages of tests that have failed. If you rely on the output at the end, it's different now. [snip] I'll just repeat what I left on Andy's blog here in case anybody agrees with me. I don't like the change myself. I'm bright enough to figure out that anything less than 100% pass is bad when developing. When using other peoples test suites seeing, for example, 99% ok tells me something very different from seeing 3% ok. For me the difference between nearly there apart form this bit of functionality that I don't care about and completely f**ked is useful. Yes I can figure it out from the test/pass numbers - but the percentage gives me a handy overview. Math is hard! :-) Not something I feel /that/ strongly about - but I don't see the utility of the change myself (beyond code simplification in T::H). (probably just me :-) I did not follow the rest of the conversation, but I strongly agree to the above statement. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: Module requirements (was: Module::Build and installing in non-standardlocations)
On Tue, 4 Apr 2006 19:27:57 -0400, Ricardo SIGNES [EMAIL PROTECTED] wrote: * H.Merijn Brand [EMAIL PROTECTED] [2006-04-04T10:40:39] And then still people make more of the same. Take Getopt::Long. A perfect and very functional module. Full of features, matured, and actively maintained. Now go look at CPAN, and see how many people either do not like it or find other reasons to write their own. The problems arise when authors of big modules start prefering non-core versions of good core modules. IMHO something like that should give you a (very) negative score on CPANTS. Could you elaborate on this? As stated, it seems pretty ludicrous to me. It reads like this: You should not use module B that is like module A, if A is in the core distribution. This is true regardless of the fact that B may be better optimized for your current needs, planned needs, programming style. I'll just mention two things, both very different A. CORE modules are tested on all supported architectures, while CPAN modules do not give that guarantee. The smoke system still causes all possible combinations to be tested on various architectures in various configurations. I don't say that CPAN module authors didn't test their module on as many architectures as available to the author, but even if the author has, say, 4 architectures, it is very unlikely that all of these architectures have 32bit and 64bit builds, threaded and non-threaded builds and even multiple versions of perl available. B. Let's just name YAML. Up until 0.38 it was not to difficult to install a module that is very useful, but now in 0.58, it uses a different test suite, that needs Spiffy, that needs .. For me that was the drop. No more YAML. If just for the test suite of a module I have to install half of CPAN and I'm not going to use that for anything else, while there is a perfectly good and widely used and actively maintained Test::More available, this is just plain insane. My opinion only. This can be further distilled to: There's more than one way to do it, but most of them will get you dirty looks. Maybe, but authors might need to keep above statements in mind when adding new dependencies. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: Module requirements (was: Module::Build and installing in non-standardlocations)
On Wed, 5 Apr 2006 14:20:15 +0100, Nicholas Clark [EMAIL PROTECTED] wrote: On Tue, Apr 04, 2006 at 11:27:07AM +0200, Sébastien Aperghis-Tramoni wrote: I don't think that the problem of core is too big is a matter of disk size, but more a matter of number of modules. P5Porters time is a scarce ressource, and they already lack the time to do all the work they'd like to do just on the interpreter. Making core modules dual-life is a way to handle these to someone else who has spare time and who doesn't need to have deep XS or Perl guts knowledge. At least I think that's the reason, otherwise why was I accepted as the maintainer of two such modules (XSLoader and Sys::Syslog)? Well, I think it's that reason too. :-) Yes, to me, size is maintainance liability, not disk space or bandwidth. Putting things in core is a pain. Keeping them there is a pain. I remember the fun of getting Storable sufficiently portable that it could go into the core. Trying to work around strange issues thrown up by certain AIX compilers in certain configurations... Which reminds me ... Will the new volunteer to maintain README.aix please stand up? It's almost no time involved, but fun in working with AIX is a pre, which rules the current maintainer (me) out. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: Module requirements (was: Module::Build and installing in non-standardlocations)
On Wed, 5 Apr 2006 18:30:33 +0200, Tels [EMAIL PROTECTED] wrote: Moin, On Wednesday 05 April 2006 06:57, Adam Kennedy wrote: chromatic wrote: On Tuesday 04 April 2006 10:32, Tels wrote: There is also the point that supporting ancient Perls means you can't use all the new, wonderfull features that were added to later versions of Perl, like our, warnings etc. This to me is the biggest problem. After 6 years, is it finally okay for me to use such exotic features as lexical warnings and lexical filehandles, just to satisfy someone who refuses to upgrade an eight year old installation of Perl? [snip] I'm trying to figure out why I've been sending patches to p5p for about five years now if people complain when I take advantage of the bugs they fix. At some point, it would be nice if people were to use software released this millennium. Ever written software for government? Yes. And I don't know which parts of the mystical government you speak off, but people everywhere are pretty pissed of when they have to work with 10 year old software. We *only* have local government as customers, and they get *my* perl, installed in *our* tree. Of course my perl includes defined-or :) Hell, there are problems getting hardware that still runs that old stuff. :) One customer ran production on a system so old that they didn't dare to reboot it, because they were affraid it was not going to boot again. OK, that was 6 years ago, but still, government is a strange customer. It's routine to be required to offer a 10 year support period. Yes, but that does not mean that you need to upgrade the installation with the-latest-foo-bar-from-cpan-which-just-breaks-on-5.004. You just keep the system as it is and patch when breakage really occurs. :) I don't care if their default perl breaks down. That would be their fault. As long as they don't break mine. Perl has the advantage of not being tied to this product *must* be installed in /usr (and yes, we *do* have a third party that still sets that requirement for their product), symlinks to the rescue. This comes up more often that you might think. And so as my gold standard for back-compatability, I use 10 years. A decade is a nice round number. Ugh - but at least we don't have 16 fingers :) 5.8.3 is the minimum to accept for me, and it should have defined-or If it's something that isn't very core'y, I use a secondary support period of 5 years. Seeing as the worst support cases are about 10 years in a variety of countries and situations, I think that is what we should be aiming for for highly used CPAN modules. Which last time I checked is now 5.005.something So I aim there. I wont :) me neither best wishes, -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: Module requirements (was: Module::Build and installing in non-standardlocations)
to get new stuff into core. Let the early adopters try out non-CPAN low-level modules. Then after a while, see what floats to the top. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: Proposed kwalitee metric: installer_not_executable
On Sat, 18 Mar 2006 11:31:05 +0100, demerphq [EMAIL PROTECTED] wrote: On 3/18/06, Tels [EMAIL PROTECTED] wrote: Moin, On Saturday 18 March 2006 08:12, Adam Kennedy wrote: From my understanding, one of the little idiosyncrasies of Makefile.PL/Build.PL installers (including MI variants of both) is that in order to make sure that the Makefile and Build use the correct perl installation, you should always be explicitly running M/B.PL with the perl you want to install the module with, and NOT necesarily with the default perl. This is why installation instructions read perl Makefile.PL make make test make install and not ./Makefile.PL make make test make install For what a tiny fraction of users is there a distinction between these two? And how many users read the insturctions at all, and if, do get the subtle difference or just use ./Makefile.PL anyway? Many users have multiple perl installs on their machines. Especially on certain architectures where the manufacturer bundles an old perl on the box. For instance on many of the HPUX boxes i have to use there is perl4, perl5.6 and perl 5.8, and im always having to explain to people about finding the right perl before they start CPAN or whatever. My thoughts exactly. The avarage number of perl versions installed on a HP-UX machine anywhere in the world is likely to be close to 1.8 For *my* machines it would be closer to 4.5 - perl4 /usr/contrib/bin - perl5.8 /pro/bin (built with HP C-ANSI-C) - perl5.? /usr/local/bin (?) - perl5.8 /opt/perl/bin (built with 32bit GNU gcc) - perl5.8 /opt/perl64/bin (built with 64bit GNU gcc) - perl5.9 /pro/3gl/CPAN/perl-current (devel smokes) - perl5.8 /pro/3gl/CPAN/perl-5.8.x-dor (maint smokes) some systems might have more. HP-UX 10.20 doesn't have the 64bit versions. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: New kwalitee metric - eg/ directory
On Tue, 14 Mar 2006 16:52:18 +0100, David Landgren [EMAIL PROTECTED] wrote: Hey! It's been over two months since we last had one of these suggestions! I did battle with a module that shall remain nameless the other day. I had a difficult time figuring out how to use it. In times like these, I like being about to go to the build directory and p(aw|ore) through the eg/ directory and take a script and bend it into a suitable shape. or /examples or /scripts Depending on the type of module, some can supply you with complete working scripts (Tk, Spreadsheet::Read, XML::Twig), and some can't (DBI). Tk installs widget for you, in wich you can find most of the basic operations, whereas DBI has superb documentation that has examples and example code scattered all through it. So I don't think the mere existance of /eg (and some content) is worth more qualitee. The package in question didn't have an eg/ directory, so I had to spend far more time studying the source and running it through the debugger than I really cared to. For instance, I know that when I have something tricky to do with HTML::Parser, I know there's always going to be something close to what I need to do in the eg/ directory. I think its a good adjunct to POD, which tends to be more (or should be) more theoretical. /eg scripts are a nice hands-on way of finding out how a module works in real life. No distribution should be without one! /me mumbles Acme -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using porting perl 5.6.2, 5.8.x, 5.9.x on HP-UX 10.20, 11.00, 11.11, 11.23, SuSE 10.0, AIX 4.3 5.2, and Cygwin. http://qa.perl.org http://mirrors.develooper.com/hpux/ http://www.test-smoke.org http://www.goldmark.org/jeff/stupid-disclaimers/
Re: [PATCH] HP-UX shared libparrot support
On Fri, 6 Jan 2006 11:02:17 +, Nick Glencross [EMAIL PROTECTED] wrote: This patch adds the necessary hints for HP-UX to build using shared libraries by default. I only have access to gcc on HP-UX, but the necessary compiler flags for the HP commericial compiler are there too. FYI: perl5 (and probably a lot more) does not support the combo gcc + GNU ld in 32bit bode, and prefers GNU ld with gcc in 64bit mode. This is due to issues in binutils, and cannot be blamed on either HP ld or gcc -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using Perl 5.6.2, 5.8.0, 5.8.5, 5.9.2 on HP-UX 10.20, 11.00 11.11, AIX 4.3 5.2, SuSE 9.2 9.3, and Cygwin. http://www.cmve.net/~merijn Smoking perl: http://www.test-smoke.org,perl QA: http://qa.perl.org reports to: [EMAIL PROTECTED],perl-qa@perl.org
Re: Proposed Kwalitee tests: has_license and/or has_meta_yml_license
On Wed, 02 Nov 2005 17:19:07 +0100, David Landgren [EMAIL PROTECTED] wrote: Chris Dolan wrote: In the last year as a Fink maintainer (Mac OS X debian-like package manager), I've come across a couple CPAN modules that have no license information at all. It's very frustrating. I've submitted RT bugs, but one of them has been fixed (thanks Ken Williams). To encourage authors to correct this oversight, I propose a new pair of Kwalitee tests. Both would be nice, but if either of them were implemented, I'd be thrilled. I'd prefer that someone else implement the test (lack of tuits), but if there is approval for the idea without a motivated implementer I will take a hack at it. 1) has_license -- check for the presence of a file named something like LICENSE or COPYING or COPYLEFT or GPL or ... (each test case insensitive, with or without .txt extensions). Alternatively, the test can be more liberal by looking for the string copyright in README, *pm and *.pod. 2) has_meta_yml_license -- check for a META.yml field named license. Module::Build supports this. That would suck, you may as well propose a Kwalitee bit for modules that use Module::Build. You surely mean *not* using Module::Build using M::B inflicts a huge compatibility problem on using the module on older perls Now for my real opinion, I think a module shall not be judged/qualiteed on the used build system. I know that the current alpha of ExtUtils::MakeMaker supports this, but until it is released as stable *and* module authors have the time to upgrade EU::MM *and* release a new version of their module(s), those authors will be penalised through no fault of their own. David These tests should not care which license is claimed, just that there is a license present. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using Perl 5.6.2, 5.8.0, 5.8.5, 5.9.2 on HP-UX 10.20, 11.00 11.11, AIX 4.3 5.2, SuSE 9.2 9.3, and Cygwin. http://www.cmve.net/~merijn Smoking perl: http://www.test-smoke.org,perl QA: http://qa.perl.org reports to: [EMAIL PROTECTED],perl-qa@perl.org
Re: Perl 6 fears
On Mon, 24 Oct 2005 11:49:51 -0400, Joshua Gatcomb [EMAIL PROTECTED] wrote: On 10/24/05, Juerd [EMAIL PROTECTED] wrote: Feel free to add your own, or fears you heard about! FEAR: Perl6 internals will be just as inaccessable as p5 paradox. Many people don't find perl5 inaccessible at all FEAR: The Perl6 process is driving away too many good developers From what? FEAR: Perl6 will not be as portable as p5 I will subscribe to that fear, but only for now. FEAR: Perl6 will not be able to fix the stigma of just a scripting language or line noise perl5 has never been just a scripting language FEAR: Perl6 is un-necessary and the time, money, and resources is impacting p5. very untrue. And this does not sound like a FEAR, but more like an opinion FEAR: There is too much misinformation surrounding Perl6 for people to feel comfortable. This last fear is likely the reason why you are collecting this list. I think the biggest problem is accessability and visibility for the casual observer. Unless you are devoted to the list and the IRC channels and the conferences your perception of what is and isn't Perl6 is out of date. We don't have a single source where people can go for relatively up to the minute facts concerning the project. Juerd My only current fear is that I won't live long enough to be able to use and understand the full richness of what perl6 is going to offer me. (Oh, and that perl6 will never be able to upgrade my scripts that use 'format', but I'm aware of the plan to make that `obsolete' as in: the perl526 translator will dump core on those) -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using Perl 5.6.2, 5.8.0, 5.8.5, 5.9.2 on HP-UX 10.20, 11.00 11.11, AIX 4.3 5.2, SuSE 9.2 9.3, and Cygwin. http://www.cmve.net/~merijn Smoking perl: http://www.test-smoke.org,perl QA: http://qa.perl.org reports to: [EMAIL PROTECTED],perl-qa@perl.org
Re: CPANTS: has_license ?
On Mon, 19 Sep 2005 11:33:07 +0200, David Landgren [EMAIL PROTECTED] wrote: Gábor Szabó wrote: What do you think about adding a has_license kwalitee to CPANTS ? Checking if the META.yml has that entry ? This will penalise all the modules that use ExtUtils::MakeMaker, which, last time I looked, does not generate the license metadata, even though the module may clearly state the license used in the documentation. Modules that use(d) EU::MM will/should have a /^=head\d\s+(li[cs]en[cs]e|copyrights?)\b/i section in /^(readme|license)(\.txt)?$/i and/or This::Module.pm =head1 COPYRIGHT AND LICENSE In above pattern I allowed swapping the c and s because I've seen that too often to ignore. Probably by non-native English speakers I made a half-hearted attempt at patching EU::MM to provide a LICENSE key to WriteMakefile but then Real Life intervened. It did help me get an appreciation of what a thankless job the maintenance of EU::MM is, though. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using Perl 5.6.2, 5.8.0, 5.8.5, 5.9.2 on HP-UX 10.20, 11.00 11.11, AIX 4.3 5.2, SuSE 9.2 9.3, and Cygwin. http://www.cmve.net/~merijn Smoking perl: http://www.test-smoke.org,perl QA: http://qa.perl.org reports to: [EMAIL PROTECTED],perl-qa@perl.org
Re: New kwalitee test, has_changes
On Thu, 15 Sep 2005 11:52:00 +1000, Adam Kennedy [EMAIL PROTECTED] wrote:
Rather than do any additional exploding, I'd like to propose the
additional kwalitee test has_changes. I've noticed that a percentage
(5-10%) of dists don't have a changes file, so it can be hard to know
grep { m/^chang(es?|log)|history$/i -s $_ }, * */* ; # Like that ?
whether it's worth upgrading, or more importantly which version to add
dependencies for.
--
H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/)
using Perl 5.6.2, 5.8.0, 5.8.5, 5.9.2 on HP-UX 10.20, 11.00 11.11,
AIX 4.3 5.2, SuSE 9.2 9.3, and Cygwin. http://www.cmve.net/~merijn
Smoking perl: http://www.test-smoke.org,perl QA: http://qa.perl.org
reports to: [EMAIL PROTECTED],perl-qa@perl.org
Re: Whitespace (Was: [RELEASE] Pugs 6.2.9 released!)
On Thu, 4 Aug 2005 20:21:18 +0800, Autrijus Tang [EMAIL PROTECTED]
wrote:
On Thu, Aug 04, 2005 at 10:55:12AM +0400, Andrew Shitov wrote:
why do we have to give up a space when calling functions under Pugs?
A need to type open('file.txt') instead of open ('file.txt') makes
me perplexing (not perl-flexing ;-) Our recent discussions in 'zip with()'
gave no answer.
This is so:
print (1+2)*3;
can print 9, instead of 3.
Just out of curiousity, what would
print (1 + 2) * 3;
print?
FWIW I would *expect* print (1+2)*3; to print '3'
However, all three forms below should still work:
open('file.txt');
open ('file.txt');
open 'file.txt';
Thanks,
/Autrijus/
--
H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/)
using Perl 5.6.2, 5.8.0, 5.8.5, 5.9.2 on HP-UX 10.20, 11.00 11.11,
AIX 4.3 5.2, SuSE 9.2 9.3, and Cygwin. http://www.cmve.net/~merijn
Smoking perl: http://www.test-smoke.org,perl QA: http://qa.perl.org
reports to: [EMAIL PROTECTED],perl-qa@perl.org
Re: Need to talk to an EU patent attorney
On Tue, 12 Jul 2005 14:00:51 -0700, Michael G Schwern [EMAIL PROTECTED] wrote: Barbie's journal, via Ovid, made me aware of patent EP1170667 Software Package Verification granted last month in the EU. http://gauss.ffii.org/PatentView/EP1170667 Contact Steffen Beyer mailto:[EMAIL PROTECTED] http://www.engelschall.com/u/sb/download/ He *works* at the european patent bureau It appears to patent basic software testing frameworks. There is a nine month window to oppose this patent. I believe Test::Harness constitutes prior art but IANAL. I would like to speak with a lawyer. Does anyone happen to know an EU patent attorney who is willing to do a little pro bono work? At this point I only want an educated reading of the patent to determine if Test::Harness may be prior art. I've contacted the EFF's staff attorney about this but he's not familiar with EU patent laws and recommended I find someone who is. I've also attempted to contact the Inventors listed on the patent (valid email addresses are difficult to find these days) in the hopes of discussing this programmer-to-programmer and cut through the legal BS. Haven't heard back yet. Here is my figuring on how Test::Harness is prior art: It includes the control (Test::Harness), framework (Test.pm, Test::More, etc..) and modules (*.t files) as outlined in claim 1. It can handle many test files (claim 2). It has the ability to order the execution of test files based on the filename which serves as a priority (claims 3 and 4). It has means to indicate if a given module is active or inactive (claim 5, 6 and 7) by the module issuing a skip flag. http://search.cpan.org/dist/Test-Harness/lib/Test/Harness/TAP.pod#Skipping_tests Test modules are typically stored as individual files, usually ending in .t, in a directory, usually t/ (claim 8). Test::Harness can be told the order in which tests are to be run. MakeMaker specifically runs test files in alphabetical order by filename (claims 9, 10, 11, 12). Test::Harness only recently added support for non-file based testing but JUnit and the Smalltalk testing frameworks handle tests in software objects (claim 13). The rest of the claims appear to repeat 1-13 in legalese. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using Perl 5.6.2, 5.8.0, 5.8.5, 5.9.2 on HP-UX 10.20, 11.00 11.11, AIX 4.3 5.2, SuSE 9.2 9.3, and Cygwin. http://www.cmve.net/~merijn Smoking perl: http://www.test-smoke.org,perl QA: http://qa.perl.org reports to: [EMAIL PROTECTED],perl-qa@perl.org
Re: Parrot on HP-UX
On Sun, 05 Jun 2005 17:05:13 +0100, Nick Glencross [EMAIL PROTECTED] wrote: Folks, I hope that not too many of you are getting fed up with me going on about HP-UX. I'm nearly there with having it working with manually hacked Makefiles etc. Some tweaks will be needed to the Configure tests (not too many), but I'd just like to summarise what I believe to be the 'big picture' in a single email. I guess the main complexity comes from potentially having 3 C compilers and 2 linkers. We have: * The Bundled C compiler: which comes as standard with HP-UX, is a KR compiler and is pretty much just intended to generate a new kernel. It won't be up to compiling parrot. Because it is not an ANSI compliant compiler, and does not pretend to be one It's braindead and useless * A purchased HP C compiler. This is invoked with 'c89' or 'cc -Aa'. Full C compiler. cc -Ae * GNU C. Invoked with gcc or perhaps cc Most of us know and love it. On HP-UX, please use 3.0.4 or newer For 64bit compiles on HP-UX 11i, do NOT use 4.0.0 * HP-UX linker, ld. Not sure if there is a bundled/commercial version. there is only one. Please advice HP-UX users to check if they have applied the most recent patches, which makes a difference * GNU ld. Not available for 32bit builds on HP-UX gcc may be configured to use the HP-UX or GNU linker backends. HP-UX also has some quirks: * Shared libraries *must* have execute permissions * All C files which are to go into shared libraries *must* all be compiled with 'Position Independent Code' flags -z +Z for HP C -fPIC for gcc * The system ld doesn't export symbols in the main executable to be visible to shared libraries by default * The HP-UX linker does not like -g Yes, it does, but not in combination with -O2 or higher HP C and GNU gcc with -O1 both work fine with -g * [Some strange alignment rules?] I'll now try to clearly and concisely summarise the flags that are required for compilation. HP-UX C compiler: cc: c89 or 'cc -Aa' -Ae cc_shared: +z (should be Perl's cccdlflags variable) -z +Z (capital Z) ccdlflags(?): -Wl,-E if used with HP-UX ld -Ae will automatically pass this to ld GCC compiler: cc: cc or gcc cc_shared: -fpic (Perl's cccdlflags variable) -fPIC ccdlflags(?): -Wl,-E if used with HP-UX ld HP-UX ld: ld: ld ld_share_flags: -b GNU ld: ld: ld ld_share_flags: -shared The -Wl,-E (actually -E passed to ld) tells the linker to export symbols from the resulting binary so that they are available to dynamically loaded libraries. -fPIC is possible instead of -fpic, and +Z -z is better than -z (thanks H.Merijn), but we'd use whatever Perl supplies. The most recent perl5 hints for HP-UX already do so IIRC There basically seem to be a few assumptions in the configured system which are a bit gcc/linux-centric. For instance, the following files need to be compiled with $(cc_shared) as they make their way into dynamic libraries: src/extend.o src/nci_test.o dynclasses/*.o The parrot executable need to be linked with (what I've called above) $(ccdlflags) for dynclasses to work. If no one sees any big misunderstands here, I'll press on with my tweaks over the next few days, -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using Perl 5.6.2, 5.8.0, 5.8.5, 5.9.2 on HP-UX 10.20, 11.00 11.11, AIX 4.3 5.2, SuSE 9.2 9.3, and Cygwin. http://www.cmve.net/~merijn Smoking perl: http://www.test-smoke.org,perl QA: http://qa.perl.org reports to: [EMAIL PROTECTED],perl-qa@perl.org
Re: Parrot 0.2.1 APW Released!
On Sat, 04 Jun 2005 12:36:57 +0200, Leopold Toetsch [EMAIL PROTECTED] wrote: Parrot 0.2.1 APW Released! On behalf of the Parrot team I'm proud to announce another monthly release of Parrot and I'd like to thank all involved people as well as our sponsors for supporting us. The release name stands for Austrian Perl Workshop, which will take place on 9th and 10th of June in Vienna. It will have a french connection that is a live video stream to the French Perl Workshop happening at the same time. Thanks, applied. What is Parrot? Parrot is a virtual machine aimed at running Perl6 and other dynamic languages. Parrot 0.2.1 changes and news - better HLL support (short names for object attributes, and .HLL and n_operators pragmas) - string encoding and charset can now be set independently - experimental mmap IO layer for slurping files - distinct debug and trace flag settings - glob support in PGE - new character classification opcodes and interfaces After some pause you can grab it from http://www.cpan.org/authors/id/L/LT/LTOETSCH/parrot-0.2.1.tar.gz. As parrot is still in steady development we recommend that you just get the latest and best from SVN by following the directions at http://www.parrotcode.org/source.html Turn your web browser towards http://www.parrotcode.org/ for more information about Parrot, get involved, and: Have fun! leo -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using Perl 5.6.2, 5.8.0, 5.8.5, 5.9.2 on HP-UX 10.20, 11.00 11.11, AIX 4.3 5.2, SuSE 9.2 9.3, and Cygwin. http://www.cmve.net/~merijn Smoking perl: http://www.test-smoke.org,perl QA: http://qa.perl.org reports to: [EMAIL PROTECTED],perl-qa@perl.org
Re: Building nci/dynclasses on HP-UX
On Fri, 03 Jun 2005 13:11:57 +0100, Nick Glencross [EMAIL PROTECTED] wrote: Guys, I'm currently investigating the build process for nci and dynclasses on HP-UX. As you may have seen from my previous posts, I'm using gcc and the native bundled ld. Although the build process isn't using the right flags to compile nci and dynclasses, I've managed to compile things manually. Certain files need special PIC treatment (at least on HP-UX) so that they can be included in shared libraries: src/extend.o src/nci_test.o dynclasses/*.o more? Hence, these files need: GNU cc: -fpic use -fPIC for more portability HP-UX cc: +z use +Z -z for more portability and higher run-time safety and never forget -Ae, but I can't see from this post if you already use it further, if you use -O2 or up, add +Onolimit and then for linking the library: GNU ld: -shared HP ld: -b Also HP ld does not like -g, and should not be used. In fact, I'm not aware that any flavours of ld should be using -g (it is ignored in GNU ld). Most of the nci tests pass, except for tests 8 and 52 which both hang (on the dlvar call with nci_dlvar_int). I'm still working on getting dynclasses working. Although compiled, the libraries are failing to mmap in the backend of dlopen (probably unresolved symbols, pic or something else). -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using Perl 5.6.2, 5.8.0, 5.8.5, 5.9.2 on HP-UX 10.20, 11.00 11.11, AIX 4.3 5.2, SuSE 9.2 9.3, and Cygwin. http://www.cmve.net/~merijn Smoking perl: http://www.test-smoke.org,perl QA: http://qa.perl.org reports to: [EMAIL PROTECTED],perl-qa@perl.org
Re: Building nci/dynclasses on HP-UX
On Fri, 03 Jun 2005 16:20:53 +0100, Nick Glencross [EMAIL PROTECTED] wrote: H.Merijn Brand wrote: On Fri, 03 Jun 2005 13:11:57 +0100, Nick Glencross [EMAIL PROTECTED] wrote: Guys, I'm currently investigating the build process for nci and dynclasses on HP-UX. As you may have seen from my previous posts, I'm using gcc and the native bundled ld. use +Z -z for more portability and higher run-time safety and never forget -Ae, but I can't see from this post if you already use it Good points about the flags. I only have the 'bundled' C compiler and am Get yourself a testdrive account on http://www.testdrive.hp.com/ Current available systems: http://www.testdrive.hp.com/current.shtml All systems have native ANSI-C compilers installed If you are serious in using that for HP-UX or OpenVMS, please contact me off-list, since we have a special perl5 group there with just a little bit more rights stuck with gcc, so I've not actually been able to use the HP cc. You're right, -Aa or c89 command-line, a very good point. I've been trying to understand the rules that HP-UX's dlopen/dlsym play by. I've still a few more experiments to try, but dlsym has only worked for me if the the executable is also created PIC and the dynamic library is linked against libparrot.a, resulting in huge dynclasses, but dlsym returns NULL otherwise (mind you, it's worked pretty well for nci_test.sl) I fear that there may be some pointer alignment problems in hash because I'm getting hangs which seem to be linked to finding strings in hash tables. (That's pure conjecture) -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using Perl 5.6.2, 5.8.0, 5.8.5, 5.9.2 on HP-UX 10.20, 11.00 11.11, AIX 4.3 5.2, SuSE 9.2 9.3, and Cygwin. http://www.cmve.net/~merijn Smoking perl: http://www.test-smoke.org,perl QA: http://qa.perl.org reports to: [EMAIL PROTECTED],perl-qa@perl.org
Re: HP-UX build notes
On Wed, 01 Jun 2005 12:45:12 +0100, Nick Glencross [EMAIL PROTECTED] wrote: Here are some notes for those that are interested in parrot being built on other platforms. The system in question is a PA-RISC HP-UX 11.11 system (hppa2.0w-hp-hpux11.11). The system only has the bundled C compiler and linker, so I've compiled gcc 3.3.6 for it. gcc cannot create debug information without gas, which is unfortunately not supported on this platform. It is. Go fetch from my site! My HP ITRC site pages can be found at (please use LA as primary choice): USA Los Angeles http://mirrors.develooper.com/hpux/ SGP Singapore https://www.beepz.com/personal/merijn/ USA Chicago http://ww.hpux.ws/merijn/ NL Hoofddorp http://www.cmve.net/~merijn/ gcc-3.4.4 + binutils-2.16 uploaded this morning, so it will be available tomorrow after the sync. gcc-4.0.0 proved to be unusable for perl-5.8.7 and blead in 64bit mode if you restrict yourself to 32bit, it'll work fine Enjoy, have FUN! H.Merijn I also built Perl from source: intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=12345678 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12 ivtype='long long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8 alignbytes=8, prototype=define In Parrot's config.h I've got: #define INTVAL_SIZE 4 #define NUMVAL_SIZE 8 #define OPCODE_T_SIZE 4 #define PTR_SIZE 4 #define SHORT_SIZE 2 #define INT_SIZE 4 #define LONG_SIZE 4 #define HUGEINTVAL_SIZE 8 #define DOUBLE_SIZE 8 Here are a few niggles: * *Lots* of this warning in the ops: ops/experimental.ops:285: warning: cast increases required alignment of target type * ld keeps being run with -g which is not a valid flag * A warning is generated from cpp about the line in config.h as it contains a slash. #define PARROT_9000/800 1 * Had trouble with nci_test.o, so commented out from Makefile as a quick hack * Had trouble building dynclasses (flag/symbol problems) Disabled for now I've attached the result of a 'make test'. A number of tests fail because I didn't compile the dynclasses or nci_test.o. A large numer of failures are Aborts/Memory faults. Are these related to the alignment problems raised by the compiler? Should I be overriding something in the Configure script? (Perhaps as a side effect of this?) I'm also seeing 'l != left' assertions in mmd.c. If there's any other information I can provide, feel free to ask! Cheers, Nick -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using Perl 5.6.2, 5.8.0, 5.8.5, 5.9.2 on HP-UX 10.20, 11.00 11.11, AIX 4.3 5.2, SuSE 9.2 9.3, and Cygwin. http://www.cmve.net/~merijn Smoking perl: http://www.test-smoke.org,perl QA: http://qa.perl.org reports to: [EMAIL PROTECTED],perl-qa@perl.org
T::M + T::H recent make module test suites fail
Yesterday on our mongers meeting Abigail demo'd Lexical::Atributes
We all tried (SuSE 9.1, Mac OS X, Debian, RedHat, ...) and many systems did
not pass the test.
One of the reasons was that the Filter::Simple in 5.8.0 has version 0.78, but
it is not the same as the 0.78 in 5.8.1 and on, but that's not why I send this
post
All tests pass for T::M 0.47, but fail on 0.54
Same for Abe's V module
http://www.test-smoke.org/download/V-0.10.tar.gz
http://search.cpan.org/CPAN/authors/id/A/AB/ABIGAIL/Lexical-Attributes-1.1.tar.gz
Note the comments that are shown:
lt09:/pro/3gl/CPAN/Lexical-Attributes-1.1 109 prove -lv t/30_overload.t
t/30_overload
use overload '' = \stringify;
my %key1;my %key2;
my %key3; sub key3 {my $_key = Scalar::Util::refaddr shift; $key3 {$_key} =
shift if @_; $key3 {$_key};}
sub new {
bless [] = shift;
}
sub load_me { my $self = shift;
$key1 {Scalar::Util::refaddr $self} = shift if @_;
$key2 {Scalar::Util::refaddr $self} = shift if @_;
$key3 {Scalar::Util::refaddr $self} = shift if @_;
}
sub stringify { my $self = shift;
key1 = . $key1 {Scalar::Util::refaddr $self} . ; key2 = . $key2
{Scalar::Util::refaddr $self} . ; key3 = . $key3 {Scalar::Util::refaddr
$self}; }
1;
sub DESTROY {my $self = shift; delete $key2 {Scalar::Util::refaddr
$self};delete $key1 {Scalar::Util::refaddr $self};delete $key3
{Scalar::Util::refaddr $self};} ok 1 - use Overload;
ok 2 - $VERSION
ok 3 - The object isa Overload
ok 4 - The object isa Overload
Use of uninitialized value in hash element at Overload.pm line 23.
Use of uninitialized value in concatenation (.) or string at Overload.pm line
23. Use of uninitialized value in hash element at Overload.pm line 23.
Use of uninitialized value in concatenation (.) or string at Overload.pm line
23. Use of uninitialized value in hash element at Overload.pm line 23.
Use of uninitialized value in concatenation (.) or string at Overload.pm line
23. ok 5 - key1 = ; key2 = ; key3 =
Use of uninitialized value in hash element at Overload.pm line 23.
Use of uninitialized value in concatenation (.) or string at Overload.pm line
23. Use of uninitialized value in hash element at Overload.pm line 23.
Use of uninitialized value in concatenation (.) or string at Overload.pm line
23. Use of uninitialized value in hash element at Overload.pm line 23.
Use of uninitialized value in concatenation (.) or string at Overload.pm line
23. ok 6 - key1 = ; key2 = ; key3 =
1..6
ok
All tests successful.
Files=1, Tests=6, 0 wallclock secs ( 0.18 cusr + 0.00 csys = 0.18 CPU)
lt09:/pro/3gl/CPAN/Lexical-Attributes-1.1 110
lt09:/pro/3gl/CPAN/Lexical-Attributes-1.1 121 env
PERL5LIB=/pro/3gl/CPAN/Test-Simple-0.47:/pro/3gl/CPAN/Test-Simple-0.47/blib:/
pro/3gl/CPAN/Test-Simple-0.47/blib/lib:/pro/3gl/CPAN/Test-Simple-0.47/blib/ar
ch make test PERL_DL_NONLAZY=1 /pro/bin/perl -MExtUtils::Command::MM -e
test_harness(0, 'blib/lib', 'blib/arch') t/*.t t/10_basic..ok
t/20_inheritanceok
t/30_overload...ok
t/40_destroyok
t/80_duplicate..ok
All tests successful.
Files=5, Tests=347, 3 wallclock secs ( 2.39 cusr + 0.03 csys = 2.42 CPU)
lt09:/pro/3gl/CPAN/Lexical-Attributes-1.1 122
lt09:/pro/3gl/CPAN/Lexical-Attributes-1.1 122 env
PERL5LIB=/pro/3gl/CPAN/Test-Simple-0.47:/pro/3gl/CPAN/Test-Simple-0.47/blib:/
pro/3gl/CPAN/Test-Simple-0.47/blib/lib:/pro/3gl/CPAN/Test-Simple-0.47/blib/ar
ch prove -bv t/30_overload.t t/30_overload
use overload '' = \stringify;
my %key1;my %key2;
my %key3; sub key3 {my $_key = Scalar::Util::refaddr shift; $key3 {$_key} =
shift if @_; $key3 {$_key};}
sub new {
bless [] = shift;
}
sub load_me { my $self = shift;
$key1 {Scalar::Util::refaddr $self} = shift if @_;
$key2 {Scalar::Util::refaddr $self} = shift if @_;
$key3 {Scalar::Util::refaddr $self} = shift if @_;
}
sub stringify { my $self = shift;
key1 = . $key1 {Scalar::Util::refaddr $self} . ; key2 = . $key2
{Scalar::Util::refaddr $self} . ; key3 = . $key3 {Scalar::Util::refaddr
$self}; }
1;
sub DESTROY {my $self = shift; delete $key2 {Scalar::Util::refaddr
$self};delete $key1 {Scalar::Util::refaddr $self};delete $key3
{Scalar::Util::refaddr $self};} ok 1 - use Overload;
ok 2 - $VERSION
ok 3 - The object isa Overload
ok 4 - The object isa Overload
ok 5 - Overload
ok 6 - Overload
1..6
ok
All tests successful.
Files=1, Tests=6, 0 wallclock secs ( 0.18 cusr + 0.00 csys = 0.18 CPU)
lt09:/pro/3gl/CPAN/Lexical-Attributes-1.1 123
--
H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/)
using Perl 5.6.2, 5.8.0, 5.8.3, 5.9.2 on HP-UX 10.20, 11.00 11.11,
AIX 4.3, SuSE 9.0 pro 2.4.21 Win2k. http://www.cmve.net/~merijn
Smoking perl: smokers@perl.org, perl QA: http://qa.perl.org
reports to: [EMAIL PROTECTED],perl-qa@perl.org
Re: Anomalous Difference in Output between HTML Files Created by
On Mon, 31 Jan 2005 10:00:40 +, Nicholas Clark [EMAIL PROTECTED] wrote: On Mon, Jan 31, 2005 at 10:12:16AM +0100, Paul Johnson wrote: I suppose that's the price you pay for TIMTOWTDI. [ Is that a Python programmer I hear giggling in the background? ] Does Python have any equivalent tool to Devel::Cover? Does Python have customizable test suites *at all*? -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using Perl 5.6.2, 5.8.0, 5.8.3, 5.9.2 on HP-UX 10.20, 11.00 11.11, AIX 4.3, SuSE 9.0 pro 2.4.21 Win2k. http://www.cmve.net/~merijn Smoking perl: smokers@perl.org, perl QA: http://qa.perl.org reports to: [EMAIL PROTECTED],perl-qa@perl.org
Re: Test::Legacy warnock'd
On Tue 21 Dec 2004 18:32, Michael G Schwern [EMAIL PROTECTED] wrote: On Tue, Dec 21, 2004 at 04:53:18PM +0100, Tels wrote: On Tuesday 21 December 2004 08:53, Michael G Schwern wrote: I've gotten absolutely no response about Test::Legacy. Is anybody using it? Anybody tried migrating old Test.pm based tests with it? I am converting my old tests directly to Test::More (Test::legacy wasn't available before so :) Currently I do not plan to do this - the old tests either work (never fix what is working) or they don't (seldom), at which point I would convert them to Test::More. There's no I want to add a new test to this test file that uses Test.pm and it would be nice if I could use Test::Foo case? I also immetiately switched from Copy-n-Paste tests (all starting DBD authors do) to a full fletched Test::More, and used T::M for every test written from scratch thereafter. I never (knowingly) used Test.pm for my own tests. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.5, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, AIX 5.2, SuSE 9.1, and Win2k. http://www.cmve.net/~merijn/ http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Uncle Bob on Coding Standards
On Tue 14 Dec 2004 15:15, [EMAIL PROTECTED] (Dominic Mitchell) wrote: On Tue, Dec 14, 2004 at 12:21:50PM +, Matt Sergeant wrote: On 14 Dec 2004, at 11:26, Clayton, Nik wrote: To be honest, I don't care if someone's house style is for TAB to indent 2, 4, or 8 characters; how much second level indentations are indented by; whether or not braces cuddle 'else'; and so on. That's something the editor can care about. When I hit the TAB key it should just do whatever the house style requires. But what about when I'm using notepad.exe??? Or an even more common example, my laser printer? Tabs are 8 spaces. Printers know this. Terminals know this. Even browsers know this. Do the world a favour and don't tell your editor otherwise. I /think/ he means what the tab key's effect is when typed in his editor of choice most vi clones have some knowledge about using the tab key on the start of a line, translating it to shiftwidth, which can be any number. That the editor replaces every amount of spaces (default 8) with a tab should not be the coders problem. Some editors also have the option to not use tabs at all and expand all leading whitespace to spaces. I /think/ that is what Nik meant. But we're adrift here. This was not the subject of the original post. [ If you're using notepad, you're not a real coder. vim/elvis is also available on winblows ] Kane has a sig that sais: real coders use cat a.out -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.5, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, AIX 5.2, SuSE 9.1, and Win2k. http://www.cmve.net/~merijn/ http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Uncle Bob on Coding Standards
On Tue 14 Dec 2004 18:21, Ricardo SIGNES [EMAIL PROTECTED] wrote: * H.Merijn Brand [EMAIL PROTECTED] [2004-12-14T11:28:19] About spaces, another thing springs to mind, for which I would gladly kill the responsible people to allow it (I bet M$ was the first to push it): Spaces in database table and field names. DON'T! NEVER! Once you start it, you will never be able to escape the quicksands of (incompatible) quotation and unportability of your scripts, be that in sql, sh, perl/dbi, hli, or e/sql SELECT rsUniqueId FROM [SQL-ABCdatabase2K]..tblsTABLE as t JOIN [SQL-ABCdatabase2K]..tblwPRODUCT p ON p.ABC P/N = t.rsProductCode WHERE p.id IN (SELECT ItemIdentifier FROM tblSomeIds) Just only today I hit an M$Access database with a table named `./onderw`.`Bus; Taxi; Auto` Ahhrg! /me runs for cover! -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.5, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, AIX 5.2, SuSE 9.1, and Win2k. http://www.cmve.net/~merijn/ http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Uncle Bob on Coding Standards
On Tue 14 Dec 2004 21:49, Michael G Schwern [EMAIL PROTECTED] wrote:
Here's all I have to say about tabs.
I expect the source to look the same no matter whose editor, pager, printer
or utility I run it through. Literal tabs violate this. The end.
Here's what I have to say about clever bracing/spacing styles.
Your bracing/spacing style should not be a detriment. It should not
be a limitation. If common editors have trouble dealing with it,
you've just limited your tool set.
Yes. Ditch emacs. It knows only the *wrong* styles.
If programmers outside your project look at it and go Huh? you've just
lost yourself a potential patch as they recoil.
Don't think so. spaces and bracing is hard to do it so bad as to other people
unable to be able to read it. It is merely easy to the eye if there is logic,
and maybe more important consistency in indents
if(expr)
{ func( args ) }else{
statement; }
func ( args);
if (expr)
statement;
wrong_indent;
and yet more misleading indent;
if (expr) {
foo (1);
}
That is *bad*
If its so different that looking at other common
bracing styles is now odious to you, that's a communication problem.
Part of easy communication is taking advantage of common idioms and
conventions. Doesn't matter how clever it is, if its causing conflict with
outsiders, dump it.
No way. Ever.
If I feel compelled enough to deal with other peoples code, I will adapt where
needed. The fact that I'm a perl5 commiter is a vivid proof of that. If I had
imposed my style on all patches I submitted or applied, I would have been
kicked a long time ago.
We have a small company, and if you like to work with us, you adapt to our
style. Not vise versa. Period.
I've also learned that over time, you can get used to (almost) any style,
given there is some logic about it. I've had to change a lot of my habits in
all the compromises we made, but got used to it.
--
H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/)
using perl-5.6.1, 5.8.5, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i,
AIX 4.3, AIX 5.2, SuSE 9.1, and Win2k. http://www.cmve.net/~merijn/
http:[EMAIL PROTECTED]/ [EMAIL PROTECTED]
send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Uncle Bob on Coding Standards
On Tue 14 Dec 2004 17:10, Adam Turoff [EMAIL PROTECTED] wrote: On Tue, 14 Dec 2004 16:14:32 +0100, H.Merijn Brand [EMAIL PROTECTED] wrote: On Tue 14 Dec 2004 16:04, Clayton, Nik [EMAIL PROTECTED] wrote: I've normally got enough going on in my head when writing code, worrying about the house style should not be one of them. Wrong. It should be. You write, and someone else - or yourself - has to maintain the code later. This means that you have to write with style and maintainability in focus. All the time. Part of the problem is that coding style mixes a bunch of unrelated issues of varying importance. I'm with Nik that I don't care overmuch about how many spaces go around parens, whether curlys are cuddled or uncuddled, or tab expansion idiosyncracies. But there *are* issues of coding style that are of tremendous import, and can add or reduce friction on a project, especially as it grows. Things like line length, method length, naming conventions, file layout, idiomatic usage[*], etc. One example I've used in the past is from a project I worked on (in C) where we were dealing with real estate data numbers, commonly abbreviated 'rednum'. Except that they were also named, 'red', 'redno', 'rnum', 'red_num', 'red_no', 'r_num', and so on. In both variables and Ohhh, the horror. And so recognizable! functions. This was one of many sources of dissonance (and compiler errors) on the project, and was a continual drag on team productivity. Instead of just *knowing* what you needed, you often needed to grovel through half a dozen source files to figure out what you *should* have typed. This was underlighted in my example, but indeed evenly important. We've chosen to make default prefixes to veriables to reflect the (database) type: d_end All dates start with d_ (we use plain numeric 8 MMDD because none of the databases we work with have compatible date formats (fwiw we also have d_end_y, d_end_m, and d_end_d, which I now presume does not need any further explanation :)) c_city (key) code of a field that has a reference table s_city The string value for c_city and so on. But we all used the same brace placement and indenting styles. ;-) About spaces, another thing springs to mind, for which I would gladly kill the responsible people to allow it (I bet M$ was the first to push it): Spaces in database table and field names. DON'T! NEVER! Once you start it, you will never be able to escape the quicksands of (incompatible) quotation and unportability of your scripts, be that in sql, sh, perl/dbi, hli, or e/sql If you want to have portability in mind, adhere to the lowest level of available standards and don't be tempted to use archaic functions specific to a unique version of a database on a unique version of an operating system wich only runs on a specific architecture. FWIW the style I use was decided upon back in the 80's when we (me and 6 others) had to do a huge software project at school and we did discuss style before we started. The biggest argue was about the length of the variable names to use. This is where I think Uncle Bob is right -- the standards need to evolve. On this same project, there was a coding standard in place at the onset, but it standardized trivialities. Because we had a coding standard, we never saw the bigger issues of naming conventions as problems a coding standard could/should fix, so everyone improvised in their own special way with the stuff that wasn't standardized. At the onset, though, a lot of issues we had to deal with were completely unknown, since the project took three or four major course changes over the years. If all of this is true, I think we made marvellous decisions in our school days, because none of my coding standards have changed, but the decrease of an indent of 6 (very nice when programming PASCAL) to an indent of 4 (better suited for almost any other language, and since TAB is 8, much more efficient). Z. *: For example: design with closures and coderefs in mind, or with big modules with 17 optional features or 15 variations on the same method; are you intetionally using or avoiding map and grep?; what are the standard modules your project uses to write new classes? -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.5, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, AIX 5.2, SuSE 9.1, and Win2k. http://www.cmve.net/~merijn/ http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Uncle Bob on Coding Standards
discussion of the scope of applicability of the methods might be worthwhile. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.5, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, AIX 5.2, SuSE 9.1, and Win2k. http://www.cmve.net/~merijn/ http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Uncle Bob on Coding Standards
On Tue 14 Dec 2004 16:04, Clayton, Nik [EMAIL PROTECTED] wrote: I /think/ he means what the tab key's effect is when typed in his editor of choice Correct. Hitting TAB should indent to the correct level for the current context. I don't especially care whether the editor does by inserting actual TAB characters or a bunch of spaces. I've normally got enough going on in my head when writing code, worrying about the house style should not be one of them. Wrong. It should be. You write, and someone else - or yourself - has to maintain the code later. This means that you have to write with style and maintainability in focus. All the time. PS: This is probably my pet peeve about writing FreeBSD code. There's no Emacs style(9) mode (although you can come close), and last time I checked, some of style(9) really can't be implemented automatically. To my mind, that's a bug in the house style... I hate emacs because it cannot support my indent style (and also because it is a system resource hog). I've had several people trying to set emacs' preferences to what we use here, but emacs just does not want to do it. It's completely focused on the (IMHO wrong) style used with the GNU software projects, which is one of the reasons I've always turned down requests to help maintain any of their projects. FWIW the style I use was decided upon back in the 80's when we (me and 6 others) had to do a huge software project at school and we did discuss style before we started. The biggest argue was about the length of the variable names to use. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.5, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, AIX 5.2, SuSE 9.1, and Win2k. http://www.cmve.net/~merijn/ http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Uncle Bob on Coding Standards
On Tue 14 Dec 2004 16:21, Clayton, Nik [EMAIL PROTECTED] wrote:
I've normally got enough going on in my head when writing code, worrying
about the house style should not be one of them.
Wrong. It should be. You write, and someone else - or yourself - has to
maintain the code later. This means that you have to write with style and
maintainability in focus. All the time.
style yes. house style no. I don't especially care whether a group
prefers 4 character indents, 8 character indents,
if(foo) {
}
or
if(foo)
{
}
if (expr) {
statement;
function (argument, ...);
}
That's what the tools are for. Those are all religious issues that I'm
not interested in.
Tools can seriously fuck up code, especially when embedded (database) code is
involved. We don't use formatting tools just because of that. (re)formatters
might work on machine/architecture A, but totally kill a specific
(pre)processor somewhere else.
Not having to worry about those because the tools deal with them means
I can worry about how best to express what I'm trying to achieve in the
code (a) to whoever maintains it after me, and (b) to the machine that's
going to be executing it.
Not worrying about those issues have taken far too much of my time in the past
because
1. Other preprocessors could not cope with it. Don't blame the manufacturer,
because it will take exponential amounts of time to convince IBM or
Micro$hit to admit it's their fault (yes, for me it was a faulty IBM cpp)
2. It will take someone later on an incredible amount of (lost) time to fix
the non-house-style to house style, because it /will/ be decided somewhere
in the future that everything has to be in house style, and that will
probably not be *you* who decides so. If /I/ was the one to decide, and
/you/ were the one to refuse, you are out. So it's also a good way to keep
friends with your co-workers and lessen the chance to be fired first.
--
H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/)
using perl-5.6.1, 5.8.5, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i,
AIX 4.3, AIX 5.2, SuSE 9.1, and Win2k. http://www.cmve.net/~merijn/
http:[EMAIL PROTECTED]/ [EMAIL PROTECTED]
send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Test labels
On Tue 07 Dec 2004 05:28, Andy Lester [EMAIL PROTECTED] wrote: I think even better than ok( $expr, name ); or ok( $expr, comment ); is ok( $expr, label ); or ok ($expr, indicator); or ok ($expr, tag); for me the name/comment/label/tag/indicator/... is just a tag (which does not have to be unique) to be able to find back my test in the test script. As long as all tests run fine, you don't read them, so tag sounds best to me RJBS points out that comment implies not really worth doing, and I still don't like name because it implies (to me) a unique identifier. We also talked about description, but description is just s overloaded. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.5, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, AIX 5.2, SuSE 9.1, and Win2k. http://www.cmve.net/~merijn/ http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Test::Simple 0.51 prerelease
On Fri 26 Nov 2004 06:15, Michael G Schwern [EMAIL PROTECTED] wrote: On Fri, Nov 26, 2004 at 03:57:43PM +1100, Andrew Savige wrote: To try and cheer you up a bit, I'm delighted to report that your new Test-Simple-0.51 passed all tests on Windows XP under Perl 5.8.5 using NMAKE. Thank you, I am very much lacking in Windows tuits at the moment. I also got no failures on the mosts recent cygwin with homebrew perl-5.9.2 (very recent with weakened err keyword) and with activeperl 809 and nmake. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.5, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, AIX 5.2, SuSE 9.1, and Win2k. http://www.cmve.net/~merijn/ http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: dor and backwards compat (was Re: [ANNOUNCE] Test::Simple 0.49)
On Mon 18 Oct 2004 19:05, Michael G Schwern [EMAIL PROTECTED] wrote: On Mon, Oct 18, 2004 at 04:43:12PM +0200, H.Merijn Brand wrote: Please consider 0.50 very soon, in which you fix 'err' calls that are an obvious mistake given defined-or functionality in blead and 5.8.x-dor: That would be too easy to call. here's a patch ... Thank you. Patch provisionally rejected. Here's why. By adding a new keyword dor has broken backwards compatibility. Test::More is doing nothing wrong by current standards. main::err() is fully declared before its use. There is no ambiguity. Now with dor its suddenly a keyword and code breaks at no fault to the programmer. Its not just a warning, its a syntax error. Upgrading from 5.8 to 5.10 will break code. This is a problem. Its a problem every time we add a new keyword. So, something must be done to fix this. Getting everyone to patch up their code for 5.10 is an option of *last* resort. This is why I'm rejecting the patch. The challenge for you: Make dor work with Test::More, as written, to illustrate that it won't cause havoc with all code that contains a subroutine called err(). I won't accept that challenge, and hgere's why: I did not invent that keyword Many new keywords will follow I prefer the functionality of the keyword over the fact that tests fail because of the use of it. A simple change to test cases (not even the module itself) a CORE module is all it needs to make everything works. I only maintain the dor patch for 5.8.x It will be in 5.10 anyway. If this is not possible, the minimum that should happen is 5.8 contains a warning about the future reserved words. This follows the usual pattern of breaking compatibility. Warn about it in one stable series then eliminate it in the next. You're right on that -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.3, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 9.0, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: [ANNOUNCE] Test::Simple 0.49
On Fri 15 Oct 2004 05:20, Michael G Schwern [EMAIL PROTECTED] wrote: Its about freakin' time. Has it really been two years since the last stable release? Yes it has. This is 0.48_02 plus a minor test and MANIFEST fix. INCOMPATIBILITIES WITH PREVIOUS VERSIONS * Threading is no longer automatically turned on. You must turn it on before you use Test::More if you want it. See BUGS and CAVEATS for info. Please consider 0.50 very soon, in which you fix 'err' calls that are an obvious mistake given defined-or functionality in blead and 5.8.x-dor: NOTE: There have been API changes between this version and any older than version 0.48! Please see the Changes file for details. Checking if your kit is complete... Looks good Writing Makefile for Test::Simple cp lib/Test/Simple.pm blib/lib/Test/Simple.pm cp lib/Test/Builder.pm blib/lib/Test/Builder.pm cp lib/Test/More.pm blib/lib/Test/More.pm cp lib/Test/Tutorial.pod blib/lib/Test/Tutorial.pod PERL_DL_NONLAZY=1 /pro/bin/perl -MExtUtils::Command::MM -e test_harness(0, 'blib/lib', 'blib/arch') t/*.t t/00test_harness_checkok t/bad_planok t/buffer..ok t/Builder.ok t/curr_test...ok t/details.ok t/diagok t/eq_set..ok t/exitok t/extra...ok t/extra_one...ok t/fail-like...ok t/fail-more...Ambiguous call resolved as CORE::err(), qualify as suc h or use at t/fail-more.t line 39. syntax error at t/fail-more.t line 39, near err Execution of t/fail-more.t aborted due to compilation errors. t/fail-more...dubious Test returned status 255 (wstat 65280, 0xff00) t/failok t/fail_oneok t/filehandles.ok t/forkok t/harness_active..Ambiguous call resolved as CORE::err(), qualify as suc h or use at t/harness_active.t line 63. Ambiguous call resolved as CORE::err(), qualify as such or use at t/harness_ac tive.t line 73. syntax error at t/harness_active.t line 63, near err syntax error at t/harness_active.t line 73, near err Execution of t/harness_active.t aborted due to compilation errors. t/harness_active..dubious Test returned status 255 (wstat 65280, 0xff00) t/has_planok -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.3, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 9.0, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: [ANNOUNCE] Test::Simple 0.49
On Mon 18 Oct 2004 16:34, H.Merijn Brand [EMAIL PROTECTED] wrote:
On Fri 15 Oct 2004 05:20, Michael G Schwern [EMAIL PROTECTED] wrote:
Its about freakin' time. Has it really been two years since the last
stable release? Yes it has.
This is 0.48_02 plus a minor test and MANIFEST fix.
INCOMPATIBILITIES WITH PREVIOUS VERSIONS
* Threading is no longer automatically turned on. You must turn it on
before you use
Test::More if you want it. See BUGS and CAVEATS for info.
Please consider 0.50 very soon, in which you fix 'err' calls that are an
obvious mistake given defined-or functionality in blead and 5.8.x-dor:
That would be too easy to call. here's a patch ...
All tests successful, 2 tests and 7 subtests skipped.
Files=46, Tests=290, 11 wallclock secs ( 8.79 cusr + 0.97 csys = 9.76 CPU)
--8--- TS49_01.diff
diff -r -pu Test-Simple-0.49/t/fail-more.t Test-Simple-0.49_01/t/fail-more.t
--- Test-Simple-0.49/t/fail-more.t 2004-10-15 05:07:33 +0200
+++ Test-Simple-0.49_01/t/fail-more.t 2004-10-18 16:37:22 +0200
@@ -38,7 +38,7 @@ sub ok ($;$) {
}
-sub main::err ($) {
+sub main::Err ($) {
my($expect) = @_;
my $got = $err-read;
@@ -65,7 +65,7 @@ $tb-use_numbers(0);
# Preserve the line numbers.
#line 38
ok( 0, 'failing' );
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 38)
ERR
@@ -74,7 +74,7 @@ is( foo, bar, 'foo is bar?');
is( undef, '','undef is empty string?');
is( undef, 0, 'undef is 0?');
is( '',0, 'empty string is 0?' );
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 40)
# got: 'foo'
# expected: 'bar'
@@ -93,7 +93,7 @@ ERR
isnt(foo, foo, 'foo isnt foo?' );
isn't(foo, foo,'foo isn\'t foo?' );
isnt(undef, undef, 'undef isnt undef?');
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 45)
# 'foo'
# ne
@@ -111,7 +111,7 @@ ERR
#line 48
like( foo, '/that/', 'is foo like that' );
unlike( foo, '/foo/', 'is foo unlike foo' );
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 48)
# 'foo'
# doesn't match '/that/'
@@ -122,21 +122,21 @@ ERR
# Nick Clark found this was a bug. Fixed in 0.40.
like( bug, '/(%)/', 'regex with % in it' );
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 60)
# 'bug'
# doesn't match '/(%)/'
ERR
fail('fail()');
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 67)
ERR
#line 52
can_ok('Mooble::Hooble::Yooble', qw(this that));
can_ok('Mooble::Hooble::Yooble', ());
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 52)
# Mooble::Hooble::Yooble-can('this') failed
# Mooble::Hooble::Yooble-can('that') failed
@@ -149,7 +149,7 @@ isa_ok(bless([], Foo), Wibble);
isa_ok(42,Wibble, My Wibble);
isa_ok(undef, Wibble, Another Wibble);
isa_ok([],HASH);
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 55)
# The object isn't a 'Wibble' it's a 'Foo'
# Failed test ($0 at line 56)
@@ -168,7 +168,7 @@ cmp_ok( 1, '', 0, ' '
cmp_ok( 42,'==', foo, ' == with strings' );
cmp_ok( 42,'eq', foo, ' eq with numbers' );
cmp_ok( undef, 'eq', 'foo', ' eq with undef' );
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 68)
# got: 'foo'
# expected: 'bar'
@@ -201,7 +201,7 @@ my $Errno_String = $!.'';
#line 80
cmp_ok( $!,'eq', '',' eq with stringified errno' );
cmp_ok( $!,'==', -1,' eq with numerified errno' );
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 80)
# got: '$Errno_String'
# expected: ''
diff -r -pu Test-Simple-0.49/t/harness_active.t Test-Simple-0.49_01/t/harness_active.t
--- Test-Simple-0.49/t/harness_active.t 2004-10-15 05:07:33 +0200
+++ Test-Simple-0.49_01/t/harness_active.t 2004-10-18 16:37:48 +0200
@@ -37,7 +37,7 @@ sub ok ($;$) {
}
-sub main::err ($) {
+sub main::Err ($) {
my($expect) = @_;
my $got = $err-read;
@@ -63,13 +63,13 @@ Test::More-builder-no_ending(1);
#line 62
fail( this fails );
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 62)
ERR
#line 72
is( 1, 0 );
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 72)
# got: '1'
# expected: '0'
@@ -81,7 +81,7 @@ ERR
#line 71
fail( this fails );
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 71)
ERR
@@ -89,7 +89,7 @@ ERR
#line 84
is( 1, 0 );
-err( ERR );
+Err( ERR );
# Failed test ($0 at line 84)
# got: '1'
--8---
--
H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/)
using perl-5.6.1, 5.8.3, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i,
AIX 4.3, SuSE 9.0, and Win2k. http://www.cmve.net/~merijn/
http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED]
send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
TS.diff
Description: Binary data
Re: Memory leak
On Fri 15 Oct 2004 22:32, [EMAIL PROTECTED] (PerlDiscuss - Perl Newsgroups and mailing lists) wrote: I need to embed Perl function in C program running as a daemon on Linux and Solaris. What it needs is to do pattern matching in Perl while it is If pattern matching is your only goal, why not use PCRE? ftp://ftp.csx.cam.ac.uk/pub/software/programming/pcre/ difficult in C. However, frequently calling either of functions eval_pv or perl_run would keep increasing the size of process. How come these functions don't release memory they use. I wonder if this is an existing bug in Perl5 or there is a smart way to handle this. Please help. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using Perl 5.6.1, 5.8.0, 5.8.3, 5.9.1 on HP-UX 10.20, 11.00 11.11, AIX 4.3, SuSE 9.0 pro 2.4.21 Win2k. http://www.cmve.net/~merijn Smoking perl: [EMAIL PROTECTED], perl QA: http://qa.perl.org reports to: [EMAIL PROTECTED],[EMAIL PROTECTED]
Re: misc remarks WRT YAPC::EU
On Tue 21 Sep 2004 15:43, Leopold Toetsch [EMAIL PROTECTED] wrote: First I'd like to thank all who donated to TPF: a shiny new 12 Powerbook G4 ran the presentation in Belfast. Thanks to Allison bringing it with her and to TPF. The speed comparison of b2.py was done with an unoptimized Parrot build. Turning on --optimize gives 0.35s vs 0.6s (Parrot vs Python) on that Powerbook. A first patch enabling the pipe open on OS X is already in CVS. Bernd the vaxman will have a look at Parrots VMS port. And he has a brand new Itanium OpenVMS machine which the perl community can use for testing. Parrot and Perl5 smokes. A french teacher is using Parrot for teaching assembly language. A guy from India (whos name I didn't get) is gonna doing his master thesis on implementing Java on Parrot. Nice addition: this guy doesn't like java at all :) Thanks to all organizers of the conference, leo -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.3, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 9.0, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: enhanced open-funktion
On Thu 15 Jul 2004 11:42, Michele Dondi [EMAIL PROTECTED] wrote: On Tue, 13 Jul 2004, Juerd wrote: open '', $foo; open '', $foo; is much harder to read than open 'r', $foo; open 'w', $foo; Are you sure?!? I would tend to disagree... So do I. , and are imho MUCH clearer than 'r' and 'w' for several reasons 0. More appealing to the eye 1. They do not ambiguate with files named 'r', or 'w' 2. They don't have to be translated (in german that would be 'l' and 's') 3. They play nice with possible extensions 'open :utf8, $file; not that MHO is particularly important, I guess, but just to stress the fact that it is by large a subjective matter... -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.3, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 9.0, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Notes on the piethon converter
On Thu 15 Jul 2004 18:53, Dan Sugalski [EMAIL PROTECTED] wrote: Figured I'd drop this note as I'm poking at this over lunch. if you try to pun the piethon spelling, py-thong would sound a lot sexier There's a number of opcodes that access attributes of the code object. What I'm going to do is take advantage of the fact that we stick the sub/method being called into P0, and hang attributes off of that. I think this'll do what we need it to do, though I'll need to have the generated code snag out P0 at the beginning so we have it for the rest of the sub. Setting that up'll be a different issue, but I'll deal with that later. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.3, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 9.0, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
DB_File
Sorry I already deleted the mail from Andy that triggered my attention He was summarizing the different DB options as of the perl5 perspective There is also a rather new version available: QDBM It got me confused because the HP porting center has put a prcompiled version for HP-UX on their mirrors, and the link (underscored) made me read that as gdbm-1.8.12 , instead of qdbm-1.8.12 and I thought that the most recent version of gdbm available was 1.8.3 (so close it triggers my attention) http://qdbm.sourceforge.net/ Enjoy -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.3, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 9.0, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Periodic Table of the Operators
On Tue 08 Jun 2004 12:35, David Cantrell [EMAIL PROTECTED] wrote: On Tue, Jun 08, 2004 at 11:30:51AM +0100, Tim Bunce wrote: On Mon, Jun 07, 2004 at 10:52:32PM +0100, David Cantrell wrote: But when I'm using a terminal session, I have found that the only practical way of getting consistent behaviour wherever I am is to use TERM=vt100. Windows is, of course, the main culprit in forcing me to vt100 emulation. I can recommend PuTTY for windows. Secure, small[1], fast, featureful and free: http://www.chiark.greenend.org.uk/~sgtatham/putty/ I'm using it now to ssh from a windows laptop to read email using mutt in screen. I can get it working with a Windows client, or a Mac client, or a $other_client, but I could never find any combination of voodoo that would work with *all* clients, so that I can disconnect (while leaving mutt running) then reconnect some random time later on some other platform and have it Just Work and have odd characters show up correctly. TERM=vt100 was the only way to get consistent results. Yes, I tried putty. I also tried cygwin/xfree86/xterm/openssh, to no avail. isn't that what 'screen' is for? --8--- man screen SCREEN(1) SCREEN(1) NAME screen - screen manager with VT100/ANSI terminal emulation SYNOPSIS screen [ -options ] [ cmd [ args ] ] screen -r [[pid.]tty[.host]] screen -r sessionowner/[[pid.]tty[.host]] DESCRIPTION Screen is a full-screen window manager that multiplexes a physical terminal between several processes (typically interactive shells). Each virtual terminal provides the functions of a DEC VT100 terminal and, in addition, sev- eral control functions from the ISO 6429 (ECMA 48, ANSI X3.64) and ISO 2022 standards (e.g. insert/delete line and support for multiple character sets). There is a scroll- back history buffer for each virtual terminal and a copy- and-paste mechanism that allows moving text regions between windows. When screen is called, it creates a single window with a shell in it (or the specified command) and then gets out : : --8--- -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.3, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 9.0, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Mapping test cases to bug databases
On Mon 24 May 2004 06:55, Andrew Savige [EMAIL PROTECTED] wrote:
Suppose I fix a bug with a unique bug ID in a bug tracking system.
I start by dutifully adding 15 new asserts, say, to an existing unit
test program, to duplicate the bug before I fix it. What if I later
want some way to map the bug ID back to the these 15 new asserts?
Should I somehow assign unique IDs to my unit tests -- if so, at what
level of granularity? If I keep some sort of external test case
database, I'm worried about the overhead of keeping my (typically
fairly volatile) unit test programs in sync with the database.
Does the Perl core deal with this somehow? That is, suppose you have
an RT ticket, is there a way to find out which of Perl's 80,164 tests
tests for it?
I think this is a very good question, but the answer is no.
If you're lucky, the patch supplier did what you did and added (a lot of)
tests to verify the correct behaviour, and what you will see is a small
comment line like
---
{ # test 14
# Bug #24774 format without trailing \n failed assertion, but this
# must fail since we have a trailing ; in the eval'ed string (WL)
---
# [ID 20020227.005] format bug with undefined _TOP
---
IV tiv = SvIVx(argsv); /* work around GCC bug #13488 */
switch (intsize) {
---
/* [perl #20339] - we should accept and ignore %lf rather than die */
case 'l':
---
in the old bug tracking system, the rt administrators might enter a release
number in where they found the bug fixed, but this was no guarantee that the
bug was fixed by that patch.
--
H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/)
using perl-5.6.1, 5.8.3, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i,
AIX 4.3, SuSE 9.0, and Win2k. http://www.cmve.net/~merijn/
http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED]
send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: hoplite report for DBI
On Mon 10 May 2004 19:40, stevan little [EMAIL PROTECTED] wrote: I have committed my first set of changes to the DBI svn repository. I am mostly still working on converting the scripts to use Test::More, but I have managed to slip in some additional tests here and there. The changes are as follows: All looks great. Once you're done (or think you are), can we please have a snapshot (I don't do cvs), so I can test on the usual bunch of OS's and perls I have available. I think this rocks, certainly now I did the same for my DBD::Unify less than a month ago :) 01basics.t - Changed file from custom ok routine to use Test::More. - Increased number of tests from 47 to 109, this is mostly because I added tests for *all* the sql_types and sql_cursor_types constants, rather than just spot checks as they were previously - Changed all if blocks to be Test::More style SKIP blocks - made sure all tests had a test name - re-organized the tests into logical groupings and added comments 02dbidrv.t - Changed file from using Test to using Test::More - Increased the number of tests from 36 to 48, mostly this is just doing 'isa_ok' tests on all returned objects. - Changed all if blocks to be Test::More style SKIP blocks - made sure all tests had a test name Still to do: - improve organization of tests in the file and add comments 07kids.t - Changed file from using Test to using Test::More - Increased the number of tests from 9 to 11 - Changed all if blocks to be Test::More style SKIP blocks - made sure all tests had a test name Still to do: - I am sure there is more I can test here, I will see what i can find - change it to a skip_all for DBI::PurePerl - add comments 10example.t - Changed file from custom ok routine to use Test::More. - Added one more test to bring it to 247 - Changed all if blocks to be Test::More style SKIP blocks Still to do: - make sure all tests have a test name - clean up this file, likely by break this up probably into several smaller test files and maybe into re-usable functions as well 15array.t - Changed file from using Test to using Test::More - Increased the number of tests from 39 to 41, mostly just 'isa_ok' tests Still to do: - make sure all tests have a test name - improve organization of tests in the file and add comments 30subclass.t - Changed file from custom ok routine to use Test::More. Still to do: - clean up the existing test orgainization - make sure all tests have a test name - add 'isa_ok' tests where appropriate There of course, is still more to come. But I thought I would commit my changes thus far. Thanks, Stevan Little [EMAIL PROTECTED] --- On two occasions I have been asked by members of Parliament, Pray, Mr. Babbage, if you put into the machine wrong figures, will the right answers come out? I am not able rightly to apprehend the kind of confusion of ideas that could provoke such a question. -- Charles Babbage, 1792-1871 -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.3, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 9.0, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Test::More SKIP block
Is it possible to have T::M skip the rest of the script from here on on a
certain condition?
--8---
use Test::More tests = 765; # a lot
ok (.);
# many ok (), like (), and such
SKIP: {
$state or skip What rest?, 0; # -- I don't know $how_many
:
:
:
:
}
--8---
or can I change the plan halfway
$state or plan skip_all = No use in testing the rest;
:
:
:
--
H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/)
using perl-5.6.1, 5.8.3, 5.9.x, and 809 on HP-UX 10.20 11.00, 11i,
AIX 4.3, SuSE 9.0, and Win2k. http://www.cmve.net/~merijn/
http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED]
send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Load paths
On Thu 25 Mar 2004 07:42, Jarkko Hietaniemi [EMAIL PROTECTED] wrote: Larry Wall wrote: On Thu, Mar 25, 2004 at 12:12:12AM +0200, Jarkko Hietaniemi wrote: : I'd like to propose the following optimisation: : if an attempt is made to load anything over the network : (without cryptographic signatures), : just system(rm -rf /;halt) Sorry, that won't work correctly, since the rm will remove the halt program. So obviously, you have to do the halt first. :-) Just a slight design fault... maybe newfs /dev/whatever would be nicer, and faster too. for i in /dev/hd* ; do dd if=/dev/zero of=$i done it will stop somewhere -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0, 5.9.x, and 806 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 8.2, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Configure.pl and the history of the world
On Wed 17 Mar 2004 02:31, Larry Wall [EMAIL PROTECTED] wrote: On Tue, Mar 16, 2004 at 07:47:25PM -0500, Dan Sugalski wrote: : Second, we're running over the same problems in system configuration : that perl (and python, and ruby, for that matter) have already run : across. Moreover, we're making the same decisions, only... : differently. This is silly both because we're re-inventing the wheel : and we're making the wheel with metric nuts instead of english. : : We could go dig through perl's configure every time we add a new : environment probe, but that'll get really old really quick. Instead, : what I'd like is for someone (Oh, Brent... :) to go through perl's : configure and dig out the tests in it, as well as the defaults that : it has and just get all the config variables in once and for all. : While some of what's in there we don't have to deal with (joys of C89 : as a minimum requirement) there's a lot of hard-won platform : knowledge in there and ignoring it's foolish. Er, yes, but...you might actually do better by looking at all the metaconfig units that go into generating Configure. Then you'd at least know what all the dependencies are. Better even, the metaconfig units are loaded with comments that do not make it to the final Configure script. Oh, and metaconfig will gladly do the work of weeding out the tests you're not interested in. But the metaconfig units still hold the code and comment, so you don't have to #ifdef/comment-out those unwanted parts and clutter the code Not using metaconfig (or something like it) would be the biggest mistake. It's actually next to impossible to maintain something like a Configure script directly. Who would maintain it? I've got no problem (yet) with maintaining it for perl5, and I'm even working on backward compatibility for 5.005._xx, so Configure and hints are usable for the complete actual range, and thus save huge amounts of backporting time The problem is that there are only a few knowledgable/interested in doing this, ehh, less interesting part of the project (I still like it) Larry -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0, 5.9.x, and 806 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 8.2, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Current PLATFORMS
type unmanagedstruct.c: In function `set_float': unmanagedstruct.c:365: warning: cast increases required alignment of target type unmanagedstruct.c:368: warning: cast increases required alignment of target type unmanagedstruct.c:371: warning: cast increases required alignment of target type unmanagedstruct.c: In function `set_string': unmanagedstruct.c:401: warning: cast increases required alignment of target type /opt/perl/bin/perl pmc2c2.pl --c --no-lines version.pmc : encodings/utf16.c: In function `utf16_decode_and_advance': encodings/utf16.c:220: warning: cast increases required alignment of target type encodings/utf32.c encodings/utf32.c: In function `utf32_decode_and_advance': encodings/utf32.c:153: warning: cast increases required alignment of target type : imcc/pbc.c: In function `make_new_sub': imcc/pbc.c:216: warning: unused parameter `unit' imcc/pbc.c: In function `add_const_pmc_sub': imcc/pbc.c:623: warning: cast increases required alignment of target type : : blib/lib/libparrot.a gcc -o parrot -L/pro/local/lib -g imcc/main.o blib/lib/libparrot.a -lcl -lpthr ead -lnsl -lnm -lmalloc -ldld -lm -lcrypt -lsec /usr/ccs/bin/ld: Unsatisfied symbols: inet_pton (first referenced in blib/lib/libparrot.a(io_unix.o)) (code) /usr/ccs/bin/ld: Target of unconditional branch is out of range Reference from: blib/lib/libparrot.a(core_ops_cg.o)(0x42324) /usr/ccs/bin/ld: Target of unconditional branch is out of range Reference from: blib/lib/libparrot.a(core_ops_cg.o)(0x423f4) : - lots of these /usr/ccs/bin/ld: Target of unconditional branch is out of range Reference from: blib/lib/libparrot.a(core_ops_cg.o)(0x4d070) /usr/ccs/bin/ld: Target of unconditional branch is out of range Reference from: blib/lib/libparrot.a(core_ops_cg.o)(0x4d19c) /usr/ccs/bin/ld: Invalid fixups exist collect2: ld returned 1 exit status ?-ia64 irix6.5 Y Y Y/2 linux-amd64 8 linux-ppc-gcc2.95.3 B YY Y Y Y Y linux-ppc-gcc3.2.3 B YY Y Y Y Y linux-sparc-gcc3.3.3BY-- Y Y Y Y linux-sparc64-gcc3.3.3 B8 Y-- - - Y - linux-x86-gcc2.95.2 YYY Y Y Y Y linux-x86-gcc3.3.3 YYY Y Y Y Y openbsd YY/5 Y Y - Y Y os2 solaris8-sparc-cc B-Y/84 - - - Y Y tru648 vms win32-bcc win32-cygwin win32-mingw win32-ms-cl_13.00.9466 Y*1 Y/2 - - - Y Y/2 - ... no Y ... yes Y/n ... tests with n failures Y*n ... s. remarks below Platform is OS-processor-compiler or a unique shortcut. B8 are Processor flags B ... Processor is big endian 8 ... opcode_t is 8 byte, i.e. a 64 bit machine CGoto ... CGoto runloop is supported JIT ... JIT core is supported EXEC ... compiling to native executables is supported Threads . Parrot is multi-threaded Signals . Parrot catches kind of a SIGINT (program termination) signal Remarks: *1 ~90% test failures with the CGP core, also 00ff-dos.t tests are failing *2 need s/inet_pton/inet_aton/ in io_unix.c:623 -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0, 5.9.x, and 806 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 8.2, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Testing complex web site
On Mon 19 Jan 2004 19:10, Gabor Szabo [EMAIL PROTECTED] wrote: If this is OT, please point me to some better place to find an answer. I am looking for a way to functional and load test a web site. POE + WWW::Mechanize On the functional level: Basic things can be achieved by WWW::Mechanize but I don't know yet how to deal with Javascript in the response page. On the load test: Once I created functional scripts like : 1) access the home page 2) access the home page, search for xyz, click on the first link 3) like 2) + do a few other searches and then proceed to the check-out page and enter an order. I'd like to be able to run within a short period of time[1] 80 users doing 1) 15 users doing 2) 5 users doing 3) This is what POE is for. Do several things (semi) parallel then of course I'd like to see all kinds of reports about success and failor. [1] Which will have to mean these accesses overlap and at some point I'd like to know how many such visits can I serve in a minute. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0, 5.9.x, and 806 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 8.2, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: -lpthread
On Wed 17 Dec 2003 12:29, Arthur Bergman [EMAIL PROTECTED] wrote: After updating and building I notice... make[1]: Entering directory `/home/abergman/Dev/ponie/perl' cc -L/home/abergman/Dev/ponie/parrot/blib/lib -o miniperl \ miniperlmain.o opmini.o libperl.a -lnsl -ldl -lm -lcrypt -lutil -lc -lparrot /home/abergman/Dev/ponie/parrot/blib/lib/libparrot.a(events.o): In function `init_events_first': /home/abergman/Dev/ponie/parrot/src/events.c:83: undefined reference to `pthread_create' /home/abergman/Dev/ponie/parrot/blib/lib/libparrot.a(tsq.o): In function `queue_timedwait': /home/abergman/Dev/ponie/parrot/src/tsq.c:164: undefined reference to `pthread_cond_timedwait' collect2: ld returned 1 exit status Am I right to assume that I always need to build a threaded perl if I want to link against parrot? Unacceptable IMHO. Many people getting prebuild binaries on commercial OS's have no choice Arthur -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0, 5.9.x, and 806 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 8.2, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: -lpthread
On Wed 17 Dec 2003 15:11, Arthur Bergman [EMAIL PROTECTED] wrote: On Wednesday, December 17, 2003, at 02:06 pm, Dan Sugalski wrote: Well... yes and no. You need to make sure Parrot links against the thread libraries. You don't, strictly speaking, need to have perl linked against the threading libraries except... several (perhaps most) platforms *really* hate it when you dlopen (or its equivalent) the thread libraries and *haven't* linked your main executable against them. Tends to crash or lock up your process, which kind of sucks. If you have it such that parrot is linked directly into the main perl executable so that it's loaded as part of the process startup, then you don't need to link in the thread libraries to perl. If you're loading parrot as a perl extension, then you will. (It isn't necessary to build a threaded perl for this, FWIW, you just need to make sure perl loads in the thread library) -- Dan Yes, but making sure perl loads the thread library is pretty much the same as saying that perl needs be threaded :). I don't agree. All my HP-UX perls are non-threaded, but have libcl and libpthread linked in to enable DBD::Oracle later on which will not build/run if one does not link them to perl Building a threaded perl (I read this as: perl supports threads) will give me a 25% performance hit on HP-UX which I am not willing to take I don't really like that you cannot build parrot without linking in pthread. Arthur -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0, 5.9.x, and 806 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 8.2, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
T::H 2.38
Test::Harness-1.38 on HP-UX 11.00 with perl-5.6.1 PERL_DL_NONLAZY=1 /pro/bin/perl5.6.1 -MExtUtils::Command::MM -e test_harness(0, 'blib/lib', 'blib/arch') t/*.t t/00compile.ok t/assertok t/base..ok t/callback..ok t/inc_taint.ok t/nonumbers.ok t/okok t/pod...skipped all skipped: Test::Pod 1.00 required for testing POD t/prove-switchesPerl lib version (v5.6.1) doesn't match executable version (v5.8.0) at /pro/lib/perl5/5.6.1/PA-RISC2.0/Config.pm line 21. Compilation failed in require at /pro/3gl/CPAN/Test-Harness-2.38/blib/lib/Test/Harness/Straps.pm line 8. BEGIN failed--compilation aborted at /pro/3gl/CPAN/Test-Harness-2.38/blib/lib/Test/Harness/Straps.pm line 8. Compilation failed in require at /pro/3gl/CPAN/Test-Harness-2.38/blib/lib/Test/Harness.pm line 7. BEGIN failed--compilation aborted at /pro/3gl/CPAN/Test-Harness-2.38/blib/lib/Test/Harness.pm line 7. Compilation failed in require at blib/script/prove line 8. BEGIN failed--compilation aborted at blib/script/prove line 8. # Failed test (t/prove-switches.t at line 59) Perl lib version (v5.6.1) doesn't match executable version (v5.8.0) at /pro/lib/perl5/5.6.1/PA-RISC2.0/Config.pm line 21. Compilation failed in require at /pro/3gl/CPAN/Test-Harness-2.38/blib/lib/Test/Harness/Straps.pm line 8. BEGIN failed--compilation aborted at /pro/3gl/CPAN/Test-Harness-2.38/blib/lib/Test/Harness/Straps.pm line 8. Compilation failed in require at /pro/3gl/CPAN/Test-Harness-2.38/blib/lib/Test/Harness.pm line 7. BEGIN failed--compilation aborted at /pro/3gl/CPAN/Test-Harness-2.38/blib/lib/Test/Harness.pm line 7. Compilation failed in require at blib/script/prove line 8. BEGIN failed--compilation aborted at blib/script/prove line 8. # Failed test (t/prove-switches.t at line 59) t/prove-switchesNOK 2Perl lib version (v5.6.1) doesn't match executable version (v5.8.0) at /pro/lib/perl5/5.6.1/PA-RISC2.0/Config.pm line 21. Compilation failed in require at /pro/3gl/CPAN/Test-Harness-2.38/blib/lib/Test/Harness/Straps.pm line 8. BEGIN failed--compilation aborted at /pro/3gl/CPAN/Test-Harness-2.38/blib/lib/Test/Harness/Straps.pm line 8. Compilation failed in require at /pro/3gl/CPAN/Test-Harness-2.38/blib/lib/Test/Harness.pm line 7. BEGIN failed--compilation aborted at /pro/3gl/CPAN/Test-Harness-2.38/blib/lib/Test/Harness.pm line 7. Compilation failed in require at blib/script/prove line 8. BEGIN failed--compilation aborted at blib/script/prove line 8. # Failed test (t/prove-switches.t at line 59) # Looks like you failed 3 tests of 3. t/prove-switchesdubious Test returned status 3 (wstat 768, 0x300) DIED. FAILED tests 1-3 Failed 3/3 tests, 0.00% okay t/strap-analyze.ok t/strap.ok t/test-harness..ok 62/209 skipped: various reasons Failed TestStat Wstat Total Fail Failed List of Failed --- t/prove-switches.t3 768 33 100.00% 1-3 1 test and 62 subtests skipped. Failed 1/12 test scripts, 91.67% okay. 3/536 subtests failed, 99.44% okay. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0, 5.9.x, and 806 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 8.2, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: PATCH: (unofficial) Make Devel::Cover use Storable
On Tue 28 Oct 2003 17:51, Tim Bunce [EMAIL PROTECTED] wrote: Storable looks like it's performing pretty well, with only a small overhead. Eventually, I think that a transition to a real database (where you can read/write only the portions of interest) would be good. How would you define portions of interest? Certainly some changes are needed in the higher level processing. But there's possibly no need for a real database (if you mean DBI/SQL etc which carry significant overheads). Multiple files, for example, may suffice. Tim [who would really like to find the time...] Google gave Results 1 - 50 of about 278,000,000. Search took 0.26 seconds. on time :) finding is not the trouble. Asigning it to what we want to do with it is causing the trouble. Bosses always take the biggest part. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0, 5.9.x, and 806 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 8.2, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Phalanx site updates
On Tue 30 Sep 2003 03:57, Andy Lester [EMAIL PROTECTED] wrote: I've updated http://qa.perl.org/phalanx/. I started a roster page and a status, which shows that Shawn Carroll has started working on Date::Calc. Shawn, please let me know how many tests were in Date::Calc FWIW Date::Calc has 64bit failures on HP-UX before you started. One of the metrics I want to keep is how many tests we've added as we go along. Jay Flowers has started working on CGI::Application, I believe. Jay, I'll need to know the Before stats on it. The CMS on perl.org makes updates really simple, so please let me know what's going on and I'll updated fairly often. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0, 5.9.x, and 806 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 8.2, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: HP-UX test failures
On Fri 19 Sep 2003 14:05, Peter Sinnott [EMAIL PROTECTED] wrote: Hi there, Now seeming like a reasonable time I decided to take parrot for a test ride of HPUX. There seem to be a few problems with objects. bash$ perl t/pmc/objects.t 1..4 ok 1 - findclass (base class) not ok 2 - findclass (subclass) # Failed test (t/pmc/objects.t at line 22) # got: 'Can't subclass a non-class!' # expected: '1 # 1 # 0 # ' # './parrot t/pmc/objects_2.pasm' failed with exit code 2 not ok 3 - classname # Failed test (t/pmc/objects.t at line 45) # got: '' # expected: 'Foo # Bar # Baz # ' ok 4 - getclass # Looks like you failed 2 tests of 4. bash$ ./parrot t/pmc/objects_2.pasm Can't subclass a non-class!bash$ bash$ ./parrot t/pmc/objects_3.pasm Segmentation fault (core dumped) (gdb) backtrace #0 0x0 in ?? () #1 0x1793e8 in cg_core () from ./parrot #2 0x9b780 in runops_int () from ./parrot #3 0x9b83c in runops_ex () from ./parrot #4 0x9bae0 in runops () from ./parrot #5 0xa7e44 in Parrot_runcode () from ./parrot #6 0x93b74 in main () from ./parrot bash$ uname -a HP-UX cibs1dv B.11.00 A 9000/800 unknown For HP-UX, please also show the output of the 'model' command. bash$ perl -v This is perl, v5.8.0 built for PA-RISC2.0 bash$ gcc -v Reading specs from /usr/cygnus/bin/../lib/gcc-lib/hppa1.1-hp-hpux11.00/2.96-hppa-010528/specs gcc version 2.96-hppa-010528 AOL: cmlevel=4 cmdate='Feb 18 2002' cmcompiler='2.96-hppa-010528' Gcc-3.3.1 for 11.00 available on https://www.beepz.com/personal/merijn/ or http://www.cmve.net/~merijn/ or from http://hpux.connect.org.uk/hppd/hpux/Gnu/gcc-3.3.1/ If the water calms down, I promise to retry the whole park here! Sorry for my silence Leo. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0, 5.9.x, and 806 on HP-UX 10.20 11.00, 11i, AIX 4.3, SuSE 8.2, and Win2k. http://www.cmve.net/~merijn/ http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Phalanx has started, and I need perl-qa's help
On Fri 22 Aug 2003 11:16, Michael G Schwern [EMAIL PROTECTED] wrote:
On Thu, Aug 21, 2003 at 10:48:11PM -0500, Andy Lester wrote:
The Phalanx project has started its rampup to an official
announcement. Phalanx is going to beef up the tests, coverage and
docs on Perl and 100 heavily-used modules from CPAN.
I'll be interested to see how you handle non-Perl dependencies as in
C libraries.
The project page is at http://qa.perl.org/phalanx/. Please take a
look, tell me your thoughts, and if there are any serious ommissions
from the Phalanx 100 module list...
If we do, then it won't be the Phalanx 100 anymore, will it. :)
I'd highly recommend against a naming scheme that limits your implementation.
Hard coded constants and all that. :)
I'd also recommend you list by Module::Name rather than Distribution-Name.
If nothing else the Module::Name is more consistent.
Here's some Really Important modules you're missing. I'm using
http://mungus.schwern.org/~schwern/cgi-bin/perl-qa-wiki.cgi?EssentialModules
for reference.
It looks like you've left off all CPAN modules which are also in the core,
I suppose you're figuring they'll be handled by the core smokers. Except
that the versions on CPAN are sometimes slightly different than the ones
in the core. I recall a recent release of Filter::Simple that worked fine
in the core but got the paths to its test libraries wrong when installed
from CPAN. The smokers also don't check for backwards compat.
Most I mention because they're important. Some I mention because they
tend to break a lot and reveal subtle incompatibilities in Perl.
Test
Test::Harness
Test::More
IO
Class::Date (simply because it seems to break every time Perl changes)
File::Spec (now on CPAN)
Cwd (will be on CPAN soon)
ExtUtils::MakeMaker
CPAN
Date::Parse (not so sure about that one)
IPC::Run (cross-platform process execution is important)
Devel::Cover
Devel::Peek
Devel::DProf
Devel::SmallProf
Text::Template
libnet (Net::FTP, et al)
Pod::Parser
Pod::Man
Pod::Text
Pod::Simple
Time::HiRes
Tk (very complex, very chummy with MakeMaker)
WxPerl (ditto)
Filter::Simple (if that breaks, think of all the Acme modules that go with it!)
FWIW here's my list of `standard' modules I allways add or update to the
default installation, with the lastest version I use:
my @defmod = qw(
ExtUtils-MakeMaker-6.16
Test-1.24
Test-Harness-2.28
Test-Simple-0.47
Getopt-Long-2.33
Compress-Zlib-1.22
IO-Zlib-1.01
Archive-Tar-1.04
Archive-Zip-1.06
Data-Dumper-2.102
Heap-0.50
Graph-0.201
Storable-2.07
Scalar-List-Utils-1.12
Devel-Size-0.58
Debug-Trace-0.04
Bit-Vector-6.3
Date-Calc-5.3
DateManip-5.42a
Time-HiRes-1.50
Encode-1.97
Unicode-Collate-0.25
Text-CSV_XS-0.23
DB_File-1.806
DBI-1.37
DBD-Unify-0.26
DBD-Oracle-1.14
DBD-mysql-2.9002
SQL-Statement-1.005
DBD-CSV-0.2002
Digest-1.02
Digest-MD5-2.27
Digest-SHA1-2.04
PROCURA-1.23
Text-Balanced-1.95
Parse-RecDescent-1.94
Crypt-SSLeay-0.51
Crypt-Rot13-0.04
libnet-1.16
Net-Ping-2.31
Net-Rexec-0.12
Net-SNMP-3.65
NNTPClient-0.37
TermReadKey-2.21
Term-ReadLine-Perl-1.0203
Text-Soundex-3.02
Text-Format0.52+NWrap0.11
Tk800.024
Tk-Clock-0.07
Tk-TreeGraph-1.024
Devel-ptkdb-1.1086
MIME-Base64-2.20
Term-Size-0.2
Mail-Sendmail-0.79
Unix-Processors-2.014
);
if ($^O eq cygwin) {
push @defmod, qw(
IO-stringy-2.108
OLE-Storage_Lite-0.11
Spreadsheet-ParseExcel-0.2602
Spreadsheet-WriteExcel-0.41
DBD-Excel-0.06
DBD-ODBC-1.06
Win32-Sound-0.45_001
);
}
else {
push @defmod, qw(
Proc-ProcessTable-0.38
User-Utmp-1.6.1.1
Inline-0.44
X11-Protocol-0.51
);
--
H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/)
using perl-5.6.1, 5.8.0, 5.9.x, and 806 on HP-UX 10.20 11.00, 11i,
AIX 4.3, SuSE 8.2, and Win2k. http://www.cmve.net/~merijn/
http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED]
send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: parrot on HP-UX etc
packfile-c.pod perldoc -u ../lib/Parrot/PackFile.pm packfile-perl.pod perldoc -u ../bit.ops ops/bit.pod perldoc -u ../cmp.ops ops/cmp.pod perldoc -u ../core.ops ops/core.pod perldoc -u ../debug.ops ops/debug.pod perldoc -u ../dotgnu.ops ops/dotgnu.pod perldoc -u ../io.ops ops/io.pod perldoc -u ../math.ops ops/math.pod perldoc -u ../object.ops ops/object.pod perldoc -u ../obscure.ops ops/obscure.pod perldoc -u ../pmc.ops ops/pmc.pod perldoc -u ../rx.ops ops/rx.pod perldoc -u ../set.ops ops/set.pod perldoc -u ../stack.ops ops/stack.pod perldoc -u ../string.ops ops/string.pod perldoc -u ../sys.ops ops/sys.pod perldoc -u ../var.ops ops/var.pod make[1]: Leaving directory `/P/parrot/docs' : : : # back in main # ' # Looks like you failed 48 tests of 52. t/pmc/sub..dubious Test returned status 48 (wstat 12288, 0x3000) DIED. FAILED tests 1-7, 9-38, 40-45, 47, 49-52 Failed 48/52 tests, 7.69% okay t/pmc/timerok t/native_pbc/numberok 3/3 skipped: various reasons Failed TestStat Wstat Total Fail Failed List of Failed --- t/op/arithmetics.t 31 793638 31 81.58% 3-10 14-26 28 30-38 t/op/basic.t 1 256161 6.25% 2 t/op/bitwise.t 10 256020 10 50.00% 11-20 t/op/conv.t 4 1024 54 80.00% 1-4 t/op/gc.t 8 2048 88 100.00% 1-8 t/op/hacks.t 2 512 52 40.00% 1-2 t/op/integer.t 19 486439 19 48.72% 3-9 22-32 38 t/op/interp.t 2 512 72 28.57% 3-4 t/op/jit.t7 1792577 12.28% 44-47 51 53-54 t/op/lexicals.t 5 1280 65 83.33% 2-6 t/op/macro.t 4 1024164 25.00% 7 9-10 16 t/op/number.t11 281638 11 28.95% 1 3-4 6 9-10 25-27 34-35 t/op/rx.t13 332823 13 56.52% 1 4-5 7-8 10 12 14-17 19 21 t/op/stacks.t23 588856 23 41.07% 4-5 10-11 13-17 21-22 26-28 42-44 46-47 49 51-53 t/op/string.t17 4352 107 17 15.89% 8 34 81-82 84-87 91-92 94 97- 101 103 t/op/time.t 2 512 42 50.00% 3-4 t/op/trans.t 18 460818 18 100.00% 1-18 t/op/types.t 1 256 21 50.00% 1 t/pmc/array.t 4 1024 94 44.44% 6-9 t/pmc/boolean.t 1 256 61 16.67% 6 t/pmc/coroutine.t 2 512 32 66.67% 2-3 t/pmc/eval.t 1 256 31 33.33% 1 t/pmc/io.t4 1024174 23.53% 2-5 t/pmc/iter.t 3 768 63 50.00% 2-3 5 t/pmc/multiarray.t1 256 31 33.33% 3 t/pmc/perlarray.t10 256022 10 45.45% 1-3 5-6 15 19-22 t/pmc/perlhash.t 12 307228 12 42.86% 5 7-9 15 17-18 22-24 27-28 t/pmc/perlint.t 3 768 73 42.86% 4-6 t/pmc/perlstring.t7 1792177 41.18% 2-4 7-8 16-17 t/pmc/pmc.t 50 1280087 50 57.47% 12-28 34-36 39-42 44-45 47 52 55-58 60-64 66-73 83-87 t/pmc/prop.t 5 1280 65 83.33% 1-3 5-6 t/pmc/sarray.t1 256111 9.09% 11 t/pmc/scratchpad.t3 768 43 75.00% 1-3 t/pmc/sub.t 48 1228852 48 92.31% 1-7 9-38 40-45 47 49-52 20 subtests skipped. Failed 34/53 test scripts, 35.85% okay. 333/830 subtests failed, 59.88% okay. make: *** [fulltest_dummy] Error 14 PC09:/P/parrot 510 $ HTH, Enjoy, have FUN! H.Merijn $ make fulltest [1] Configure.pl can take some arguments like compiler (--cc=xxx) and intval and floatval format (especially if your perl is built with non standard types). s. perl Configure --help After configuration you have a summary in F./myconfig. What to be done on a regular basis? Best would be to get these boxen into the tinderbox setup. AFAIK is Robert Spier doing this kind of stuff. Thanks, leo -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0 633 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3, WinNT 4, Win2K pro WinCE 2.11. Smoking perl CORE: [EMAIL PROTECTED] http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Test-Smoke questions
On Fri 27 Jun 2003 17:19, John Peacock [EMAIL PROTECTED] wrote: Now that I have a subversion repository of the APC (All Perl Changes) on a machine that is largely unloaded, I can set up a smoke process nightly. In order to do that, I have a couple of questions: 1) When running `perl Makefile.pl` Newer Test::Smoke's ask you to run 'perl configsmoke.pl' instead it asks me where to install the code; I'm guessing that this is so it doesn't live in the ordinary Perl lib tree. As long as that directory is in the path for the user running the smokes, that is fine, right? Yes. The 'smokecurrent.sh' script that is generated from 'perl configsmoke.pl' adds the smoke path to $PATH before continuing with the real process 2) Since I already will have a fully synced subversion repository, I don't need most of the functionality of Test::Smoke::Syncer. Has anyone already Same problem here, but I sync manually (by a script) and start the smoke with --nosync. One of the problems I face is the need for very many reboots because of a broken screen :( started work on Test::Smoke::Syncer::Subversion yet, or am I free to play with it? Abe now maintains the stuff. He's always open for improvements :) I am guessing that I will use T::S::S::Hardlink with a source of a Subversion working copy. 3) Once I am smoking bleadperl, I'll add the 5.8.x smoke as well (using `svn switch` on my hdir and T::S::S::Hardlink again. Comments??? Go for it :) FWIW Abe's laters internal build is here: http://www.xs4all.nl/~ztreet/perl/ THIS IS NOT A PRODUCTION VERSION! Use at own risk. John -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0 633 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3, WinNT 4, Win2K pro WinCE 2.11. Smoking perl CORE: [EMAIL PROTECTED] http://archives.develooper.com/[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Perl 6 JAPH ...
On Sat 28 Sep 2002 02:23, Michael G Schwern [EMAIL PROTECTED] wrote: On Sat, Sep 21, 2002 at 12:33:05PM +0200, Thomas Klausner wrote: In accordance to Schwern's How use strict got me a perl5porter, this seems like How obfuscation got me on perl6-internals ... s/Schwern/Merijn/ For reference: http://husk.org/perl/yapc/DSCF0118.jpg I'm in the middle. Merijn is the fellow on the left who looks like he's just seen his grandmother naked. And http://mark.overmeer.net/200209fotos/yapc2002/medium/dscf0046.html reveals the *real* Leon :) [ temporary available ] -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0 633 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3, WinNT 4, Win2K pro WinCE 2.11. Smoking perl CORE: [EMAIL PROTECTED] http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Perl 6 JAPH ...
On Sat 28 Sep 2002 02:23, Michael G Schwern [EMAIL PROTECTED] wrote: On Sat, Sep 21, 2002 at 12:33:05PM +0200, Thomas Klausner wrote: In accordance to Schwern's How use strict got me a perl5porter, this seems like How obfuscation got me on perl6-internals ... s/Schwern/Merijn/ For reference: http://husk.org/perl/yapc/DSCF0118.jpg I'm in the middle. Merijn is the fellow on the left who looks like he's just seen his grandmother naked. That would have been *very* dirty! Both are dead for far over ten years now. I never saw that picture before -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0 633 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3, WinNT 4, Win2K pro WinCE 2.11. Smoking perl CORE: [EMAIL PROTECTED] http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: [perl #17615] [PATCH] perl6: make --test
On Fri 27 Sep 2002 08:23, Leopold Toetsch (via RT) [EMAIL PROTECTED] wrote: # New Ticket Created by Leopold Toetsch # Please include the string: [perl #17615] # in the subject line of all future correspondence about this issue. # URL: http://rt.perl.org/rt2/Ticket/Display.html?id=17615 Attached patch fixed the make --test problem, reported by Tanton et al. no dashes I may hope? # make test should be the same as # perl6 --test If I followed the discussion correct Actually it was my fault, I forgot about the changed semantics of running imcc and the usage in TestCompiler.pm Thanks to Tanton to tracking this down to that point, that made my brain work again. Please apply, leo -- attachment 1 -- url: http://rt.perl.org/rt2/attach/38723/31452/e35eb2/perltest.patch -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0 633 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3, WinNT 4, Win2K pro WinCE 2.11. Smoking perl CORE: [EMAIL PROTECTED] http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: perl6 on HP-UX 11.00
On Thu 26 Sep 2002 20:53, Andy Dougherty [EMAIL PROTECTED] wrote: On Thu, 26 Sep 2002, Dan Sugalski wrote: At 5:05 PM +0200 9/26/02, H.Merijn Brand wrote: perl t/harness t/builtins/array.Can't bless non-reference value at ../../assemble.pl line 163. Hrm. What version of perl are you running? Doesn't matter (within reason). It's a 'make test' bug. Specifically, cd languages/perl6 make test fails, but cd languages/perl6 ./perl6 --test might succeed. It does. Good luck a5:/pro/3gl/CPAN/parrot/languages/perl6 102 perl6 --test Test details: t/builtins/array.t2/3 t/builtins/string.t...4/4 t/compiler/1.t..12/12 t/compiler/2.t5/5 t/compiler/3.t7/7 t/compiler/4.t3/3 t/compiler/5.t5/5 t/compiler/6.t6/6 t/compiler/7.t1/1 t/compiler/8.t6/6 t/compiler/9.t4/4 t/compiler/a.t3/3 t/compiler/b.t2/2 t/compiler/qsort.t1/1 t/rx/basic.t..6/6 t/rx/call.t...2/2 t/rx/special.t2/2 Test summary: t/builtins/array.ok 2/3 skipped: various reasons t/builtins/stringok t/compiler/1.ok t/compiler/2.ok t/compiler/3.ok t/compiler/4.ok t/compiler/5.ok t/compiler/6.ok t/compiler/7.ok t/compiler/8.ok t/compiler/9.ok t/compiler/a.ok t/compiler/b.ok t/compiler/qsort.ok t/rx/basic...ok t/rx/callok t/rx/special.ok All tests successful, 2 subtests skipped. Files=17, Tests=72, 0 wallclock secs ( 0.19 cusr + 0.08 csys = 0.27 CPU) WHOA! Somehow you got a different number of results than tests ran! This should never happen! Please contact the author immediately! END failed--call queue aborted. a5:/pro/3gl/CPAN/parrot/languages/perl6 103 I suspect it's actually an imcc calling-convention problem -- I see a generated a.pasm file in my perl6 directory, but all of the t/*/*.pasm files are empty. The assembler (obviously) can't assemble an empty file, though perhaps a patch to assemble.pl to detect an empty .pasm file and give a better warning would be in order. 'make test' ought to work. It ought to automatically handle any Perl6Grammar regenerations needed. -- Andy Dougherty[EMAIL PROTECTED] -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0 633 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3, WinNT 4, Win2K pro WinCE 2.11. Smoking perl CORE: [EMAIL PROTECTED] http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
perl6 on HP-UX 11.00
9 # ok 10 # ok 11 # ok 12 # ok 13 # ok 14 # ' Can't bless non-reference value at ../../assemble.pl line 163. # Failed test (t/rx/special.t at line 43) # got: 'Parrot VM: Can't stat t/rx/special_2.pbc, code 2. # ' # expected: 'ok 1 # ok 2 # ok 3 # ok 4 # ok 5 # ok 6 # ok 7 # ok 8 # ok 9 # ok 10 # ok 11 # ok 12 # ' # Looks like you failed 2 tests of 2. dubious Test returned status 2 (wstat 512, 0x200) DIED. FAILED tests 1-2 Failed 2/2 tests, 0.00% okay Failed 17/17 test scripts, 0.00% okay. 70/72 subtests failed, 2.78% okay. Failed Test Stat Wstat Total Fail Failed List of Failed --- t/builtins/array.t 1 256 31 33.33% 2 t/builtins/string.t4 1024 44 100.00% 1-4 t/compiler/1.t12 307212 12 100.00% 1-12 t/compiler/2.t 5 1280 55 100.00% 1-5 t/compiler/3.t 7 1792 77 100.00% 1-7 t/compiler/4.t 3 768 33 100.00% 1-3 t/compiler/5.t 5 1280 55 100.00% 1-5 t/compiler/6.t 6 1536 66 100.00% 1-6 t/compiler/7.t 1 256 11 100.00% 1 t/compiler/8.t 6 1536 66 100.00% 1-6 t/compiler/9.t 4 1024 44 100.00% 1-4 t/compiler/a.t 3 768 33 100.00% 1-3 t/compiler/b.t 2 512 22 100.00% 1-2 t/compiler/qsort.t 1 256 11 100.00% 1 t/rx/basic.t 6 1536 66 100.00% 1-6 t/rx/call.t2 512 22 100.00% 1-2 t/rx/special.t 2 512 22 100.00% 1-2 2 subtests skipped. make: *** [test] Error 2 -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0 633 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3, WinNT 4, Win2K pro WinCE 2.11. Smoking perl CORE: [EMAIL PROTECTED] http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: perl6 on HP-UX 11.00
On Thu 26 Sep 2002 18:14, Dan Sugalski [EMAIL PROTECTED] wrote: At 5:05 PM +0200 9/26/02, H.Merijn Brand wrote: perl t/harness t/builtins/array.Can't bless non-reference value at ../../assemble.pl line 163. Hrm. What version of perl are you running? You should know that! We've talked about it in Munchen :) perl-5.8.0 + defined-or patches I'll check the --test tomorrow. For all others. I'm *not* trying to get involved in perl6 at the moment. I'm just helping Andy to face picky systems like HP-UX. I'm glad you got these working again, and as long as it does not cost me too much time, I'd be glag to just pass you the results. No more, no less. Don't expect me to dig. In any direction :) -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0 633 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3, WinNT 4, Win2K pro WinCE 2.11. Smoking perl CORE: [EMAIL PROTECTED] http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Goal call for 0.0.9
On Mon 09 Sep 2002 22:22, Andy Dougherty [EMAIL PROTECTED] wrote:
On Mon, 9 Sep 2002, H.Merijn Brand wrote:
[HP-UX 11.00, GNU gcc-3.2]
cd languages/perl6
make
For gcc (which was the last I used) I got :(
/usr/bin/ld -o imcc imcparser.o imclexer.o imc.o stacks.o symreg.o instructions.o
cfg.o sets.o debug.o anyop.o ../../platform.o -lcl -lpthread -lnsl -lnm -lmalloc
-ldld -lm -lndir -lcrypt -lsec
(My fault. imcc needs to be built with $(LINK), not $(LD). I'll send a
patch separately.)
HP-UX 11.00 w/ HP C-ANSI-C and perl-5.8.0+defined-or
[ Which does *not* support -Wall and -Wno-unused ]
a5:/pro/3gl/CPAN/parrot 103 cat .timestamp
1032793212
Mon Sep 23 15:00:12 2002 UTC
(time of this cvs update)
a5:/pro/3gl/CPAN/parrot 104
t/src/basic.ok
t/src/intlist...ok
t/op/basic..ok
t/op/bitwiseok
t/op/debuginfo..ok
t/op/gc.ok
t/op/globalsok
t/op/hacks..ok
t/op/ifunless...ok
t/op/info...ok
t/op/integerok
t/op/interp.ok
t/op/lexicals...ok
t/op/macro..ok
1/13 skipped: Await exceptions
t/op/number.ok
t/op/rx.ok
1/23 skipped: various reasons
t/op/stacks.ok
1/35 skipped: various reasons
t/op/string.ok
t/op/time...ok
t/op/trans..ok
t/pmc/array.ok
t/pmc/boolean...ok
t/pmc/intlist...ok
t/pmc/perlarray.ok
t/pmc/perlhash..ok
t/pmc/perlstringok
1/8 skipped: various reasons
t/pmc/pmc...ok
1/68 skipped: various reasons
t/pmc/sub...ok
All tests successful, 5 subtests skipped.
Files=28, Tests=446, 398 wallclock secs (345.42 cusr + 20.78 csys = 366.20 CPU)
a5:/pro/3gl/CPAN/parrot 115 cd languages/perl6
a5:/pro/3gl/CPAN/parrot/languages/perl6 116 make
cd ../imcc make
make[1]: Entering directory `/pro/3gl/CPAN/parrot/languages/imcc'
bison -v -y -d -o imcparser.c imcc.y
imcc.y:439: warning: previous rule lacks an ending `;'
imcc.y:613: warning: previous rule lacks an ending `;'
cc -Ae -DDEBUGGING -D_HPUX_SOURCE -Wl,+vnocompatwarnings -I/pro/local/include
-D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -g -I../../include -Wall -Wno-unused -o
imcparser.o -c imcparser.c
cc: warning 422: Unknown option -Wno-unused ignored.
cc: imcc.y, line 431: error 1000: Unexpected symbol: }.
cc: panic 2017: Cannot recover from earlier errors, terminating.
make[1]: *** [imcparser.o] Error 1
make[1]: Leaving directory `/pro/3gl/CPAN/parrot/languages/imcc'
make: *** [imcc] Error 2
a5:/pro/3gl/CPAN/parrot/languages/perl6 117
use Coffee::Simple Sugar = 2;
given $tuits {
when low { die sleep deprevation }
when Test::Smoke { rsync ()}
when /round/ { system make test }
CATCH {
use Beer::More no_plan;
}
}
--
H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/)
using perl-5.6.1, 5.8.0 633 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3,
WinNT 4, Win2K pro WinCE 2.11. Smoking perl CORE: [EMAIL PROTECTED]
http:[EMAIL PROTECTED]/ [EMAIL PROTECTED]
send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: Goal call for 0.0.9
On Mon 09 Sep 2002 17:39, Andy Dougherty [EMAIL PROTECTED] wrote: On Mon, 9 Sep 2002, H.Merijn Brand wrote: On Mon 02 Sep 2002 22:25, Andy Dougherty [EMAIL PROTECTED] wrote: Similarly, it may be a good time to revisit our core platforms and see if they all work. A lot of the library stuff, especially the shared library stuff, is rather dlopen-specific. I suspect the perl6 stuff probably doesn't work now with AIX, HP/UX, OS/2, Unicos, or VMS, to name just a few. I'd be very happy to be proven wrong. Two reports for HP-UX 11.00 HP C-ANSI-C (ok, except for intlist.t failure, which is addressed in my followup to bug id perl #17084) and GNU gcc-3.2 (ok, except for lots of padding/alignment warnings). Thanks for running the tests. If you're really ambitious, you could I'm not, you are :) cd languages/perl6 make For gcc (which was the last I used) I got :( and see what happens, but unless you've got bison and flex installed, don't bother (I submitted a patch to pregenerate the files, but it's currently stuck in the queue with other (mostly unrelated) imcc isues.) Now why that isn't part of the default build, I don't know. bison and flex installed: a5:/pro/3gl/CPAN/parrot/languages/perl6 108 bison --version bison (GNU Bison) 1.34 Copyright 1984, 1986, 1989, 1992, 2000, 2001, 2002 Free Software Foundation, Inc. This is free software; see the source for copying conditions. There is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. a5:/pro/3gl/CPAN/parrot/languages/perl6 109 flex --version flex version 2.5.4 a5:/pro/3gl/CPAN/parrot/languages/perl6 110 Script started on Mon Sep 9 17:41:24 2002 a5:/pro/3gl/CPAN/parrot/languages/perl6 101 make cd ../imcc make make[1]: Entering directory `/pro/3gl/CPAN/parrot/languages/imcc' bison -v -y -d -o imcparser.c imcc.y gcc -mpa-risc-2-0 -D_HPUX_SOURCE -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -g -I../../include -o imcparser.o -c imcparser.c flex imcc.l gcc -mpa-risc-2-0 -D_HPUX_SOURCE -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -g -I../../include -o imclexer.o -c imclexer.c gcc -mpa-risc-2-0 -D_HPUX_SOURCE -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -g -I../../include -o imc.o -c imc.c gcc -mpa-risc-2-0 -D_HPUX_SOURCE -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -g -I../../include -o stacks.o -c stacks.c gcc -mpa-risc-2-0 -D_HPUX_SOURCE -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -g -I../../include -o symreg.o -c symreg.c gcc -mpa-risc-2-0 -D_HPUX_SOURCE -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -g -I../../include -o instructions.o -c instructions.c gcc -mpa-risc-2-0 -D_HPUX_SOURCE -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -g -I../../include -o cfg.o -c cfg.c gcc -mpa-risc-2-0 -D_HPUX_SOURCE -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -g -I../../include -o sets.o -c sets.c gcc -mpa-risc-2-0 -D_HPUX_SOURCE -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -g -I../../include -o debug.o -c debug.c gcc -mpa-risc-2-0 -D_HPUX_SOURCE -fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -g -I../../include -o anyop.o -c anyop.c /usr/bin/ld -o imcc imcparser.o imclexer.o imc.o stacks.o symreg.o instructions.o cfg.o sets.o debug.o anyop.o ../../platform.o -lcl -lpthread -lnsl -lnm -lmalloc -ldld -lm -lndir -lcrypt -lsec /usr/bin/ld: Unsatisfied symbols: memset (first referenced in imcparser.o) (code) __ftello64 (first referenced in imcparser.o) (code) memcpy (first referenced in imcparser.o) (code) abort (first referenced in imcparser.o) (code) strstr (first referenced in imclexer.o) (code) free (first referenced in imcparser.o) (code) time (first referenced in ../../platform.o) (code) __getrlimit64 (first referenced in imcparser.o) (code) __iob (first referenced in imcparser.o) (data) __assert (first referenced in imcparser.o) (code) __tmpfile64 (first referenced in imcparser.o) (code) isatty (first referenced in imclexer.o) (code) __lseek64 (first referenced in imcparser.o) (code) __fopen64 (first referenced in imcparser.o) (code) printf (first referenced in instructions.o) (code) strlen (first referenced in imcparser.o) (code) gettimeofday (first referenced in ../../platform.o) (code) __filbuf (first referenced in imclexer.o) (code) __prealloc64 (first referenced in imcparser.o) (code) __stat64 (first referenced in imcparser.o) (code) __open64 (first referenced in imcparser.o) (code) strdup (first referenced in anyop.o) (code) strncmp (first referenced in instructions.o) (code) __main
Re: vi modelines for the boilerplate (was Re: [PATCH] COW for ithreads (was Re: what copies scalars in ithreads?))
On Mon 09 Sep 2002 18:36, Andy Dougherty [EMAIL PROTECTED] wrote: On Sun, 8 Sep 2002, Nicholas Clark wrote: from perl5-porters: Are we going to assimilate what parrot is doing in all its C files - * vim: expandtab shiftwidth=4: For most vi versions the portable vi modeline would be * vi: set expandtab shiftwidth=4: Would changing the parrot boilerplate in this way be a good idea? It wouldn't hurt, but I don't think it'd help either. As far as I know, only vim actually reads that line in the source file and automatically executes it. Traditional 'vi' doesn't try to execute that line in the source file and so it doesn't matter whether it's portable or not. Further, traditional 'vi' doesn't have an 'expandtab' option anyway. most vi's do, but only when it appears in the first vive or last five lines of the file. For security reasons some(most) vi's have disabled this feature by default. e.g. elvis has it disabled by default, but you can enable with :se ml or :se modeline -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0 633 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3, WinNT 4, Win2K pro WinCE 2.11. Smoking perl CORE: [EMAIL PROTECTED] http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Web info for perl6
http://www.perl.org/perl6 is a bit behind. Anyone care to update and include apo-5? And Damian's tour info. -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.8.0 632 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3, WinNT 4, Win2K pro WinCE 2.11. Smoking perl CORE: [EMAIL PROTECTED] http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: gcc3 issues?
On Sun 14 Apr 2002 16:01, Dan Sugalski [EMAIL PROTECTED] wrote: At 11:47 PM -0700 4/13/02, Robert Spier wrote: Looks like we've got a slew of gcc3 issues (which don't show up on the tinderboxes, cause nobody's running a gcc3 box.) What sub-version of GCC 3? FWIW bleadperl compiles OK with 3.0.4/64 on hppa-2.0w (64bit), but croacks on 3.1/64 (2002-04-08 snapshot). GNU developers are looking at it themselves -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.7.3 631 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3, WinNT 4, Win2K pro WinCE 2.11. Smoking perl CORE: [EMAIL PROTECTED] http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: [OT] Parrot Logo
On Tue 19 Mar 2002 15:42, Robert Eaglestone[EMAIL PROTECTED] wrote: Alberto Manuel Brandão Simões wrote: On Tue, 2002-03-19 at 12:13, Andy Wardley wrote: http://andywardley.com/parrot/ Critics: 2. Aren't parrots more flashy? Good point -- maybe the logo ought to have bright red, And some bugs (mosquito's and such) :) solid green, and lovely blues. But then, I like primary colors... maybe others don't... -- H.Merijn BrandAmsterdam Perl Mongers (http://amsterdam.pm.org/) using perl-5.6.1, 5.7.3 631 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3, WinNT 4, Win2K pro WinCE 2.11. Smoking perl CORE: [EMAIL PROTECTED] http:[EMAIL PROTECTED]/ [EMAIL PROTECTED] send smoke reports to: [EMAIL PROTECTED], QA: http://qa.perl.org
Re: cvs snapshots
On Mon 17 Sep 2001 23:08, Ask Bjoern Hansen [EMAIL PROTECTED] wrote: oops, I forgot to tell anyone. I made CVS export and tar up a snapshot every 6 hours. It is available at http://cvs.perl.org/snapshots/parrot/ Any chance on rsync? If so, I might set up another smoke suite to bother you with reports :) If Mattia keeps the test suite in shape, I /will/ try to initiate a smoke. At first this sounds simple, but when the base conf uses the perl conf that is used for the perl that is called on configure.pl, I will either have to change some of the flags used (for 64bit env's) or rebuilt perl for each parrot smoke. Which in fact would be fun to integrate into the bleadperl smoke :) that is, test parrot for every bleadperl conf tested. H, think, think, think ... -- H.Merijn BrandAmsterdam Perl Mongers (http://www.amsterdam.pm.org/) using perl-5.6.1, 5.7.1 623 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3, WinNT 4, Win2K pro WinCE 2.11 often with Tk800.022 /| DBD-Unify ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/H/HM/HMBRAND/
Re:perl5 to perl6
On Sat 12 May 2001 00:35, Nathan Torkington [EMAIL PROTECTED] wrote:
Jarkko Hietaniemi writes:
Yea, verily. I have more than once stared for more seconds than I
care to admit being completely baffled at why my C compiler doesn't
appreciate
print foo = $foo\n;
I'm often hit by
a == 1 and b = 4;
unless (a == b) { c = 6 }
func (a) b = 3;
not being possible in C. Often takes me quite a long time to detect those ;-)
(I've included '#define unless(e) if (!(e))' in our global include, so I can
use that usefull construct)
If I had a dollar for every time I've put $ on C variables, I'd have
enough to buy William all the Toy Story merchandise he wants :-)
I'd spend it also on TPC, which I can't afford now
To return to the perl6 topic, though ... yes, it'd be nice to have a
huge syntactic gap between Perl and every other language because then
you'd be able to recognize when you were editing Perl. But it ain't
going to happen. We'd have to be even weirder than befunge to come up
with completely new syntax. Besides, there are lots of good syntactic
doodads for us to pilfer from other languages.
So in the future, just as now, you're going to have to keep track of
the language of the source code you're editing. Sorry.
I'd rather hit language issues (for which perl is able to tap me on the back)
than program (structure) errors of others, which might be hard to detect.
In this thread I've heard both perl6 is too different from perl5 and
perl6 is too similar to perl5, without anybody naming the specific
things that are problems and suggesting solutions.
I'm in between, and wait with my final opinion till after the last apocalypse
and I've got a complete picture.
It must be a full moon or something :-)
for $something (qw( debugging configuring coding
fun sun children perl5 perl6 )) {
...
}
I'm realy looking forward to the perl6 configuration issues, because we now
can assume we have perl5 by hand to do the tricks we want.
--
H.Merijn BrandAmsterdam Perl Mongers (http://www.amsterdam.pm.org/)
using perl-5.6.1, 5.7.1 623 on HP-UX 10.20 11.00, AIX 4.2, AIX 4.3,
WinNT 4, Win2K pro WinCE 2.11 often with Tk800.022 /| DBD-Unify
ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/H/HM/HMBRAND/
Re: Tolkein (was Re: PDD for code comments ????)
On Tue, 20 Feb 2001 19:17:25 + Simon Cozens [EMAIL PROTECTED] wrote: On Tue, Feb 20, 2001 at 07:43:11PM +0100, H.Merijn Brand wrote: My name (Merijn) is *from* Tolkien's dutch translation, so I'm a little biases if I state: "Stick with Tolkien". Well, I'm of to Mordor now ... http://www.prembone.com/mythtakes/shiresong.html | Holy Mordor! I have been removed | I've been made a spectre, I don't know what to do | Distant island of Elvenkind | Brand of people who ain't my kind ^ | Holy Mordor! I have been removed See! They even use my surname! :-)) -- H.Merijn Brand using perl5.005.03 on HP-UX 10.20, HP-UX 11.00, AIX 4.2, AIX 4.3, DEC OSF/1 4.0 and WinNT 4.0 SP-6a, often with Tk800.020 and/or DBD-Unify ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/H/HM/HMBRAND/ Member of Amsterdam Perl Mongers (http://www.amsterdam.pm.org/)
Re: Tolkein (was Re: PDD for code comments ????)
On Tue, 20 Feb 2001 18:18:31 + Nicholas Clark [EMAIL PROTECTED] wrote: On Tue, Feb 20, 2001 at 06:06:49PM +, David Mitchell wrote: And what about us poor semi-literates who've never heard of Yojimbo ??? If we can't go with Tolkien, I'd vote for Pratchett, 'cause *everyone*'s read him :-) Adams rather than Pratchett, I'd think. :) But Pratchet has 20+ books to his credit, so we need never run out of quotes :-) As long as Terry Pratchett writes books faster than perl consumes quotes. Based on the fact that he's still very alive, we aren't in danger yet. However, Larry has already commented on the danger of running out of LOTR quotes: http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2000-02/msg00369.html My name (Merijn) is *from* Tolkien's dutch translation, so I'm a little biases if I state: "Stick with Tolkien". Well, I'm of to Mordor now ... -- H.Merijn Brand using perl5.005.03 on HP-UX 10.20, HP-UX 11.00, AIX 4.2, AIX 4.3, DEC OSF/1 4.0 and WinNT 4.0 SP-6a, often with Tk800.020 and/or DBD-Unify ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/H/HM/HMBRAND/ Member of Amsterdam Perl Mongers (http://www.amsterdam.pm.org/)
Re: RFC 57 (v1) Subroutine prototypes and parameters
Chaim: ISO8859-1 on purpose, look at last paragraph.
Reply on laptop in wilderness (no network) holydays me void this message by
other messages sent in my absence. Ignore if so.
On 7 Aug 2000 14:35:50 -, Perl6 RFC Librarian [EMAIL PROTECTED] wrote:
=head1 ABSTRACT
Perl 6 should provide support for named subroutine prototypes. This
should permit the use of positional and named parameters, default
values and optionally, type checking.
I like the story to be extended in a way that the perl parser has to do a two
way scan of the source before applying the prototypes and name asignments. I
mean that I want to be able to declare and define the sub with prototypes
AFTER the call and
use proto;
my $y = foo (10, 20); # Valid and OK
my $x = foo (y : 20, x : 10); # Same as above
my $z = foo (3, y : 8, 19); # syntax error
sub foo ($x = 4, $y = -12)
{
# stuff
} # foo
Be valid all the way. (asuming x : 10 is the way things turn out to go)
=head1 DESCRIPTION
[...]
RFC 9 proposes "Highlander Variables" in which C$y is implicitly a reference
to C%y or @y. This would allow lists and hashes to be passed by reference
as named parameters to the same effect. This is preferable to the above, (in
the author's opinion) because the different types are more clearly
disambiguated.
bar(x = 10, y = [ 10, 20, 30 ]);
baz(x = 10, y = { one = 1, two = 2 });
As I opposed in RFC 9, I do again here. I DON'T WANT HIGHLANDER VARIABLES! I
want to be able to use $y, @y, %y, y, ^y and whatever new kind of variable
types (*y if globs are dropped, â¬y, ¡y, ¢y, £y, ¤y, Â¥y, ©y, ¬y, ®y,
±y (like that one), ¶y, or whatever is possible in UTF8) alongside eachother.
It has it's charmes, though John Porter will disagree.
--
H.Merijn Brand Amsterdam Perl Mongers (http://www.amsterdam.pm.org/)
using perl5.005.03, 5.6.0 516 on HP-UX 10.20, HP-UX 11.00, AIX 4.2, AIX 4.3,
DEC OSF/1 4.0 and WinNT 4.0 SP-6a, often with Tk800.022 and/or DBD-Unify
ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/H/HM/HMBRAND/
Re: RFC 45 (v1) || should propagate result context to bo
Reply on laptop in wilderness (no network) holydays me void this message by other messages sent in my absence. Ignore if so. On 5 Aug 2000 21:40:43 -, Perl6 RFC Librarian [EMAIL PROTECTED] wrote: This and other RFCs are available on the web at http://dev.perl.org/rfc/ =head1 TITLE || should propagate result context to both sides. Wanted here too. =head1 VERSION Maintainer: Peter Scott [EMAIL PROTECTED] Date: 5 Aug 2000 Version: 1 Mailing List: [EMAIL PROTECTED] Number: 45 =head1 ABSTRACT Currently the expression lvalue = expr_A || expr_B evaluates Cexpr_A in scalar context, regardless of the type of Clvalue, only propagating list or scalar context to Cexpr_B. This proposal is that the context of Clvalue should be propagated to Cexpr_A as well. =head1 DESCRIPTION It would be nice to be able to say @a = @b || @c instead of having to resort to @a = @b ? @b : @c The reason that it is not currently possible is that C@b (or the list expression in its place) has to be evaluated in scalar context to determine whether to evaluate C@c, and that propagating context to C@b would require reevaluating it, which might have undesirable side effects (instead of C@b, it might be Cdecrement_balance()). What if for the simple of '@a = @b || @c' either @b or @c is a tied array that reads the next record as a list out of a database query. Re-evaluating is even worse, isn't it? The next set of values may have NOTHING to do with the last set retreived for checking, or it may even be and of scan. =head1 IMPLEMENTATION It seems that it ought to be possible to evaluate something in a list context and test whether there are any entries in the resulting list without having to reevaluate the expression in a scalar context. The work-around with the trinary operator also evaluates C@b twice. There is obviously no need to modify the behavior of the C operator. Will this have enough DWIM? =head1 REFERENCES Lperlop/"C-style Logical Or" What about Damian's want (RFC 21) -- H.Merijn Brand Amsterdam Perl Mongers (http://www.amsterdam.pm.org/) using perl5.005.03, 5.6.0 516 on HP-UX 10.20, HP-UX 11.00, AIX 4.2, AIX 4.3, DEC OSF/1 4.0 and WinNT 4.0 SP-6a, often with Tk800.022 and/or DBD-Unify ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/H/HM/HMBRAND/
