diff options
author | Karl Williamson <public@khwilliamson.com> | 2012-11-24 21:06:36 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2012-11-24 21:45:22 -0700 |
commit | 5aaab254c02795622bdf42e348ad8473aa1fc643 (patch) | |
tree | 341c84b4a4867c96c3bcd4a63d34c244356054ce /op.c | |
parent | a8bd0d47f960000fee81e97d55dd5e8bac15e034 (diff) | |
download | perl-5aaab254c02795622bdf42e348ad8473aa1fc643.tar.gz |
Remove "register" declarations
This finishes the removal of register declarations started by
eb578fdb5569b91c28466a4d1939e381ff6ceaf4. It neglected the ones in
function parameter declarations, and didn't include things in dist, ext,
and lib, which this does include
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 16 |
1 files changed, 8 insertions, 8 deletions
@@ -3209,7 +3209,7 @@ S_op_integerize(pTHX_ OP *o) } static OP * -S_fold_constants(pTHX_ register OP *o) +S_fold_constants(pTHX_ OP *o) { dVAR; OP * VOL curop; @@ -3359,7 +3359,7 @@ S_fold_constants(pTHX_ register OP *o) } static OP * -S_gen_constant_list(pTHX_ register OP *o) +S_gen_constant_list(pTHX_ OP *o) { dVAR; OP *curop; @@ -5318,7 +5318,7 @@ Perl_newSLICEOP(pTHX_ I32 flags, OP *subscript, OP *listval) } STATIC I32 -S_is_list_assignment(pTHX_ register const OP *o) +S_is_list_assignment(pTHX_ const OP *o) { unsigned type; U8 flags; @@ -6979,8 +6979,8 @@ Perl_newMYSUB(pTHX_ I32 floor, OP *o, OP *proto, OP *attrs, OP *block) const char *ps; STRLEN ps_len = 0; /* init it to avoid false uninit warning from icc */ U32 ps_utf8 = 0; - register CV *cv = NULL; - register CV *compcv = PL_compcv; + CV *cv = NULL; + CV *compcv = PL_compcv; SV *const_sv; PADNAME *name; PADOFFSET pax = o->op_targ; @@ -8481,7 +8481,7 @@ Perl_ck_exists(pTHX_ OP *o) } OP * -Perl_ck_rvconst(pTHX_ register OP *o) +Perl_ck_rvconst(pTHX_ OP *o) { dVAR; SVOP * const kid = (SVOP*)cUNOPo->op_first; @@ -10773,7 +10773,7 @@ S_inplace_aassign(pTHX_ OP *o) { * peep() is called */ void -Perl_rpeep(pTHX_ register OP *o) +Perl_rpeep(pTHX_ OP *o) { dVAR; OP* oldop = NULL; @@ -11506,7 +11506,7 @@ Perl_rpeep(pTHX_ register OP *o) } void -Perl_peep(pTHX_ register OP *o) +Perl_peep(pTHX_ OP *o) { CALL_RPEEP(o); } |