diff options
author | Paul "LeoNerd" Evans <leonerd@leonerd.org.uk> | 2023-02-08 18:14:14 +0000 |
---|---|---|
committer | Paul "LeoNerd" Evans <leonerd@leonerd.org.uk> | 2023-02-10 14:38:44 +0000 |
commit | 054ceeebc7f6acad2772faa4fa88617c35f4a88a (patch) | |
tree | af2d9c0d75e3f10ee26f575e7dab8973e757dd83 /embed.fnc | |
parent | e3b003dd8ca8d881450f6c96297ffa35f6a92ed1 (diff) | |
download | perl-054ceeebc7f6acad2772faa4fa88617c35f4a88a.tar.gz |
Accept field VAR = EXPR on field vars
Allows non-constant expressions with side effects. Evaluated during the
constructor of each instance.
Diffstat (limited to 'embed.fnc')
-rw-r--r-- | embed.fnc | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -2356,7 +2356,7 @@ p |OP * |sawparens |NULLOK OP *o Apd |OP * |op_contextualize \ |NN OP *o \ |I32 context -; Used in op.c +; Used in op.c and class.c Apd |OP * |op_force_list |NULLOK OP *o : Used in perly.y p |OP * |scalar |NULLOK OP *o @@ -3975,12 +3975,16 @@ Cp |void |class_add_field|NN HV *stash \ Cp |void |class_apply_attributes \ |NN HV *stash \ |NULLOK OP *attrlist +Cp |void |class_prepare_initfield_parse Cp |void |class_prepare_method_parse \ |NN CV *cv Cp |void |class_seal_stash \ |NN HV *stash Cp |void |class_setup_stash \ |NN HV *stash +Cp |void |class_set_field_defop \ + |NN PADNAME *pn \ + |NN OP *defop Cp |OP * |class_wrap_method_body \ |NULLOK OP *o Cp |void |croak_kw_unless_class \ |