minix/external/bsd/flex/dist/tests/test-quotes/scanner.l

104 lines
3.1 KiB
Text
Raw Normal View History

2012-06-06 16:10:32 +02:00
/* $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.
*/
/* The point of this test is to be sure our M4 madness does not
* interfere with user code. I particular, we are looking
* for instances of M4 quotes, [[ and ]], in here to make it through the flex
* machinery unscathed.
*/
/* sect 1 [ 1 ] TEST_XXX */
/* sect 1 [[ 2 ]] TEST_XXX */
/* sect 1 [[[ 3 ]]] TEST_XXX */
/* sect 1 [[[[ 4 ]]]] TEST_XXX */
/* sect 1 ]] unmatched [[ TEST_XXX */
%{
/* A template scanner file to build "scanner.c". */
#include <stdio.h>
#include <stdlib.h>
#include "config.h"
/*#include "parser.h" */
/* sect 1 block [ 1 ] TEST_XXX */
/* sect 1 block [[ 2 ]] TEST_XXX */
/* sect 1 block [[[ 3 ]]] TEST_XXX */
/* sect 1 block [[[[ 4 ]]]] TEST_XXX */
/* sect 1 block ]] unmatched [[ TEST_XXX */
static int a[1] = {0};
static int b[1] = {0};
static int c[1] = {0};
static int foo (int i){
return a[b[c[i]]]; /* sect 1 code TEST_XXX */
}
%}
%option 8bit outfile="scanner.c" prefix="test"
%option nounput nomain noyywrap
%option warn
%%
a /* action comment [ 1 ] */ ;
b /* action comment [[ 2 ]] */ ;
c /* action comment [[[ 3 ]]] */ ;
d /* action comment [[[[ 4 ]]]] */ ;
e /* action comment ]] unmatched [[ */ ;
f return 1+foo(a[b[c[0]]]);
.|\n {
/* action block [ 1 ] TEST_XXX */
/* action block [[ 2 ]] TEST_XXX */
/* action block [[[ 3 ]]] TEST_XXX */
/* action block [[[[ 4 ]]]] TEST_XXX */
/* action block ]] unmatched [[ TEST_XXX */
return 1+foo(a[b[c[0]]]); // TEST_XXX
}
%%
/* sect 3 [ 1 ] TEST_XXX */
/* sect 3 [[ 2 ]] TEST_XXX */
/* sect 3 [[[ 3 ]]] TEST_XXX */
/* sect 3 [[[[ 4 ]]]] TEST_XXX */
/* sect 3 ]] unmatched [[ TEST_XXX */
static int bar (int i){
return c[b[a[i]]]; /* sect 3 code TEST_XXX */
}
int main(void);
int
main ()
{
yyin = stdin;
yyout = stdout;
while (yylex())
;
printf("TEST RETURNING OK.\n");
return bar(0);
}