minix/external/bsd/flex/dist/tests/test-lineno-r/scanner.l
2012-06-18 10:54:47 +00:00

99 lines
2.4 KiB
Text

/* $NetBSD: scanner.l,v 1.1.1.1 2009/10/26 00:29:25 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".
Run as:
test-lineno-r # report flex's yylineno
test-lineno-r 1 # report count_newlines(stdin)
*/
#include <stdio.h>
#include <stdlib.h>
#include "config.h"
%}
%option 8bit outfile="scanner.c" prefix="test"
%option nounput nomain noyywrap yylineno reentrant
%option warn
WORD [[:alpha:]]+
DIGIT [[:digit:]]
%%
/* The goal here is to test the yylineno processing by:
- providing some rules than CAN match newlines and
other rules that can NOT match newlines,
- matching several newlines in one rule,
- directly modifying yylineno.
*/
"yylineno++" yylineno++;
"yylineno--" yylineno--;
[[:blank:]]+
{WORD}
{DIGIT}+(\n{DIGIT}+)*
\n
.
<<EOF>> { printf("%d\n", yylineno);
yyterminate();
}
%%
/* returns number of '\n' characters in input, plus one.
This is what flex does, essentially. */
static int
count_newlines (FILE* in)
{
int n=1,c;
while ((c=fgetc(in)) != EOF)
if( c == '\n')
n++;
return n;
}
int main ( int argc, char** argv );
int
main (argc, argv)
int argc;
char ** argv;
{
if( argc > 1 )
printf("%d\n", count_newlines(stdin));
else{
yyscan_t s;
yylex_init(&s);
yyset_in(stdin,s);
yyset_out(stdout,s);
yylex(s);
yylex_destroy(s);
}
return 0;
}