Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Re: [BUG DBI 1.13 and perl 5.005_60 vaguely unhappy together] #401

Closed
p5pRT opened this issue Aug 20, 1999 · 1 comment
Closed

Re: [BUG DBI 1.13 and perl 5.005_60 vaguely unhappy together] #401

p5pRT opened this issue Aug 20, 1999 · 1 comment

Comments

@p5pRT
Copy link

p5pRT commented Aug 20, 1999

Migrated from rt.perl.org#1236 (status was 'resolved')

Searchable as RT1236$

@p5pRT
Copy link
Author

p5pRT commented Aug 20, 1999

From @timbunce

Using a typedef instead would avoid the warning. Can someone patch that?

Thanks.

Tim.

On Thu, Aug 19, 1999 at 08​:49​:35PM -0400, Michael G Schwern wrote​:

Well, this is vaguely bad. Looks like something's unhappy in dXSARGS.
Ahh, I see​:

dXSARGS is defined in terms of dSP and dMARK.
dSP is defined in terms of dTHR and djSP.
dTHR is defined in terms of dNOOP
dNOOP is extern int Perl___notused

I presume this is Perl's fault and not DBI's. Do you want to pass it
on to p5p or should I?

DBI 1.13 installing with perl 5.005_60. It passed tests and otherwise
installed fine. Below is the interesting part.

