3 * Copyright 1987, 1988 by MIT Student Information Processing Board.
5 * For copyright info, see copyright.h.
10 #include "copyright.h"
12 extern char *last_token, *ds();
14 static int l_command_table()
16 last_token = "command_table";
20 static int l_request()
22 last_token = "request";
26 static int l_unimplemented()
28 last_token = "unimplemented";
38 static int l_quoted_string()
41 yylval.dynstr = ds(yytext+1);
42 if ( (p=rindex(yylval.dynstr, '"')) )
44 last_token = ds(yylval.dynstr);
50 yylval.dynstr = ds(yytext);
51 last_token = ds(yylval.dynstr);
63 command_table return l_command_table();
64 request return l_request();
65 unimplemented return l_unimplemented();
70 \"{PC}*\" return l_quoted_string();
72 {AN}* return l_string();