/* $NetBSD: parser.y,v 1.1.1.1 2009/10/26 00:29:17 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. */ /* How to compile: bison --defines --output-file="parser.c" --name-prefix="test" parser.y */ %{ #include #include #include #include "config.h" #define YYERROR_VERBOSE 1 /* #define YYPARSE_PARAM scanner */ /* #define YYLEX_PARAM scanner */ int yyerror(char* msg); extern int testget_lineno(void); /* A dummy function. A check against seg-faults in yylval->str. */ int process_text(char* s) { int total =0; while(*s) { total += (int) *s; ++s; } return total; } %} %pure_parser %union { int lineno; char * str; } %token IDENT %token LINENO %token EQUAL "=" %token COLON ":" %token SPACE " " %% file: line | file line ; line: LINENO COLON SPACE IDENT EQUAL IDENT { process_text($4); process_text($6); /* Check lineno. */ if( $1 != @1.first_line || $1 != testget_lineno()) { yyerror("Parse failed: Line numbers do not match."); YYABORT; } /* Recreate the line to stdout. */ printf ( "%04d: %s=%s\n", @1.first_line, $4, $6); } ; %% int yyerror(char* msg) { fprintf(stderr,"%s\n",msg); return 0; }