develooper Front page | perl.perl5.porters | Postings from June 2018

[perl #133295] GDBM_File tests fail with gdbm 1.15

Thread Previous
From:
James E Keenan via RT
Date:
June 23, 2018 18:24
Subject:
[perl #133295] GDBM_File tests fail with gdbm 1.15
Message ID:
rt-4.0.24-10932-1529778253-1541.133295-15-0@perl.org
On Sat, 23 Jun 2018 18:12:33 GMT, jkeenan wrote:
> I'm merging this ticket into
> https://rt.perl.org/Ticket/Display.html?id=133295, as I have confirmed
> the error and 133295 was the first to be filed.

I was able to confirm this bug on a Linux machine where, it appears, I did not previously have GDBM installed.

I first installed libgdbm3 as follows:

#####
$> sudo apt-get install libgdbm3 libgdbm-dev
#####

That appears to have installed only a rather old version of the library:

#####
$> man gdbm
NAME
       GDBM - The GNU database manager.  Includes dbm and ndbm compatability. (Version 1.8.3.)
#####

I then downloaded version 1.15.0 of gdbm from https://ftpmirror.gnu.org/gdbm/gdbm-1.15.tar.gz.  I configured it to install in a non-standard location and did so.

#####
$> ./configure --prefix=/home/jkeenan/learn/perl/p5p/gdbm-1.15 &&  make && make install
$> ack VERSION include/gdbm.h 
# define GDBM_VERSION_MAJOR 1
# define GDBM_VERSION_MINOR 15
# define GDBM_VERSION_PATCH 0
#####

I then configured and built blead (commit 1efe078f0a293b2ce3eb5c2758bb1c93240a0822) as follows:

#####
$> sh ./Configure -des -Dusedevel \
    -Dlocincpth='/home/jkeenan/learn/perl/p5p/gdbm-1.15/include  /usr/local/include' \
    -Dloclibpth='/home/jkeenan/learn/perl/p5p/gdbm-1.15/lib      /usr/local/lib'
$> make test_prep
#####

I then ran the test file in question.

#####
cd t;./perl harness -v ../ext/GDBM_File/t/fatal.t;cd -

ok 1 - use GDBM_File;
ok 2 - Can find next available file descriptor
ok 3 - Check that we cannot open fileno 3. $! is Bad file descriptor
ok 4 - An object of class 'GDBM_File' isa 'GDBM_File'
ok 5 - dup fileno 3
ok 6 - close fileno 3, out from underneath the GDBM_File
not ok 7 - Trapped error when attempting to write to knobbled GDBM_File
#   Failed test 'Trapped error when attempting to write to knobbled GDBM_File'
#   at t/fatal.t line 37.
#          got: '1'
#     expected: undef
not ok 8 - expected error message from GDBM_File
#   Failed test 'expected error message from GDBM_File'
#   at t/fatal.t line 46.
#                   ''
#     doesn't match '(?^: at .*\bfatal\.t line \d+\.\n\z)'
# Looks like you failed 2 tests of 8.
Dubious, test returned 2 (wstat 512, 0x200)
Failed 2/8 subtests 

Test Summary Report
-------------------
../ext/GDBM_File/t/fatal.t (Wstat: 512 Tests: 8 Failed: 2)
  Failed tests:  7-8
  Non-zero exit status: 2
Files=1, Tests=8,  0 wallclock secs ( 0.02 usr  0.00 sys +  0.04 cusr  0.00 csys =  0.06 CPU)
Result: FAIL
#####

-- 
James E Keenan (jkeenan@cpan.org)

---
via perlbug:  queue: perl5 status: new
https://rt.perl.org/Ticket/Display.html?id=133295

Thread Previous


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About