From e4a21daa4e972fdca58792685dc40f8626070430 Mon Sep 17 00:00:00 2001 From: Zefram Date: Wed, 13 Oct 2010 20:33:41 +0100 Subject: remove redundant lex_end The lex_end() function is redundant, because the lexer context object is actually finalised by parser_free(), triggered by the save stack. The lex_end() function has historically been empty, except when the PL_doextract global was being misused to store lexer state. --- toke.c | 11 ----------- 1 file changed, 11 deletions(-) (limited to 'toke.c') diff --git a/toke.c b/toke.c index 68e5aeea04..fa1882dcef 100644 --- a/toke.c +++ b/toke.c @@ -749,17 +749,6 @@ Perl_parser_free(pTHX_ const yy_parser *parser) } -/* - * Perl_lex_end - * Finalizer for lexing operations. Must be called when the parser is - * done with the lexer. - */ - -void -Perl_lex_end(pTHX) -{ -} - /* =for apidoc AmxU|SV *|PL_parser-Elinestr -- cgit v1.2.1