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

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

flex 2.5.33.

File size: 2.1 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#include <stdio.h>
26#include <stdlib.h>
27#include "config.h"
28
29%}
30
31%option 8bit prefix="test"
32%option nounput nomain noyywrap
33%option warn reject
34
35
36%%
37
38. { REJECT; }
39.|\n ;
40
41%%
42
43int main ( int argc, char** argv )
44{
45 FILE* fp = NULL;
46 void *yyscanner=0;
47 M4_YY_DECL_GUTS_VAR();
48
49m4_ifdef( [[M4_YY_REENTRANT]],
50[[
51 yylex_init(&yyscanner);
52]])
53
54m4_ifdef( [[M4_YY_TABLES_EXTERNAL]],
55[[
56 if((fp = fopen(argv[1],"r"))== NULL)
57 yy_fatal_error("could not open tables file for reading" M4_YY_CALL_LAST_ARG);
58
59 if(yytables_fload(fp M4_YY_CALL_LAST_ARG) < 0)
60 yy_fatal_error("yytables_fload returned < 0" M4_YY_CALL_LAST_ARG);
61 if(M4_YY_TABLES_VERIFY)
62 exit(0);
63]])
64
65 if(argc > 2){
66 if((fp = fopen(argv[2],"r"))== NULL)
67 yy_fatal_error("could not open input file for reading" M4_YY_CALL_LAST_ARG);
68 yyin = fp;
69 }
70 while(yylex(M4_YY_CALL_ONLY_ARG) != 0)
71 ;
72
73m4_ifdef( [[M4_YY_TABLES_EXTERNAL]],
74[[
75 yytables_destroy(M4_YY_CALL_ONLY_ARG);
76]])
77 yylex_destroy(M4_YY_CALL_ONLY_ARG);
78
79 if(argc < 0) /* silence the compiler */
80 yyscanner = (void*)fp;
81
82 return 0;
83}
Note: See TracBrowser for help on using the repository browser.