diff options
| author | Paul "LeoNerd" Evans <leonerd@leonerd.org.uk> | 2023-01-27 15:28:52 +0000 |
|---|---|---|
| committer | Paul Evans <leonerd@leonerd.org.uk> | 2023-01-28 16:57:35 +0000 |
| commit | 8cb94cf6eb83ea14ef27697517f7e92842876536 (patch) | |
| tree | 9f7bb6b04f2c999a663b4ee30f6462b13f3643f5 /embed.fnc | |
| parent | 092675293835fcf4645fe38cc0ff45dd39bc9b98 (diff) | |
| download | perl-8cb94cf6eb83ea14ef27697517f7e92842876536.tar.gz | |
Expose {optimize,finalize}_optree() as real API functions
These are required by XS modules which want to create custom
LOGOP-shaped optrees, to ensure that both sides of the tree get
optimised and finalised.
See also
https://github.com/Perl/perl5/issues/20743
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1802,7 +1802,8 @@ Axmd |OP * |op_lvalue |NULLOK OP *o \ poX |OP * |op_lvalue_flags|NULLOK OP *o \ |I32 type \ |U32 flags -pd |void |finalize_optree|NN OP *o +Apd |void |optimize_optree|NN OP *o +Apd |void |finalize_optree|NN OP *o : Used in op.c and pp_sys.c p |int |mode_from_discipline \ |NULLOK const char *s \ @@ -4585,7 +4586,6 @@ p |void |check_hash_fields_and_hekify \ |NULLOK SVOP *key_op \ |int real p |SV * |op_varname |NN const OP *o -pd |void |optimize_optree|NN OP *o p |void |warn_elem_scalar_context \ |NN const OP *o \ |NN SV *name \ |