[devel] PDL (was: Sisyphus 20041228 rebuild status)
Alexey Tourbin
=?iso-8859-1?q?at_=CE=C1_altlinux=2Eru?=
Ср Дек 29 21:48:27 MSK 2004
On Wed, Dec 29, 2004 at 02:44:03PM +0300, QA Team Robot wrote:
> package perl-PDL-1:2.4.1-alt1 looks orphaned [12] (Alexey Tourbin).
С PDL всё странно. Собираю новую версию, и как всегда: шаг влево, шаг
вправо -- segmentation fault. Пусть пока будет как есть. Пока не
прояснится... на доске... :)
----- Forwarded message from Alexey Tourbin <at на altlinux ru> -----
Date: Wed, 29 Dec 2004 20:51:41 +0300
From: Alexey Tourbin <at на altlinux ru>
Subject: PDL-2.4.2 and Test::More 0.53, segfaults
To: Craig DeForest <deforest на boulder.swri edu>
Cc: perldl-porters на jach.hawaii edu
Message-ID: <20041229175141.GH7824 на solemn.turbinal org>
On Tue, Dec 28, 2004 at 12:56:13PM -0700, Craig DeForest wrote:
> ... so have at it!
>
> If anyone wants to build a Windows binary dist, RPM, or whatever, have at it:
> we can bind it into the the 2.4.2 release post facto. Release notes are
> below.
Hello,
I noticed a few test failures under recent Test::More version from CPAN
(recent perl release has an older and more tolerant version).
In limits_keyspecs.t, undef no longer equals to an empty string:
--- PDL-2.4.2/t/limits_keyspecs.t~ 2004-10-27 19:16:28 +0000
+++ PDL-2.4.2/t/limits_keyspecs.t 2004-12-29 16:22:50 +0000
@@ -48,13 +48,13 @@ my @good = (
'x' => { data => 'x' },
- '&' => { trans => '' },
+ '&' => { trans => undef },
undef() => { },
- '<>&' => { errn => '',
- errp => '',
- trans => '' },
+ '<>&' => { errn => undef,
+ errp => undef,
+ trans => undef },
'=s' => { errn => 's',
errp => 's' },
End of diff
With limits_normalize_dsets.t test failures, I discovered that comparing
PDL objects against non-PDL objects can produce rather strange errors.
Ultimately I managed to crash PDL (and Perl) with a very simple code
snippet:
--- PDL-2.4.2/t/segfault.t~ 2004-12-29 20:23:00 +0300
+++ PDL-2.4.2/t/segfault.t 2004-12-29 20:27:10 +0300
@@ -0,0 +1,7 @@
+use PDL;
+use strict;
+
+my $x = pdl(1, 2);
+my $y = bless \my $z, "ASDF";
+print "ok 1\n" if $x != $y;
+
End of diff
Here is what I get with PDL-2.4.1 installed on my system:
$ perl PDL-2.4.2/t/segfault.t
zsh: segmentation fault perl PDL-2.4.2/t/segfault.t
$
Here is what I get with freshly built PDL-2.4.2:
$ cd PDL-2.4.2
$ perl -Mblib t/segfault.t
zsh: segmentation fault perl -Mblib t/segfault.t
$
Please verify.
> Cheers,
> Craig
--
Alexey Tourbin
ALT Linux Team
----- End forwarded message -----
----------- следующая часть -----------
Было удалено вложение не в текстовом формате...
Имя : =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Тип : application/pgp-signature
Размер : 189 байтов
Описание: =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Url : <http://lists.altlinux.org/pipermail/devel/attachments/20041229/29c5a70f/attachment-0001.bin>
Подробная информация о списке рассылки Devel