summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorH.Merijn Brand <h.m.brand@xs4all.nl>2010-08-02 17:17:24 +0200
committerH.Merijn Brand <h.m.brand@xs4all.nl>2010-08-02 17:17:24 +0200
commit15b9d41f9f21b061074f5077a909475664dea6ca (patch)
tree558b2c87dc37b887dba1df7289208cbea4fbea4f /op.c
parent00e0035119fd95eab851b6b1d1ef1ee164487e07 (diff)
downloadperl-15b9d41f9f21b061074f5077a909475664dea6ca.tar.gz
C89 doesn't allow static dynamic initialization of complete structs
Signed-off-by: H.Merijn Brand <h.m.brand@xs4all.nl>
Diffstat (limited to 'op.c')
-rw-r--r--op.c10
1 files changed, 6 insertions, 4 deletions
diff --git a/op.c b/op.c
index 9539248455..08b795416a 100644
--- a/op.c
+++ b/op.c
@@ -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)