[perl #78308] [PATCH] Improve custom op support

On Mon Oct 18 05:20:30 2010, ben@morrow.me.uk wrote:
> Quoth perlbug-followup@perl.org:
> > Making all in ext/XS-APItest
> >  make all PERL_CORE=1 LIBPERL_A=libperl.a LINKTYPE=dynamic
> > ../../miniperl "-I../../lib" "-I../../lib" ../../lib/ExtUtils/xsubpp 
> > -typemap ../../lib/ExtUtils/typemap -typemap typemap  APItest.xs >
> > APItest.xsc && mv APItest.xsc APItest.c
> > cc -c   -fno-common -DPERL_DARWIN -no-cpp-precomp -DDEBUGGING
> > -fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include
> > -Wno-deprecated-declarations -O3 -g   -DVERSION=\"0.23\"
> > -DXS_VERSION=\"0.23\"  "-I../.."   APItest.c
> > APItest.xs: In function 'peep_xop':
> > APItest.xs:756: warning: format '%x' expects type 'unsigned int', but
> > argument 2 has type 'struct OP *'
> 
> Probably. Does the attached fix the problem?
> 
> Sorry: I always forget %x can't be used directly with pointers

I forgot about this patch. Applied as b58757d5ff9c.

• [perl #78308] [PATCH] Improve custom op support by Father Chrysostomos via RT