/usr/local/perl5.005_60/bin/perl -I/usr/local/perl5.005_60/lib/i686-linux -I/usr/local/perl5.005_60/lib /usr/local/perl5.005_60/lib/ExtUtils/xsubpp -typemap /usr/local/perl5.005_60/lib/ExtUtils/typemap Perl.xs > Perl.xsc && mv Perl.xsc Perl.c
gcc -c -Dbool=char -DHAS_BOOL -DDEBUGGING -DDEBUGGING_MSTATS -DDEBUGGING_OPS -g -DVERSION=\"1.13\" -DXS_VERSION=\"1.13\" -fpic -I/usr/local/perl5.005_60/lib/i686-linux/CORE -Wall -Wno-comment -DDBI_NO_THREADS Perl.c
Perl.c​: In function `XS_DBD__Perl__dr_discon_all_'​:
Perl.c​:32​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__db__login'​:
Perl.c​:49​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__db_commit'​:
Perl.c​:83​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__db_rollback'​:
Perl.c​:100​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__db_disconnect'​:
Perl.c​:117​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__db_STORE'​:
Perl.c​:150​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__db_FETCH'​:
Perl.c​:172​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__db_DESTROY'​:
Perl.c​:191​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__st__prepare'​:
Perl.c​:245​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__st_bind_param'​:
Perl.c​:290​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__st_bind_param_inout'​:
Perl.c​:332​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__st_execute'​:
Perl.c​:380​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__st_fetchrow_arrayref'​:
Perl.c​:427​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__st_fetchrow_array'​:
Perl.c​:446​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__st_finish'​:
Perl.c​:474​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__st_blob_read'​:
Perl.c​:504​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__st_STORE'​:
Perl.c​:542​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__st_FETCH_attrib'​:
Perl.c​:564​: warning​: unused variable `Perl___notused'
Perl.c​: In function `XS_DBD__Perl__st_DESTROY'​:
Perl.c​:586​: warning​: unused variable `Perl___notused'
Perl.c​: In function `boot_DBD__Perl'​:
Perl.c​:635​: warning​: unused variable `Perl___notused'
Perl.c​: At top level​:
/usr/local/perl5.005_60/lib/i686-linux/CORE/patchlevel.h​:45​: warning​: `local_patches' defined but not used
/usr/local/perl5.005_60/bin/perl -I/usr/local/perl5.005_60/lib/i686-linux -I/usr/local/perl5.005_60/lib /usr/local/perl5.005_60/lib/ExtUtils/xsubpp -typemap /usr/local/perl5.005_60/lib/ExtUtils/typemap DBI.xs > DBI.xsc && mv DBI.xsc DBI.c
gcc -c -Dbool=char -DHAS_BOOL -DDEBUGGING -DDEBUGGING_MSTATS -DDEBUGGING_OPS -g -DVERSION=\"1.13\" -DXS_VERSION=\"1.13\" -fpic -I/usr/local/perl5.005_60/lib/i686-linux/CORE -Wall -Wno-comment -DDBI_NO_THREADS DBI.c
DBI.xs​: In function `dbih_clearcom'​:
DBI.xs​:805​: warning​: unused variable `Perl___notused'
DBI.xs​: In function `dbih_get_fbav'​:
DBI.xs​:942​: warning​: unused variable `Perl___notused'
DBI.xs​: In function `dbih_set_attr_k'​:
DBI.xs​:1034​: warning​: unused variable `Perl___notused'
DBI.xs​: In function `dbih_event'​:
DBI.xs​:1342​: warning​: unused variable `Perl___notused'
DBI.xs​: In function `log_where'​:
DBI.xs​:1446​: warning​: unused variable `Perl___notused'
DBI.xs​: In function `XS_DBI_dispatch'​:
DBI.xs​:1893​: warning​: long int format, int arg (arg 4)
DBI.xs​:1864​: warning​: unused variable `Perl___notused'
DBI.xs​:1493​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI_constant'​:
DBI.c​:1920​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI__setup_handle'​:
DBI.c​:1937​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI__get_imp_data'​:
DBI.c​:1955​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI__handles'​:
DBI.c​:1955​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI__handles'​:
DBI.c​:1970​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI_set_err'​:
DBI.c​:1992​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI_neat'​:
DBI.c​:2040​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI_hash'​:
DBI.c​:2061​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI_looks_like_number'​:
DBI.c​:2085​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI__install_method'​:
DBI.c​:2108​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI_trace'​:
DBI.c​:2181​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI_dump_handle'​:
DBI.c​:2234​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI__svdump'​:
DBI.c​:2258​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBI__var_FETCH'​:
DBI.c​:2278​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____st__get_fbav'​:
DBI.c​:2366​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____st__set_fbav'​:
DBI.c​:2382​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____st_bind_col'​:
DBI.c​:2411​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____st_bind_columns'​:
DBI.c​:2435​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____st_fetchrow_array'​:
DBI.c​:2475​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____st_fetch'​:
DBI.c​:2533​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____st_rows'​:
DBI.c​:2570​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____st_finish'​:
DBI.c​:2586​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____common_DESTROY'​:
DBI.c​:2602​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____common_STORE'​:
DBI.c​:2615​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____common_FETCH'​:
DBI.c​:2633​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____common_event'​:
DBI.c​:2648​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____common_private_data'​:
DBI.c​:2680​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____common_err'​:
DBI.c​:2695​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____common_state'​:
DBI.c​:2711​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____common_errstr'​:
DBI.c​:2728​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____common_trace'​:
DBI.c​:2748​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____common_trace_msg'​:
DBI.c​:2799​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD_____common_rows'​:
DBI.c​:2837​: warning​: unused variable `Perl___notused'
DBI.c​: In function `XS_DBD___mem__common_DESTROY'​:
DBI.c​:2853​: warning​: unused variable `Perl___notused'
DBI.c​: In function `boot_DBI'​:
DBI.c​:2873​: warning​: unused variable `Perl___notused'
DBI.c​: At top level​:
/usr/local/perl5.005_60/lib/i686-linux/CORE/patchlevel.h​:45​: warning​: `local_patches' defined but not used
Running Mkbootstrap for DBI ()
chmod 644 DBI.bs
LD_RUN_PATH="" cc -o blib/arch/auto/DBI/DBI.so -shared -L/usr/local/lib DBI.o

Summary of my perl5 (revision 5.0 version 5 subversion 60) configuration​:
Platform​:
osname=linux, osvers=2.2.10, archname=i686-linux
uname='linux athens 2.2.10 #3 smp mon aug 2 16​:48​:09 edt 1999 i686 unknown '
config_args=''
hint=previous, useposix=true, d_sigaction=define
usethreads=undef useperlio=undef d_sfio=undef
use64bits=undef usemultiplicity=undef
Compiler​:
cc='gcc', optimize='-g', gccversion=2.95.1 19990809 (prerelease)
cppflags='-Dbool=char -DHAS_BOOL -DDEBUGGING -DDEBUGGING_MSTATS -DDEBUGGING_OPS'
ccflags ='-Dbool=char -DHAS_BOOL -DDEBUGGING -DDEBUGGING_MSTATS -DDEBUGGING_OPS'
stdchar='char', d_stdstdio=define, usevfork=false
intsize=4, longsize=4, ptrsize=4, doublesize=8
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
alignbytes=4, usemymalloc=y, prototype=define
Linker and Libraries​:
ld='cc', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib
libs=-lnsl -lndbm -lgdbm -ldbm -ldb -ldl -lm -lrt -lc -lposix -lcrypt
libc=/lib/libc-2.1.2.so, so=so, useshrplib=false, libperl=libperl.a
Dynamic Linking​:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'

Characteristics of this binary (from libperl)​:
Compile-time options​: DEBUGGING
Built under linux
Compiled at Aug 17 1999 18​:05​:39
%ENV​:
PERL5LIB="/home/schwern/lib/perl5/site_perl/5.005"
@​INC​:
/home/schwern/lib/perl5/site_perl/5.005/i686-linux
/home/schwern/lib/perl5/site_perl/5.005
/usr/local/perl5.005_60/lib/i686-linux
/usr/local/perl5.005_60/lib
/usr/local/perl5.005_60/lib/site_perl/5.00560/i686-linux
/usr/local/perl5.005_60/lib/site_perl
.

--

Michael G Schwern schwern@​pobox.com
http​://www.pobox.com/~schwern
/(?​:(?​:(1)[.-]?)?\(?(\d{3})\)?[.-]?)?(\d{3})[.-]?(\d{4})(x\d+)?/i

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Projects
None yet
Development

No branches or pull requests

1 participant