/* $NetBSD: scanner.l,v 1.1.1.1 2009/10/26 00:29:12 christos Exp $ */ /* * This file is part of flex. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR * PURPOSE. */ %{ /* A template scanner file to build "scanner.c". */ #include #include %} %option 8bit outfile="scanner.c" prefix="test" %option nounput nomain noyywrap reentrant %option warn stack never-interactive %x STATE_1 %% { 0 yy_push_state (STATE_1, yyscanner); .|\n return 1; } { 1 yy_pop_state(yyscanner); .|\n return yy_top_state(yyscanner) + 1; } %% int main (int argc, char* const argv[]) { FILE* fp; int i; yyscan_t yyscanner; if ((fp = fopen(argv[1],"r")) == NULL){ perror("Failed to open input file."); return 1; } printf("Test 1: Reusing same scanner.\n"); yylex_init( &yyscanner ); yyset_out ( stdout, yyscanner); for (i=0; i < 4; ++i){ rewind(fp); yyset_in ( fp, yyscanner); while( yylex(yyscanner) ) ; } yylex_destroy( yyscanner ); printf("Test 1 OK\n\n"); printf("Test 2: Rescanning with new scanner each time.\n"); memset(&yyscanner,0,sizeof(yyscanner)); // Just to be clean about it. for (i=0; i < 4; ++i){ yyscan_t s; yylex_init( &s ); yyset_out ( stdout, s); rewind(fp); yyset_in ( fp, s); while( yylex(s) ) ; yylex_destroy( s ); } printf("Test 2 OK\n\n"); printf("TEST RETURNING OK.\n"); return 0; }