Skip Menu |
 

This queue is for tickets about the DBD-Firebird CPAN distribution.

Report information
The Basics
Id: 92821
Status: resolved
Priority: 0/
Queue: DBD-Firebird

People
Owner: Nobody in particular
Requestors: vb [...] enkx.com
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: 1.17



From vb [...] enkx.com Fri Feb 7 14: 25:26 2014
MIME-Version: 1.0
X-Spam-Status: No, score=-1.89 tagged_above=-99.9 required=10 tests=[BAYES_00=-1.9, T_FRT_BELOW2=0.01] autolearn=ham
X-Spam-Flag: NO
content-type: text/plain; charset="utf-8"; format="flowed"
Message-ID: <52F532BC.40302 [...] enkx.com>
X-Virus-Scanned: Debian amavisd-new at bestpractical.com
X-Antiabuse: This header was added to track abuse, please include it with any abuse report
X-Antiabuse: Primary Hostname - vps.enkx.com
X-Antiabuse: Original Domain - rt.cpan.org
X-Antiabuse: Originator/Caller UID/GID - [47 12] / [47 12]
X-Antiabuse: Sender Address Domain - enkx.com
X-Spam-Score: -1.89
Received: from localhost (localhost [127.0.0.1]) by hipster.bestpractical.com (Postfix) with ESMTP id D37BD240ED4 for <cpan-bug+DBD-Firebird [...] hipster.bestpractical.com>; Fri, 7 Feb 2014 14:25:26 -0500 (EST)
Received: from hipster.bestpractical.com ([127.0.0.1]) by localhost (hipster.bestpractical.com [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id Ml7s8Pk6zomo for <cpan-bug+DBD-Firebird [...] hipster.bestpractical.com>; Fri, 7 Feb 2014 14:25:26 -0500 (EST)
Received: from la.mx.develooper.com (x1.develooper.com [207.171.7.70]) by hipster.bestpractical.com (Postfix) with SMTP id BFDA6240437 for <bug-DBD-Firebird [...] rt.cpan.org>; Fri, 7 Feb 2014 14:25:25 -0500 (EST)
Received: (qmail 27241 invoked by alias); 7 Feb 2014 19:25:25 -0000
Received: from vps.southsoftware.com (HELO vps.enkx.com) (207.58.160.121) by la.mx.develooper.com (qpsmtpd/0.28) with ESMTP; Fri, 07 Feb 2014 11:25:23 -0800
Received: from [188.162.65.74] (helo=[10.0.2.15]) by vps.enkx.com with esmtpsa (TLSv1:AES128-SHA:128) (Exim 4.69) (envelope-from <vb [...] enkx.com>) id 1WBr30-0003W2-SN for bug-DBD-Firebird [...] rt.cpan.org; Fri, 07 Feb 2014 14:24:48 -0500
Delivered-To: cpan-bug+DBD-Firebird [...] hipster.bestpractical.com
Subject: Bug in DBD-Firebird-1.16 (fix suggestion)
User-Agent: Mozilla/5.0 (Windows NT 6.1; rv:24.0) Gecko/20100101 Thunderbird/24.3.0
Return-Path: <vb [...] enkx.com>
X-RT-Mail-Extension: dbd-firebird
X-Original-To: cpan-bug+DBD-Firebird [...] hipster.bestpractical.com
X-Spam-Check-BY: la.mx.develooper.com
Date: Fri, 07 Feb 2014 23:23:40 +0400
X-Spam-Level:
To: bug-DBD-Firebird [...] rt.cpan.org
Content-Transfer-Encoding: 7bit
From: Vadim Belov <vb [...] enkx.com>
X-RT-Original-Encoding: iso-8859-1
X-RT-Interface: Email
Content-Length: 1225
Download (untitled) / with headers
text/plain 1.1k
Hello, Recently I have encountered a problem with fetchrow_array in FirebirdEmbedded. I use Perl 5.16.3 built from sources under Windows. Perl stops with the message "Free to wrong pool 3469a8 not d6ff7e47 at test.pl line 15." when I run the script below. Finally, the problem has been located and fixed. In the file dbdimp.c Line 2926: XSQLDA *out; should be replaced with Line 2926: XSQLDA *out=NULL; Just wanted to let you know about this. I think it is good for portability to fix this issue because not all compilers initialize variables to zero by default. Sincerely, Vadim Belov use strict; use warnings; use DBI; my $dbh = DBI->connect('dbi:FirebirdEmbedded:db=c:\\f.db') or die "Couldn't connect to database: " . DBI->errstr; my $sth = $dbh->prepare("SELECT rdb\$relation_name FROM rdb\$relations where rdb\$view_blr is null and (rdb\$system_flag is null or rdb\$system_flag = 0)") or die "Couldn't prepare statement: " . $dbh->errstr; $sth->execute() # Execute the query or die "Couldn't execute statement: " . $sth->errstr; # Read the matching records and print them out while (my @data = $sth->fetchrow_array()) { my $name = $data[0]; print "\t$name\n"; }
MIME-Version: 1.0
In-Reply-To: <52F532BC.40302 [...] enkx.com>
X-Mailer: MIME-tools 5.504 (Entity 5.504)
Content-Disposition: inline
X-RT-Interface: Web
References: <52F532BC.40302 [...] enkx.com>
Content-Type: text/plain; charset="utf-8"
Message-ID: <rt-4.0.18-24349-1391857880-1863.92821-0-0 [...] rt.cpan.org>
Content-Transfer-Encoding: binary
X-RT-Original-Encoding: utf-8
X-RT-Encrypt: 0
X-RT-Sign: 0
Content-Length: 560
Download (untitled) / with headers
text/plain 560b
На 07 февр. 2014, пт 21:25:27, vb@enkx.com написа: Show quoted text
> Recently I have encountered a problem with fetchrow_array in > FirebirdEmbedded. I use Perl 5.16.3 built from sources under Windows. > Perl stops with the message "Free to wrong pool 3469a8 not d6ff7e47 at > test.pl line 15." when I run the script below. Finally, the problem has > been located and fixed. In the file dbdimp.c > Line 2926: XSQLDA *out; > should be replaced with > Line 2926: XSQLDA *out=NULL;
Thanks. This is now fixed in Git and will be included in the next release.


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.