… | |
… | |
963 | #endif |
963 | #endif |
964 | |
964 | |
965 | New(54,PL_savestack,24,ANY); |
965 | New(54,PL_savestack,24,ANY); |
966 | PL_savestack_ix = 0; |
966 | PL_savestack_ix = 0; |
967 | PL_savestack_max = 24; |
967 | PL_savestack_max = 24; |
|
|
968 | #if !PERL_VERSION_ATLEAST (5,24,0) |
|
|
969 | /* perl 5.24 moves SS_MAXPUSH optimisation from */ |
|
|
970 | /* the header macros to PL_savestack_max */ |
|
|
971 | PL_savestack_max -= SS_MAXPUSH; |
|
|
972 | #endif |
968 | |
973 | |
969 | #if !PERL_VERSION_ATLEAST (5,10,0) |
974 | #if !PERL_VERSION_ATLEAST (5,10,0) |
970 | New(54,PL_retstack,4,OP*); |
975 | New(54,PL_retstack,4,OP*); |
971 | PL_retstack_ix = 0; |
976 | PL_retstack_ix = 0; |
972 | PL_retstack_max = 4; |
977 | PL_retstack_max = 4; |