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

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

flex 2.5.33.

File size: 1.8 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 reentrant bison-bridge bison-locations yylineno
36%option nomain nounput noyy_top_state noyywrap nodefault warn
37%option prefix="test" header="scanner.h"
38
39
40%%
41
42 if ( !yyextra)
43 yyextra = 1;
44
45^[[:digit:]]+ {
46 yylval->lineno = yyextra++;
47 yylloc->first_line = (int)strtol(yytext,NULL,10);
48 return LINENO;
49 }
50":" { return COLON; }
51" " { return SPACE; }
52"=" { return EQUAL; }
53[[:alnum:]_]+ { yylval->str = STRDUP(yytext); return IDENT;}
54
55\r|\n { }
56. { yyterminate();}
57%%
58
59
60static char* STRDUP(char* s1)
61{
62 char* s2 = (char*)malloc(strlen(s1)+1);
63 sprintf(s2,"%s",s1);
64 return s2;
65}
Note: See TracBrowser for help on using the repository browser.