source: trunk/essentials/sys-devel/flex/tests/test-basic-r/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/* A reentrant scanner.
25 This file will not compile under flex version <= 2.5.4.
26 Sample Input:
27 # this is a comment
28 foo = true
29 bar = "string value"
30 integer = 43
31*/
32%{
33#include "config.h"
34%}
35
36%option prefix="test" outfile="scanner.c"
37%option nounput noyywrap noyylineno warn nodefault
38%option reentrant
39
40IDENT [[:alnum:]_-]
41WS [[:blank:]]
42%%
43
44^{IDENT}+{WS}*={WS}*(true|false){WS}*\r?\n { return 100;}
45^{IDENT}+{WS}*={WS}*\"[^\"\n\r]*\"{WS}*\r?\n { return 101;}
46^{IDENT}+{WS}*={WS}*[[:digit:]]+{WS}*\r?\n { return 102;}
47^{WS}*#.*\r?\n { }
48^{WS}*\r?\n { }
49.|\n { fprintf(stderr,"Invalid line.\n"); exit(-1);}
50
51%%
52
53int main(void);
54
55int main ()
56{
57 yyscan_t lexer;
58 yylex_init( &lexer );
59 yyset_out ( stdout,lexer);
60 yyset_in ( stdin, lexer);
61 while( yylex(lexer) )
62 {
63 }
64 yylex_destroy( lexer );
65 printf("TEST RETURNING OK.\n");
66 return 0;
67}
68
Note: See TracBrowser for help on using the repository browser.