diff options
| author | Gerard Goossen <gerard@ggoossen.net> | 2011-08-20 21:18:44 +0200 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-09-05 08:33:27 -0700 |
| commit | 985b9e549fd484800c8e9aae896e5e9c5b04d148 (patch) | |
| tree | 9ea78797ebf5cabdc20fbff581d75a31bc9f469f /embed.h | |
| parent | 764bcc0be4f8423b1df4829c3d411bc21b316e99 (diff) | |
| download | perl-985b9e549fd484800c8e9aae896e5e9c5b04d148.tar.gz | |
Move non-constant folding parts of fold_constants into a separate functions.
The non-constant folding parts of fold_constants are moved into
separate functions. op_integerize handles converting ops to integer
(and special case of OP_NEGATE), op_std_init handling some standard
functionality (forced scalar context and allocating the TARGET).
Both functions are called where fold_constants is called (but we might
want to make that a bit some selective and use op_std_init in other
places).
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -1355,6 +1355,8 @@ #define new_logop(a,b,c,d) S_new_logop(aTHX_ a,b,c,d) #define no_bareword_allowed(a) S_no_bareword_allowed(aTHX_ a) #define no_fh_allowed(a) S_no_fh_allowed(aTHX_ a) +#define op_integerize(a) S_op_integerize(aTHX_ a) +#define op_std_init(a) S_op_std_init(aTHX_ a) #define opt_scalarhv(a) S_opt_scalarhv(aTHX_ a) #define pmtrans(a,b,c) S_pmtrans(aTHX_ a,b,c) #define process_special_blocks(a,b,c) S_process_special_blocks(aTHX_ a,b,c) |