source: trunk/essentials/sys-devel/flex/tests/test-bison-nr/scanner.l

Last change on this file was 3031, checked in by bird, 18 years ago

flex 2.5.33.

File size: 1.7 KB
Line 
1/*
2 * This file is part of flex.
3 *
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
6 * are met:
7 *
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 *
14 * Neither the name of the University nor the names of its contributors
15 * may be used to endorse or promote products derived from this software
16 * without specific prior written permission.
17 *
18 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
19 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
20 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
21 * PURPOSE.
22 */
23
24%{
25/* The scanner expects to link to bison yylval . */
26#include <stdio.h>
27#include <stdlib.h>
28#include "parser.h"
29#include "config.h"
30static char* STRDUP(char* s1);
31#define YY_EXTRA_TYPE int
32%}
33
34%option 8bit outfile="scanner.c" prefix="test"
35%option bison-locations yylineno
36%option nomain nounput noyy_top_state noyywrap nodefault warn
37%option prefix="test" header="scanner.h" yylineno
38
39
40%%
41
42^[[:digit:]]+ {
43 yylval->lineno = yylineno;
44 yylloc->first_line = (int)strtol(yytext,NULL,10);
45 return LINENO;
46 }
47":" { return COLON; }
48" " { return SPACE; }
49"=" { return EQUAL; }
50[[:alnum:]_]+ { yylval->str = STRDUP(yytext); return IDENT;}
51
52\r|\n { }
53. { yyterminate();}
54%%
55
56
57static char* STRDUP(char* s1)
58{
59 char* s2 = (char*)malloc(strlen(s1)+1);
60 sprintf(s2,"%s",s1);
61 return s2;
62}
Note: See TracBrowser for help on using the repository browser.