diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2006-04-29 14:13:24 +0300 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2006-04-29 13:09:18 +0000 |
| commit | ca0270c4db0273594a19a3d140c7330546a185fe (patch) | |
| tree | df7ea895c4b1428bf4c92a7827d2737d310eae4a /cop.h | |
| parent | cbe85d23bd82d5cc0c7b010c39356b4e9c03248d (diff) | |
| download | perl-ca0270c4db0273594a19a3d140c7330546a185fe.tar.gz | |
more -ansi -pedantic cleanliness
Message-ID: <44532024.9070303@gmail.com>
p4raw-id: //depot/perl@28010
Diffstat (limited to 'cop.h')
| -rw-r--r-- | cop.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -100,7 +100,7 @@ typedef struct jmpenv JMPENV; #define JMPENV_PUSH(v) \ STMT_START { \ DEBUG_l(Perl_deb(aTHX_ "Setting up jumplevel %p, was %p\n", \ - &cur_env, PL_top_env)); \ + (void*)&cur_env, (void*)PL_top_env)); \ cur_env.je_prev = PL_top_env; \ OP_REG_TO_MEM; \ cur_env.je_ret = PerlProc_setjmp(cur_env.je_buf, SCOPE_SAVES_SIGNAL_MASK); \ @@ -113,7 +113,7 @@ typedef struct jmpenv JMPENV; #define JMPENV_POP \ STMT_START { \ DEBUG_l(Perl_deb(aTHX_ "popping jumplevel was %p, now %p\n", \ - PL_top_env, cur_env.je_prev)); \ + (void*)PL_top_env, (void*)cur_env.je_prev)); \ PL_top_env = cur_env.je_prev; \ } STMT_END |