X-Git-Url: https://git.kengrimes.com/?p=henge%2Fapc.git;a=blobdiff_plain;f=src%2Flexer.c;h=b8d7762d2ac455f13f0b9a8d8baf6f427f013cc5;hp=fe4eff780294cd215d7880b23c867e0cdbc3b441;hb=9fb546438cedd3fb67bd1b11665e7a0b6744f45b;hpb=6035780f8e8c7ba47ae517ad6cf7e47515e847fd

diff --git a/src/lexer.c b/src/lexer.c
index fe4eff7..b8d7762 100644
--- a/src/lexer.c
+++ b/src/lexer.c
@@ -29,7 +29,6 @@
 #include "apc.h"
 #include "parser.tab.h"
 /* Public */
-int lexer_lexfile(uint8_t const*);
 /* Private */
 extern //lexer.rl
 int lexer_lexstring(uint8_t const*, int);
@@ -37,27 +36,5 @@ extern //scanner.c
 yypstate* apc_pstate;
 extern //scanner.c
 yycstate* apc_cstate;
-#define PUSHTOK(T,L) yypush_parse(apc_pstate, T, L, apc_cstate)
 
-/* Lexical analysis of a file
-   Strips a filename to its base name, then sends it to lexer_lexstring before
-   pushing a PATH token with the filename
-   Returns the number of tokens pushed to the parser.
-*/
-int lexer_lexfile
-( uint8_t const* filename )
-{ uint8_t const* last_period,* iter;
-  int            ntok;
-  union YYSTYPE tok_val;
-  last_period = NULL;
-  for (iter = filename; *iter; iter++)
-    if (*iter ==  '.')
-      last_period = iter;
-  if (last_period)
-    { ntok = lexer_lexstring(filename, (int)(last_period - filename));
-      tok_val.str = filename;
-      PUSHTOK(PATH,&tok_val);
-      return ntok + 1;
-    }
-  return lexer_lexstring(filename, (int)(iter - filename));
-}
+