diff options
| author | Perl 5 Porters <perl5-porters@africa.nicoh.com> | 1996-06-18 02:12:07 +0000 |
|---|---|---|
| committer | Charles Bailey <bailey@genetics.upenn.edu> | 1996-06-18 02:12:07 +0000 |
| commit | 877c3cb57b3cfd1fab42d38930d7791bb022a60e (patch) | |
| tree | 2a6e2a2274f0790140c1a04f2599debc5aa9b122 | |
| parent | 1f96a9ed087172533209cceccc48f6b54d7073ae (diff) | |
| download | perl-877c3cb57b3cfd1fab42d38930d7791bb022a60e.tar.gz | |
Correct cast in SAVEDESTRUCTOR macro
| -rw-r--r-- | scope.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -54,5 +54,5 @@ #define SAVEFREEPV(p) save_freepv((char*)(p)) #define SAVECLEARSV(sv) save_clearsv((SV**)(&sv)) #define SAVEDELETE(h,k,l) save_delete((HV*)(h), (char*)(k), (I32)l) -#define SAVEDESTRUCTOR(f,p) save_destructor(f,(void*)p) +#define SAVEDESTRUCTOR(f,p) save_destructor((void(*)_((void*)))f,(void*)p) |