minix/external/bsd/flex/dist/tests/test-reject/scanner.l
Lionel Sambuc 84d9c625bf Synchronize on NetBSD-CVS (2013/12/1 12:00:00 UTC)
- Fix for possible unset uid/gid in toproto
 - Fix for default mtree style
 - Update libelf
 - Importing libexecinfo
 - Resynchronize GCC, mpc, gmp, mpfr
 - build.sh: Replace params with show-params.
     This has been done as the make target has been renamed in the same
     way, while a new target named params has been added. This new
     target generates a file containing all the parameters, instead of
     printing it on the console.
 - Update test48 with new etc/services (Fix by Ben Gras <ben@minix3.org)
     get getservbyport() out of the inner loop

Change-Id: Ie6ad5226fa2621ff9f0dee8782ea48f9443d2091
2014-07-28 17:05:06 +02:00

82 lines
2.1 KiB
Text

/* $NetBSD: scanner.l,v 1.1.1.2 2013/04/06 14:05:58 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.
*/
%{
#include <stdio.h>
#include <stdlib.h>
#include "config.h"
%}
%option 8bit prefix="test"
%option nounput nomain noyywrap
%option warn reject
%%
. { REJECT; }
.|\n ;
%%
int main ( int argc, char** argv )
{
FILE* fp = NULL;
void *yyscanner=0;
M4_YY_DECL_GUTS_VAR();
#ifdef TEST_IS_REENTRANT
yylex_init(&yyscanner);
#endif
#ifdef TEST_HAS_TABLES_EXTERNAL
if((fp = fopen(argv[1],"r"))== NULL)
YY_FATAL_ERROR("could not open tables file for reading");
if(yytables_fload(fp M4_YY_CALL_LAST_ARG) < 0)
YY_FATAL_ERROR("yytables_fload returned < 0");
if(M4_YY_TABLES_VERIFY)
exit(0);
#endif
if(argc > 2){
if((fp = fopen(argv[2],"r"))== NULL)
YY_FATAL_ERROR("could not open input file for reading");
yyin = fp;
}
while(yylex(M4_YY_CALL_ONLY_ARG) != 0)
;
#ifdef TEST_HAS_TABLES_EXTERNAL
yytables_destroy(M4_YY_CALL_ONLY_ARG);
#endif
yylex_destroy(M4_YY_CALL_ONLY_ARG);
if(argc < 0) /* silence the compiler */
yyscanner = (void*)fp;
return 0;
}