Re: Test::Smoke::Database

2003-02-10 Thread Abe Timmerman
Op een zonnige winterdag (Monday 10 February 2003 19:17), schreef alian:

 The uploaded file

  Test-Smoke-Database-1.5.tar.gz

 has entered CPAN as

file: $CPAN/authors/id/A/AL/ALIAN/Test-Smoke-Database-1.5.tar.gz
size: 28921 bytes

Great! It is getting better all the the time. Thanks!

 Idea / comment welcome.

Just one knit: The new 1.16_15+ reports with locale (6 columns) are not parsed 
correctly :-(

 http://www.alianwebserver.com/perl/smoke/smoke_db.cgi?last=1smoke=18680#2614

good luck,

Abe
-- 
Amsterdam Perl Mongers http://amsterdam.pm.org
perl -wle '%_=qw(Just Just another Perl Perl another hacker hacker); print 
join ,map$_{$_}=sort keys%_'




Re: Trouble with Test-Smoke-1.16 and Borland (Was: Fetching the reports from nntp.perl.org)

2002-10-24 Thread Abe Timmerman
Op een mooie herfstdag (Thursday 24 October 2002 19:01), schreef Alain BARBET:

 After some tests with Borland:
 An extra line in smoke.mk in CFG_VARS is created empty.
 Something like:

 CFG_VARS
 =
   \
   ~   \
   osvers=4.0NTSP5 ~   \
   config_args=-Dusedevel  ~   \
 
 Line with only ~ \ will later cause trouble when created config.h

Okay this means ARGV has empty or undef items in it :-(
Looking at smokew32.bat this is possible for non GCC, my bad!

I would like some feedback on the posibility to set ccversion instead of 
gccversion. To test this, I would like you change the call to mktest.pl 
(from smokew32.bat). Remove the %GCC_VERSION% argument and change it to 
something like:

ccversion=BCC5.5

(or whatever looks good to you)

I am sorry to not be able to give you a patch. This is something I can't test, 
and I depend on your feedback to fix this.

I will apply something like your patch to the current source, so it will be in 
1.17 (but I'd like some more feedback on the Borland platform)

Thanks for your trouble and input!

good luck,

Abe
-- 
Amsterdam Perl Mongers http://amsterdam.pm.org
perl -wle '%_=qw(Just Just another Perl Perl another hacker hacker); print 
join ,map$_{$_}=sort keys%_'




Re: Fetching the reports from nntp.perl.org

2002-10-23 Thread Abe Timmerman
Op een mooie herfstdag (Wednesday 23 October 2002 21:43), schreef Alain 
BARBET:

 Abe Timmerman wrote:
  It took some time as the daytime job drained my energy :-(

 Sorry to not reply more quickly to your mail. Thanks to take time for
 the perl smoke database 
 but:
 - I've made three days after my request to you the program I want.
 - When I see your mail, I take times to look at them, but I've some
 problem with it:
 1/ Always man pages is display without I comment call of it
 (you forgot a short syntax for man pages)

Bugger, that is a silly mistake, teaches me to not do anything without a 
testsuite (again)!

patch still enclosed:

--- fetch-reports.pl~   Wed Oct 16 17:52:30 2002
+++ fetch-reports.plThu Oct 24 00:22:47 2002
 -14,7 +14,7 
 rdir  = 'reports',
 v = 0,
 help  = 0,
-man   = 1,
+man   = 0,
 );
 
 use vars qw( $VERSION );
 -36,7 +36,7 
 --group newsgroupname
 --rdir  directoryname (for storing message-bodies)
 --debug [level= 0 | 1 | 2]
--V | --verbose
+-v | --verbose
 -h | --help (this one)
 --man   (the full manpage)
 
EndOfPatch

 2/ Files created only created path of files (why???).

Hmmm... sorry, I don't understand you :-(

 Don't take times to correct this, I will use my script with your
 documentation: (I learning your help syntax to grow my documentation).
 I think to share a CPAN module (something like Test-Smoke-Database) that
 containt all needed script to maintain a smoke db, and put it on CPAN.
 Then just a mirror page must be maintain on qa.perl.org.

Yes, I think we should see if this can be put up somewhere in the '.perl.org' 
domain.

 For this, I think to the FAQ section that miss today for alianwebserver
 db. This can take as POD documentation of the module. Can you correct
 this for a more correct english ?

I'd like to try, but currently your FAQ section is not there, do you want me 
to start something from the Test::Smoke documentation?

 One more times, sorry to answer too late for your contribution (think to
 my 2 monster tweens Marine  Perle that eat all my energy :-), and
 thanks for your work.

Oh well, never mind, family is important too.

 PS: Test::Smoke VERSION 1.16 works fine without update for win32/mingw,
 as you can see on my report to Hugo. Now I will take time for Borland
 and VC++.

Good to hear, and it is good a thing your patch finaly made it so we can smoke 
with MinGW-2.0 out of the box (I shall continue to do so). I am interested 
to see the results for BCC (Yves is now smoking MSVC7 I think, so Win32 
should be pretty well covered)

good luck,

Abe
-- 
Amsterdam Perl Mongers http://amsterdam.pm.org
perl -Mstrict -wle 'sub Just{$_}sub another{$_}sub Perl{$_}sub 
hacker{$_}$_=sub{(split /::/,(caller 
$^W)[3])[-$^W].$};print{[Just,another,Perl,hacker]}'




Re: [PATCH] Re: perl-current doesn't compil on MinGw-2.0.0-3

2002-09-30 Thread Abe Timmerman

Op een mooie herfstdag (Monday 30 September 2002 14:05), schreef Alain BARBET:

  BTW, How is the smokereports website comming?

 Fine even if I have had no time this last week-end to work on it.

  Are you going to maintain it for the community?

 Yes, but some work must be done:

That is great! If you need any help, let me know.

 I publish all my report to it, and had manually report found on
 perl.daily-build.reports. (there is 90 reports actually).
 + I need to rewrote some things before publish url on p5porters like:
 http://www.alianwebserver.com/cgi-bin/smoke_db?smoke=17941
 (there is a bug in my cgi that didn't display fine os/osver/... with
 restricted smoke version).

Reports from Test::Smoke-1.16 will also report $Config{archname}

 + I need to wrote too a small (perl) programm that fetch auto. all
 reports from newsgroup and push them to web site, for be sure that
 database is up-to-date.

I can give this a try if you want.

 + I think that a diff between smoke number can be a interessant feature.

 + I remember too I need to wrote a search engine part.

  I like the site and would like to mention it in README of Test::Smoke, do
  you mind?

 Yes, of course. And me, I need to wrote the FAQ section to link on
 Test-Smoke and explain how do report. (I will take section from
 Test-Smoke release).

I can help here as well.

good luck,

Abe
-- 
Amsterdam Perl Mongers http://amsterdam.pm.org
perl -we '$_=Just another Perl hacker;print$1while/(.)/g'




Re: Test::More

2002-09-24 Thread Abe Timmerman

Op een mooie herfstdag (Tuesday 24 September 2002 17:57), schreef H.Merijn 
Brand:

 2. I'm testing conversions to and from Unicode

 --8---
 use Test::More tests = 86;

 use strict;

 BEGIN {
 use_ok (PROCURA::Diac,  4.12);
 SKIP: {
   $^V ge v5.8.0 or skip Need 5.8.0 for Unicode, 1;
   use_ok (charnames, qw(:full));
   }
 }
 --8---

Perhaps the BUGS section of the charnames pragma applies here.
If so, you can't do use_ok() on charnames.

Maybe this works for you (untested):

use Test::More;
use strict;
BEGIN {
plan $^V ge v5.8.0 ? 85 : (skip_all = Need 5.8.0 for UniCode);
use_ok( PROCURA::Diac, 4.12 );
}
use charnames;

good luck,

Abe
-- 
Amsterdam Perl Mongers http://amsterdam.pm.org
perl -wl 
%_ = reverse (tsuJ=0, rehtona=1, lreP=2, rekcah=3);
_ = reverse map { ($_{$_}, $_) } sort keys %_;
$_ = reverse join  , map $_[$_] = grep $_%2 = 0..$#_; print;




Re: [ANNOUNCE] Test::Harness 2.00 release candiate 2

2001-12-17 Thread Abe Timmerman

Op een mooie dag  (Sun, 16 Dec 2001 15:30:17 -0500), besloot  Michael G Schwern
[EMAIL PROTECTED] de wereld om te draaien en schreef:

  Sorry, I did look into the failed tests, but I don't understand the
  Test::Harness::Straps::analyze_file() logic. MSWin32 doesn't support the open()
  constructs with '-|' and '|-'.
 
 Those should be gone in 2.00_04.  Are you sure you grabbed the right
 version?  What $VERSION is Test::Harness::Straps?


Doh, my bad, I had 2.00_01 hanging around on my system.

Works ok on both my regular ActivePerl 5.6.1 (build 628) and freshly compiled
bleadperl

Sorry!


-- 
Good luck, Abe
Amsterdam Perl Mongers http://amsterdam.pm.org
perl -Mstrict -wle 'sub Just{$_}sub another{$_}sub Perl{$_}sub 
hacker{$_}$_=sub{(split /::/,(caller $^W)[3])[-$^W].$};print Just, another, Perl, 
hacker;'



Re: [ANNOUNCE] Test::Harness 2.00 release candiate 2

2001-12-16 Thread Abe Timmerman

Op een mooie dag  (Sun, 16 Dec 2001 00:47:17 -0500), schreef Michael G Schwern
[EMAIL PROTECTED]:

 The second [1] Test::Harness 2.00 release candidate just went up to CPAN
 http://www.pobox.com/~schwern/src/Test-Harness-2.00_04.tar.gz

 

 Simply install the module, let me know if it went ok and your perl -V
 and go about your normal business.

Failed Test   Stat Wstat Total Fail  Failed  List of Failed
---
t\strap-analyze.t   18  460819   18  94.74%  2-19
t\strap.t   12  3072   146   12   8.22%  51 57 63 75 80 87 98 100 105
 111 116 123
Failed 2/7 test scripts, 71.43% okay. 30/225 subtests failed, 86.67% okay.

Sorry, I did look into the failed tests, but I don't understand the
Test::Harness::Straps::analyze_file() logic. MSWin32 doesn't support the open()
constructs with '-|' and '|-'.

The strap.t failures are mostley got: undef expected: ''; This has to do with
either the test-data or the Test::Harness::Straps::_is_test() interface.

This was tested with ActivePerl 5.6.1 (build 628) and bleadperl (W2k, MSVC60):

Summary of my perl5 (revision 5 undef) configuration:
  Platform:
osname=MSWin32, osvers=4.0, archname=MSWin32-x86-multi-thread
uname=''
config_args='undef'
hint=recommended, useposix=true, d_sigaction=undef
usethreads=undef use5005threads=undef useithreads=define usemultiplicity=define
useperlio=define d_sfio=undef uselargefiles=undef usesocks=undef
use64bitint=undef use64bitall=undef uselongdouble=undef
usemymalloc=n, bincompat5005=undef
  Compiler:
cc='cl', ccflags ='-nologo -Gf -W3 -O1 -MD -DNDEBUG -DWIN32 -D_CONSOLE
-DNO_STRICT -DHAVE_DES_FC
RYPT   -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO
-DPERL_MSVCRT_READFIX',
optimize='-O1 -MD -DNDEBUG',
cppflags='-DWIN32'
ccversion='undef', gccversion='', gccosandvers='undef'
intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=10
ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=4
alignbytes=8, prototype=define
  Linker and Libraries:
ld='link', ldflags ='-nologo -nodefaultlib -release
-libpath:c:\opt\perl572\lib\CORE  -machin
e:x86'
libpth=\lib
libs=  oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib  comdlg32.lib
advapi32.lib sh
ell32.lib ole32.lib oleaut32.lib  netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib
version.lib o
dbc32.lib odbccp32.lib msvcrt.lib
perllibs=undef
libc=msvcrt.lib, so=dll, useshrplib=yes, libperl=perl57.lib
  Dynamic Linking:
dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' '
cccdlflags=' ', lddlflags='-dll -nologo -nodefaultlib -release
-libpath:c:\opt\perl572\lib\COR
E  -machine:x86'


Characteristics of this binary (from libperl):
  Compile-time options: MULTIPLICITY USE_ITHREADS PERL_IMPLICIT_CONTEXT
PERL_IMPLICIT_SYS
  Locally applied patches:
DEVEL13599
  Built under MSWin32
  Compiled at Dec 11 2001 00:50:41
  %ENV:
PERLDOC_PAGER=less
  @INC:
c:/opt/perl572/lib
c:/opt/perl572/site/lib
.

-- 
Good luck, Abe
Amsterdam Perl Mongers http://amsterdam.pm.org
perl -Mstrict -wle 'sub Just{$_}sub another{$_}sub Perl{$_}sub 
hacker{$_}$_=sub{(split /::/,(caller $^W)[3])[-$^W].$};print Just, another, Perl, 
hacker;'