WARNING: Your GNU C 15.2.0 compiler is very old. Please upgrade it and rebuild perl.
I see you're using perl 5.042002 on x86_64-linux-thread-multi, okay.
Remember to actually *read* the README file!
Use 'make' to build the software (dmake or nmake on Windows).
Then 'make test' to execute self tests.
Then 'make install' to install the DBI and then delete this working
directory before unpacking and building any DBD::* drivers.
In file included from /usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:3295,
from DBIXS.h:23,
from Perl.xs:7:
/usr/lib/perl5/5.42.2/core_perl/CORE/inline.h: In function ‘Perl_is_utf8_valid_partial_char_flags’:
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘STRLEN’ {aka ‘long unsigned int’} to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/inline.h:3033:12: note: in expansion of macro ‘cBOOL’
3033 | return cBOOL(is_utf8_char_helper_(s0, e, flags));
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv_inline.h: In function ‘Perl_sv_setpv_freshbuf’:
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4224:52: note: in expansion of macro ‘cBOOL’
4224 | #define UNLIKELY(cond) EXPECT(cBOOL(cond),FALSE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1740:13: note: in expansion of macro ‘UNLIKELY’
1740 | if (UNLIKELY(TAINT_get)) \
| ^~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1028:34: note: in expansion of macro ‘cBOOL’
1028 | # define TAINT_get (cBOOL(UNLIKELY(PL_tainted))) /* Is something tainted? */
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1740:22: note: in expansion of macro ‘TAINT_get’
1740 | if (UNLIKELY(TAINT_get)) \
| ^~~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv_inline.h:1002:5: note: in expansion of macro ‘SvTAINT’
1002 | SvTAINT(sv);
| ^~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4224:52: note: in expansion of macro ‘cBOOL’
4224 | #define UNLIKELY(cond) EXPECT(cBOOL(cond),FALSE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1734:42: note: in expansion of macro ‘UNLIKELY’
1734 | #define SvTAINTED_on(sv) STMT_START{ if(UNLIKELY(TAINTING_get)){sv_taint(sv);} }STMT_END
| ^~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1029:34: note: in expansion of macro ‘cBOOL’
1029 | # define TAINTING_get (cBOOL(UNLIKELY(PL_tainting)))
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1734:51: note: in expansion of macro ‘TAINTING_get’
1734 | #define SvTAINTED_on(sv) STMT_START{ if(UNLIKELY(TAINTING_get)){sv_taint(sv);} }STMT_END
| ^~~~~~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1741:13: note: in expansion of macro ‘SvTAINTED_on’
1741 | SvTAINTED_on(sv); \
| ^~~~~~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv_inline.h:1002:5: note: in expansion of macro ‘SvTAINT’
1002 | SvTAINT(sv);
| ^~~~~~~
./Perl.xsi: In function ‘XS_DBD__Perl__db_selectrow_arrayref’:
./Perl.xsi:234:9: warning: ‘Perl_dowantarray’ is deprecated [-Wdeprecated-declarations]
234 | if (GIMME == G_SCALAR)
| ^~
In file included from /usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:6160:
/usr/lib/perl5/5.42.2/core_perl/CORE/proto.h:1019:1: note: declared here
1019 | Perl_dowantarray(pTHX)
| ^~~~~~~~~~~~~~~~
./Perl.xsi:240:9: warning: ‘Perl_dowantarray’ is deprecated [-Wdeprecated-declarations]
240 | if (GIMME == G_SCALAR)
| ^~
/usr/lib/perl5/5.42.2/core_perl/CORE/proto.h:1019:1: note: declared here
1019 | Perl_dowantarray(pTHX)
| ^~~~~~~~~~~~~~~~
In file included from /usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:3295,
from DBIXS.h:23,
from DBI.xs:13:
/usr/lib/perl5/5.42.2/core_perl/CORE/inline.h: In function ‘Perl_is_utf8_valid_partial_char_flags’:
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘STRLEN’ {aka ‘long unsigned int’} to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/inline.h:3033:12: note: in expansion of macro ‘cBOOL’
3033 | return cBOOL(is_utf8_char_helper_(s0, e, flags));
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv_inline.h: In function ‘Perl_sv_setpv_freshbuf’:
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4224:52: note: in expansion of macro ‘cBOOL’
4224 | #define UNLIKELY(cond) EXPECT(cBOOL(cond),FALSE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1740:13: note: in expansion of macro ‘UNLIKELY’
1740 | if (UNLIKELY(TAINT_get)) \
| ^~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1028:34: note: in expansion of macro ‘cBOOL’
1028 | # define TAINT_get (cBOOL(UNLIKELY(PL_tainted))) /* Is something tainted? */
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1740:22: note: in expansion of macro ‘TAINT_get’
1740 | if (UNLIKELY(TAINT_get)) \
| ^~~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv_inline.h:1002:5: note: in expansion of macro ‘SvTAINT’
1002 | SvTAINT(sv);
| ^~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4224:52: note: in expansion of macro ‘cBOOL’
4224 | #define UNLIKELY(cond) EXPECT(cBOOL(cond),FALSE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1734:42: note: in expansion of macro ‘UNLIKELY’
1734 | #define SvTAINTED_on(sv) STMT_START{ if(UNLIKELY(TAINTING_get)){sv_taint(sv);} }STMT_END
| ^~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1029:34: note: in expansion of macro ‘cBOOL’
1029 | # define TAINTING_get (cBOOL(UNLIKELY(PL_tainting)))
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1734:51: note: in expansion of macro ‘TAINTING_get’
1734 | #define SvTAINTED_on(sv) STMT_START{ if(UNLIKELY(TAINTING_get)){sv_taint(sv);} }STMT_END
| ^~~~~~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1741:13: note: in expansion of macro ‘SvTAINTED_on’
1741 | SvTAINTED_on(sv); \
| ^~~~~~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv_inline.h:1002:5: note: in expansion of macro ‘SvTAINT’
1002 | SvTAINT(sv);
| ^~~~~~~
DBI.xs: In function ‘dbi_ima_free’:
DBI.xs:244:46: warning: unused parameter ‘mg’ [-Wunused-parameter]
244 | static int dbi_ima_free(pTHX_ SV* sv, MAGIC* mg)
| ~~~~~~~^~
DBI.xs: In function ‘sql_type_cast_svpv’:
DBI.xs:1943:65: warning: unused parameter ‘v’ [-Wunused-parameter]
1943 | sql_type_cast_svpv(pTHX_ SV *sv, int sql_type, U32 flags, void *v)
| ~~~~~~^
DBI.xs: In function ‘XS_DBI_dispatch’:
DBI.xs:3194:5: warning: ‘Perl_dowantarray’ is deprecated [-Wdeprecated-declarations]
3194 | int gimme = GIMME;
| ^~~
In file included from /usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:6160:
/usr/lib/perl5/5.42.2/core_perl/CORE/proto.h:1019:1: note: declared here
1019 | Perl_dowantarray(pTHX)
| ^~~~~~~~~~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4224:52: note: in expansion of macro ‘cBOOL’
4224 | #define UNLIKELY(cond) EXPECT(cBOOL(cond),FALSE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1734:42: note: in expansion of macro ‘UNLIKELY’
1734 | #define SvTAINTED_on(sv) STMT_START{ if(UNLIKELY(TAINTING_get)){sv_taint(sv);} }STMT_END
| ^~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1029:34: note: in expansion of macro ‘cBOOL’
1029 | # define TAINTING_get (cBOOL(UNLIKELY(PL_tainting)))
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1734:51: note: in expansion of macro ‘TAINTING_get’
1734 | #define SvTAINTED_on(sv) STMT_START{ if(UNLIKELY(TAINTING_get)){sv_taint(sv);} }STMT_END
| ^~~~~~~~~~~~
DBI.xs:3958:25: note: in expansion of macro ‘SvTAINTED_on’
3958 | SvTAINTED_on(s);
| ^~~~~~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4224:52: note: in expansion of macro ‘cBOOL’
4224 | #define UNLIKELY(cond) EXPECT(cBOOL(cond),FALSE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1734:42: note: in expansion of macro ‘UNLIKELY’
1734 | #define SvTAINTED_on(sv) STMT_START{ if(UNLIKELY(TAINTING_get)){sv_taint(sv);} }STMT_END
| ^~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1029:34: note: in expansion of macro ‘cBOOL’
1029 | # define TAINTING_get (cBOOL(UNLIKELY(PL_tainting)))
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1734:51: note: in expansion of macro ‘TAINTING_get’
1734 | #define SvTAINTED_on(sv) STMT_START{ if(UNLIKELY(TAINTING_get)){sv_taint(sv);} }STMT_END
| ^~~~~~~~~~~~
DBI.xs:3965:25: note: in expansion of macro ‘SvTAINTED_on’
3965 | SvTAINTED_on(s);
| ^~~~~~~~~~~~
DBI.c: In function ‘XS_DBI_constant’:
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4223:52: note: in expansion of macro ‘cBOOL’
4223 | #define LIKELY(cond) EXPECT(cBOOL(cond),TRUE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/pp.h:484:13: note: in expansion of macro ‘LIKELY’
484 | if (LIKELY( \
| ^~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1028:34: note: in expansion of macro ‘cBOOL’
1028 | # define TAINT_get (cBOOL(UNLIKELY(PL_tainted))) /* Is something tainted? */
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/pp.h:486:28: note: in expansion of macro ‘TAINT_get’
486 | & (do_taint ? !TAINT_get : 1))) \
| ^~~~~~~~~
DBI.c:4636:9: note: in expansion of macro ‘TARGi’
4636 | TARGi((IV)RETVAL, 1);
| ^~~~~
DBI.xs: In function ‘XS_DBI__new_handle’:
DBI.xs:4624:5: warning: ‘Perl_dowantarray’ is deprecated [-Wdeprecated-declarations]
4624 | if (GIMME != G_SCALAR) {
| ^~
/usr/lib/perl5/5.42.2/core_perl/CORE/proto.h:1019:1: note: declared here
1019 | Perl_dowantarray(pTHX)
| ^~~~~~~~~~~~~~~~
DBI.xs: In function ‘XS_DBI__handles’:
DBI.xs:4661:5: warning: ‘Perl_dowantarray’ is deprecated [-Wdeprecated-declarations]
4661 | if (GIMME != G_SCALAR) {
| ^~
/usr/lib/perl5/5.42.2/core_perl/CORE/proto.h:1019:1: note: declared here
1019 | Perl_dowantarray(pTHX)
| ^~~~~~~~~~~~~~~~
DBI.c: In function ‘XS_DBI_hash’:
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4223:52: note: in expansion of macro ‘cBOOL’
4223 | #define LIKELY(cond) EXPECT(cBOOL(cond),TRUE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/pp.h:484:13: note: in expansion of macro ‘LIKELY’
484 | if (LIKELY( \
| ^~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1028:34: note: in expansion of macro ‘cBOOL’
1028 | # define TAINT_get (cBOOL(UNLIKELY(PL_tainted))) /* Is something tainted? */
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/pp.h:486:28: note: in expansion of macro ‘TAINT_get’
486 | & (do_taint ? !TAINT_get : 1))) \
| ^~~~~~~~~
DBI.c:4846:9: note: in expansion of macro ‘TARGi’
4846 | TARGi((IV)RETVAL, 1);
| ^~~~~
DBI.c: In function ‘XS_DBI_trace’:
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4223:52: note: in expansion of macro ‘cBOOL’
4223 | #define LIKELY(cond) EXPECT(cBOOL(cond),TRUE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/pp.h:484:13: note: in expansion of macro ‘LIKELY’
484 | if (LIKELY( \
| ^~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1028:34: note: in expansion of macro ‘cBOOL’
1028 | # define TAINT_get (cBOOL(UNLIKELY(PL_tainted))) /* Is something tainted? */
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/pp.h:486:28: note: in expansion of macro ‘TAINT_get’
486 | & (do_taint ? !TAINT_get : 1))) \
| ^~~~~~~~~
DBI.c:5042:9: note: in expansion of macro ‘TARGi’
5042 | TARGi((IV)RETVAL, 1);
| ^~~~~
DBI.c: In function ‘XS_DBI_dbi_time’:
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4223:52: note: in expansion of macro ‘cBOOL’
4223 | #define LIKELY(cond) EXPECT(cBOOL(cond),TRUE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/pp.h:529:13: note: in expansion of macro ‘LIKELY’
529 | if (LIKELY( \
| ^~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1028:34: note: in expansion of macro ‘cBOOL’
1028 | # define TAINT_get (cBOOL(UNLIKELY(PL_tainted))) /* Is something tainted? */
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/pp.h:531:28: note: in expansion of macro ‘TAINT_get’
531 | & (do_taint ? !TAINT_get : 1))) \
| ^~~~~~~~~
DBI.c:5118:9: note: in expansion of macro ‘TARGn’
5118 | TARGn((NV)RETVAL, 1);
| ^~~~~
DBI.c: In function ‘XS_DBI_sql_type_cast’:
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4223:52: note: in expansion of macro ‘cBOOL’
4223 | #define LIKELY(cond) EXPECT(cBOOL(cond),TRUE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/pp.h:484:13: note: in expansion of macro ‘LIKELY’
484 | if (LIKELY( \
| ^~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1028:34: note: in expansion of macro ‘cBOOL’
1028 | # define TAINT_get (cBOOL(UNLIKELY(PL_tainted))) /* Is something tainted? */
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/pp.h:486:28: note: in expansion of macro ‘TAINT_get’
486 | & (do_taint ? !TAINT_get : 1))) \
| ^~~~~~~~~
DBI.c:5285:9: note: in expansion of macro ‘TARGi’
5285 | TARGi((IV)RETVAL, 1);
| ^~~~~
DBI.xs: In function ‘XS_DBI__var_FETCH’:
DBI.xs:5025:9: warning: ‘Perl_dowantarray’ is deprecated [-Wdeprecated-declarations]
5025 | call_sv((SV*)GvCV(imp_gv), GIMME);
| ^~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/proto.h:1019:1: note: declared here
1019 | Perl_dowantarray(pTHX)
| ^~~~~~~~~~~~~~~~
DBI.c: In function ‘XS_DBD_____db_preparse’:
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:2482:33: warning: cast from function call of type ‘IV’ {aka ‘long int’} to non-matching type ‘void *’ [-Wbad-function-cast]
2482 | # define INT2PTR(any,d) (any)(d)
| ^
DBI.c:5432:19: note: in expansion of macro ‘INT2PTR’
5432 | foo = INT2PTR(void *,SvIV(ST(4)))
| ^~~~~~~
DBI.xs: In function ‘XS_DBD_____st__set_fbav’:
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4224:52: note: in expansion of macro ‘cBOOL’
4224 | #define UNLIKELY(cond) EXPECT(cBOOL(cond),FALSE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1740:13: note: in expansion of macro ‘UNLIKELY’
1740 | if (UNLIKELY(TAINT_get)) \
| ^~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1028:34: note: in expansion of macro ‘cBOOL’
1028 | # define TAINT_get (cBOOL(UNLIKELY(PL_tainted))) /* Is something tainted? */
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1740:22: note: in expansion of macro ‘TAINT_get’
1740 | if (UNLIKELY(TAINT_get)) \
| ^~~~~~~~~
DBI.xs:5231:13: note: in expansion of macro ‘SvTAINT’
5231 | SvTAINT(AvARRAY(src_av)[i]);
| ^~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4224:52: note: in expansion of macro ‘cBOOL’
4224 | #define UNLIKELY(cond) EXPECT(cBOOL(cond),FALSE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1734:42: note: in expansion of macro ‘UNLIKELY’
1734 | #define SvTAINTED_on(sv) STMT_START{ if(UNLIKELY(TAINTING_get)){sv_taint(sv);} }STMT_END
| ^~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1029:34: note: in expansion of macro ‘cBOOL’
1029 | # define TAINTING_get (cBOOL(UNLIKELY(PL_tainting)))
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1734:51: note: in expansion of macro ‘TAINTING_get’
1734 | #define SvTAINTED_on(sv) STMT_START{ if(UNLIKELY(TAINTING_get)){sv_taint(sv);} }STMT_END
| ^~~~~~~~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/sv.h:1741:13: note: in expansion of macro ‘SvTAINTED_on’
1741 | SvTAINTED_on(sv); \
| ^~~~~~~~~~~~
DBI.xs:5231:13: note: in expansion of macro ‘SvTAINT’
5231 | SvTAINT(AvARRAY(src_av)[i]);
| ^~~~~~~
DBI.c: In function ‘XS_DBD_____common_trace’:
/usr/lib/perl5/5.42.2/core_perl/CORE/handy.h:153:23: warning: cast from function call of type ‘long int’ to non-matching type ‘_Bool’ [-Wbad-function-cast]
153 | #define cBOOL(cbool) ((bool) (cbool))
| ^
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4203:62: note: in definition of macro ‘EXPECT’
4203 | # define EXPECT(expr,val) __builtin_expect(expr,val)
| ^~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:4223:52: note: in expansion of macro ‘cBOOL’
4223 | #define LIKELY(cond) EXPECT(cBOOL(cond),TRUE)
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/pp.h:484:13: note: in expansion of macro ‘LIKELY’
484 | if (LIKELY( \
| ^~~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/perl.h:1028:34: note: in expansion of macro ‘cBOOL’
1028 | # define TAINT_get (cBOOL(UNLIKELY(PL_tainted))) /* Is something tainted? */
| ^~~~~
/usr/lib/perl5/5.42.2/core_perl/CORE/pp.h:486:28: note: in expansion of macro ‘TAINT_get’
486 | & (do_taint ? !TAINT_get : 1))) \
| ^~~~~~~~~
DBI.c:6257:9: note: in expansion of macro ‘TARGi’
6257 | TARGi((IV)RETVAL, 1);
| ^~~~~
# --- Perl 5.042002 on x86_64-linux-thread-multi
SV = IV(0x8310758) at 0x8310768
REFCNT = 1
FLAGS = (ROK,READONLY,PROTECT)
RV = 0x7cbf738
SV = PVHV(0x8446880) at 0x7cbf738
REFCNT = 1
FLAGS = (OBJECT,SHAREKEYS)
STASH = 0x831d2c0 "DBI::dr"
ARRAY = 0x828fa90 (0:9, 1:6, 2:1)
hash quality = 115.0%
KEYS = 8
FILL = 7
MAX = 15
Elt "TraceLevel" HASH = 0x71e8e8c2
SV = IV(0x7cc7680) at 0x7cc7690
REFCNT = 1
FLAGS = (IOK,pIOK)
IV = 0
Elt "ImplementorClass" HASH = 0xbf5d7b35
SV = PV(0x7c9dc80) at 0x83991e8
REFCNT = 1
FLAGS = (POK,IsCOW,pPOK)
PV = 0x831c8f0 "DBD::Test::OverLongxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx"\0
CUR = 319
LEN = 328
COW_REFCNT = 0
Elt "Version" HASH = 0xb826dd96
SV = PV(0x7c9dd90) at 0x7cc7750
REFCNT = 1
FLAGS = (POK,IsCOW,pPOK)
PV = 0x7cdb500 "Test"\0
CUR = 4
LEN = 16
COW_REFCNT = 0
(in cleanup) dbih_getcom handle DBI::dr=HASH(0x7cbf738) is not a DBI handle (has no magic) during global destruction.
# --- Perl 5.042002 on x86_64-linux-thread-multi
SV = IV(0x4e83650) at 0x4e83660
REFCNT = 1
FLAGS = (ROK,READONLY,PROTECT)
RV = 0x54fcfe0
SV = PVHV(0x562c910) at 0x54fcfe0
REFCNT = 1
FLAGS = (OBJECT,SHAREKEYS)
STASH = 0x55039e0 "DBI::dr"
ARRAY = 0x5506920 (0:10, 1:4, 2:2)
hash quality = 95.8%
KEYS = 8
FILL = 6
MAX = 15
Elt "Err" HASH = 0xfb5d3084
SV = IV(0x54fcca0) at 0x54fccb0
REFCNT = 1
FLAGS = (ROK)
RV = 0x5581888
SV = NULL(0x0) at 0x5581888
REFCNT = 1
FLAGS = ()
Elt "Name" HASH = 0xeb1ce887
SV = PV(0x5501b70) at 0x54fcb90
REFCNT = 1
FLAGS = (POK,IsCOW,pPOK)
PV = 0x5439860 "Test"\0
CUR = 4
LEN = 16
COW_REFCNT = 0
Elt "FetchHashKeyName" HASH = 0xf51d1a58
SV = PV(0x5501ba0) at 0x54fcc08
REFCNT = 1
FLAGS = (POK,IsCOW,pPOK)
PV = 0x5587980 "NAME"\0
CUR = 4
LEN = 16
COW_REFCNT = 2
(in cleanup) dbih_getcom handle DBI::dr=HASH(0x54fcfe0) is not a DBI handle (has no magic) during global destruction.
# --- Perl 5.042002 on x86_64-linux-thread-multi
# --- Perl 5.042002 on x86_64-linux-thread-multi