This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Finish fixing here-docs in re-evals
[perl5.git] / perl.h
diff --git a/perl.h b/perl.h
index 7f907df..f42849c 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -3456,8 +3456,6 @@ struct _sublex_info {
     U8 super_state;    /* lexer state to save */
     U16 sub_inwhat;    /* "lex_inwhat" to use */
     OP *sub_op;                /* "lex_op" to use */
     U8 super_state;    /* lexer state to save */
     U16 sub_inwhat;    /* "lex_inwhat" to use */
     OP *sub_op;                /* "lex_op" to use */
-    char *re_eval_start;/* start of "(?{..." text */
-    SV *re_eval_str;   /* "(?{...})" text */
     SV *repl;          /* replacement of s/// or y/// */
 };
 
     SV *repl;          /* replacement of s/// or y/// */
 };