xref: /netbsd-src/usr.bin/m4/parser.y (revision 413d532bcc3f62d122e56d92e13ac64825a40baf)
1 %{
2 /* $NetBSD: parser.y,v 1.2 2009/10/26 21:11:28 christos Exp $ */
3 /* $OpenBSD: parser.y,v 1.6 2008/08/21 21:00:14 espie Exp $ */
4 /*
5  * Copyright (c) 2004 Marc Espie <espie@cvs.openbsd.org>
6  *
7  * Permission to use, copy, modify, and distribute this software for any
8  * purpose with or without fee is hereby granted, provided that the above
9  * copyright notice and this permission notice appear in all copies.
10  *
11  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
12  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
14  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
17  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
18  */
19 #if HAVE_NBTOOL_CONFIG_H
20 #include "nbtool_config.h"
21 #endif
22 __RCSID("$NetBSD: parser.y,v 1.2 2009/10/26 21:11:28 christos Exp $");
23 #include <stdint.h>
24 #define YYSTYPE	int32_t
25 extern int32_t end_result;
26 extern int yylex(void);
27 extern int yyerror(const char *);
28 %}
29 %token NUMBER
30 %token ERROR
31 %left LOR
32 %left LAND
33 %left '|'
34 %left '^'
35 %left '&'
36 %left EQ NE
37 %left '<' LE '>' GE
38 %left LSHIFT RSHIFT
39 %left '+' '-'
40 %left '*' '/' '%'
41 %right UMINUS UPLUS '!' '~'
42 
43 %%
44 
45 top	: expr { end_result = $1; }
46 	;
47 expr 	: expr '+' expr { $$ = $1 + $3; }
48      	| expr '-' expr { $$ = $1 - $3; }
49      	| expr '*' expr { $$ = $1 * $3; }
50 	| expr '/' expr {
51 		if ($3 == 0) {
52 			yyerror("division by zero");
53 			exit(1);
54 		}
55 		$$ = $1 / $3;
56 	}
57 	| expr '%' expr {
58 		if ($3 == 0) {
59 			yyerror("modulo zero");
60 			exit(1);
61 		}
62 		$$ = $1 % $3;
63 	}
64 	| expr LSHIFT expr { $$ = $1 << $3; }
65 	| expr RSHIFT expr { $$ = $1 >> $3; }
66 	| expr '<' expr { $$ = $1 < $3; }
67 	| expr '>' expr { $$ = $1 > $3; }
68 	| expr LE expr { $$ = $1 <= $3; }
69 	| expr GE expr { $$ = $1 >= $3; }
70 	| expr EQ expr { $$ = $1 == $3; }
71 	| expr NE expr { $$ = $1 != $3; }
72 	| expr '&' expr { $$ = $1 & $3; }
73 	| expr '^' expr { $$ = $1 ^ $3; }
74 	| expr '|' expr { $$ = $1 | $3; }
75 	| expr LAND expr { $$ = $1 && $3; }
76 	| expr LOR expr { $$ = $1 || $3; }
77 	| '(' expr ')' { $$ = $2; }
78 	| '-' expr %prec UMINUS { $$ = -$2; }
79 	| '+' expr %prec UPLUS  { $$ = $2; }
80 	| '!' expr { $$ = !$2; }
81 	| '~' expr { $$ = ~$2; }
82 	| NUMBER
83 	;
84 %%
85 
86