summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorPaul "LeoNerd" Evans <leonerd@leonerd.org.uk>2023-02-08 18:14:14 +0000
committerPaul "LeoNerd" Evans <leonerd@leonerd.org.uk>2023-02-10 14:38:44 +0000
commit054ceeebc7f6acad2772faa4fa88617c35f4a88a (patch)
treeaf2d9c0d75e3f10ee26f575e7dab8973e757dd83 /embed.fnc
parente3b003dd8ca8d881450f6c96297ffa35f6a92ed1 (diff)
downloadperl-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.fnc6
1 files changed, 5 insertions, 1 deletions
diff --git a/embed.fnc b/embed.fnc
index 1e9019f4de..2559e7af8e 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -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 \