lexer: Remove unused function lex_put_back_id().

diff --git a/src/language/lexer/lexer.c b/src/language/lexer/lexer.c
index 00724e6472b73fd3ed23b1462c6af0ef46408dca..616b70081259eaaea471f3d29033ed95635b0541 100644 (file)
--- a/src/language/lexer/lexer.c
+++ b/src/language/lexer/lexer.c
@@ -781,17 +781,6 @@ lex_put_back (struct lexer *lexer, enum token_type t)
   save_token (lexer);
   lexer->token = t;
 }
-
-/* Makes the current token become the next token to be read; the
-   current token is set to the identifier ID. */
-void
-lex_put_back_id (struct lexer *lexer, const char *id)
-{
-  assert (lex_id_to_token (ss_cstr (id)) == T_ID);
-  save_token (lexer);
-  lexer->token = T_ID;
-  ds_assign_cstr (&lexer->tokstr, id);
-}
 \f
 /* Weird line processing functions. */
 

diff --git a/src/language/lexer/lexer.h b/src/language/lexer/lexer.h
index 7af40234cc03d40d157a824f3803db05afac2266..1abefb6b623fb30acc42ca4c05a6da27227bd8ce 100644 (file)
--- a/src/language/lexer/lexer.h
+++ b/src/language/lexer/lexer.h
@@ -69,7 +69,6 @@ bool lex_force_string (struct lexer *);
 /* Weird token functions. */
 enum token_type lex_look_ahead (struct lexer *);
 void lex_put_back (struct lexer *, enum token_type);
-void lex_put_back_id (struct lexer *, const char *tokid);
 
 /* Weird line processing functions. */
 const char *lex_entire_line (const struct lexer *);