diff options
author | H.Merijn Brand <h.m.brand@xs4all.nl> | 2010-08-02 17:17:24 +0200 |
---|---|---|
committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2010-08-02 17:17:24 +0200 |
commit | 15b9d41f9f21b061074f5077a909475664dea6ca (patch) | |
tree | 558b2c87dc37b887dba1df7289208cbea4fbea4f | |
parent | 00e0035119fd95eab851b6b1d1ef1ee164487e07 (diff) | |
download | perl-15b9d41f9f21b061074f5077a909475664dea6ca.tar.gz |
C89 doesn't allow static dynamic initialization of complete structs
Signed-off-by: H.Merijn Brand <h.m.brand@xs4all.nl>
-rw-r--r-- | op.c | 10 |
1 files changed, 6 insertions, 4 deletions
@@ -105,10 +105,12 @@ recursive, but it's recursive on basic blocks, not on tree nodes. #define CALL_A_PEEP(peep, o) CALL_FPTR((peep)->fn)(aTHX_ o, peep) -#define CALL_PEEP(o) \ - STMT_START { \ - peep_next_t _next_peep = { PL_peepp, NULL }; \ - CALL_A_PEEP(&_next_peep, o); \ +#define CALL_PEEP(o) \ + STMT_START { \ + peep_next_t _next_peep; \ + _next_peep.fn = PL_peepp; \ + _next_peep.user_data = NULL; \ + CALL_A_PEEP(&_next_peep, o); \ } STMT_END #define CALL_OPFREEHOOK(o) if (PL_opfreehook) CALL_FPTR(PL_opfreehook)(aTHX_ o) |