diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-25 18:27:19 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-25 18:27:19 +0000 |
| commit | 2554589c31907b9180ed71e0f68af5a4f1febd98 (patch) | |
| tree | bb4fa3860e80e16772574b8d7fab89f8bfe004c5 /XSUB.h | |
| parent | 180c74307d134e5058752c6d66b9fa238ddb3448 (diff) | |
| download | perl-2554589c31907b9180ed71e0f68af5a4f1febd98.tar.gz | |
Tweak the XSFUNCTION, from Doug MacEachern, as suggested
by Ilya Zakharevich in
http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2001-05/msg01582.html
p4raw-id: //depot/perl@10934
Diffstat (limited to 'XSUB.h')
| -rw-r--r-- | XSUB.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -90,7 +90,7 @@ handled automatically by C<xsubpp>. # define XSINTERFACE_CVT(ret,name) ret (*name)() #endif #define dXSFUNCTION(ret) XSINTERFACE_CVT(ret,XSFUNCTION) -#define XSINTERFACE_FUNC(ret,cv,f) ((XSINTERFACE_CVT(ret,cv))(f)) +#define XSINTERFACE_FUNC(ret,cv,f) ((XSINTERFACE_CVT(ret,))(f)) #define XSINTERFACE_FUNC_SET(cv,f) \ CvXSUBANY(cv).any_dptr = (void (*) (pTHXo_ void*))(f) |