void dd_set_linestr(pTHX_ char* new_value) {
int new_len = strlen(new_value);
- char* old_linestr = SvPVX(PL_linestr);
if (SvLEN(PL_linestr) < new_len) {
croak("forced to realloc PL_linestr for line %s, bailing out before we crash harder", SvPVX(PL_linestr));
return (DD_HAVE_LEX_STUFF ? SvPVX(PL_lex_stuff) : "");
}
-char* dd_clear_lex_stuff(pTHX) {
+void dd_clear_lex_stuff(pTHX) {
if (DD_HAVE_PARSER)
PL_lex_stuff = (SV*)NULL;
}
STATIC OP *dd_ck_const(pTHX_ OP *o) {
int dd_flags;
- char* s;
char* name;
o = dd_old_ck_const(aTHX_ o); /* let the original do its job */