1 /***********************************************************************
2 *                                                                      *
3 *               This software is part of the ast package               *
4 *          Copyright (c) 1982-2011 AT&T Intellectual Property          *
5 *                      and is licensed under the                       *
6 *                 Eclipse Public License, Version 1.0                  *
7 *                    by AT&T Intellectual Property                     *
8 *                                                                      *
9 *                A copy of the License is available at                 *
10 *          http://www.eclipse.org/org/documents/epl-v10.html           *
11 *         (with md5 checksum b35adb5213ca9657e911e9befb180842)         *
12 *                                                                      *
13 *              Information and Software Systems Research               *
14 *                            AT&T Research                             *
15 *                           Florham Park NJ                            *
16 *                                                                      *
17 *                  David Korn <dgk@research.att.com>                   *
18 *                                                                      *
19 ***********************************************************************/
20 #pragma prototyped
21 /*
22  * data for string evaluator library
23  */
24 
25 #include	<ast_standards.h>
26 #include	"FEATURE/options"
27 #include	"streval.h"
28 
29 const unsigned char strval_precedence[35] =
30 	/* opcode	precedence,assignment  */
31 {
32 	/* DEFAULT */		MAXPREC|NOASSIGN,
33 	/* DONE */		0|NOASSIGN|RASSOC,
34 	/* NEQ */		10|NOASSIGN,
35 	/* NOT */		MAXPREC|NOASSIGN,
36 	/* MOD */		14,
37 	/* ANDAND */		6|NOASSIGN|SEQPOINT,
38 	/* AND */		9|NOFLOAT,
39 	/* LPAREN */		MAXPREC|NOASSIGN|SEQPOINT,
40 	/* RPAREN */		1|NOASSIGN|RASSOC|SEQPOINT,
41 	/* POW */		14|NOASSIGN|RASSOC,
42 	/* TIMES */		14,
43 	/* PLUSPLUS */		15|NOASSIGN|NOFLOAT|SEQPOINT,
44 	/* PLUS */		13,
45 	/* COMMA */		1|NOASSIGN|SEQPOINT,
46 	/* MINUSMINUS */	15|NOASSIGN|NOFLOAT|SEQPOINT,
47 	/* MINUS */		13,
48 	/* DIV */		14,
49 	/* LSHIFT */		12|NOFLOAT,
50 	/* LE */		11|NOASSIGN,
51 	/* LT */		11|NOASSIGN,
52 	/* EQ */		10|NOASSIGN,
53 	/* ASSIGNMENT */	2|RASSOC,
54 	/* COLON */		0|NOASSIGN,
55 	/* RSHIFT */		12|NOFLOAT,
56 	/* GE */		11|NOASSIGN,
57 	/* GT */		11|NOASSIGN,
58 	/* QCOLON */		3|NOASSIGN|SEQPOINT,
59 	/* QUEST */		3|NOASSIGN|SEQPOINT|RASSOC,
60 	/* XOR */		8|NOFLOAT,
61 	/* OROR */		5|NOASSIGN|SEQPOINT,
62 	/* OR */		7|NOFLOAT,
63 	/* DEFAULT */		MAXPREC|NOASSIGN,
64 	/* DEFAULT */		MAXPREC|NOASSIGN,
65 	/* DEFAULT */		MAXPREC|NOASSIGN,
66 	/* DEFAULT */		MAXPREC|NOASSIGN
67 };
68 
69 /*
70  * This is for arithmetic expressions
71  */
72 const char strval_states[64] =
73 {
74 	A_EOF,	A_REG,	A_REG,	A_REG,	A_REG,	A_REG,	A_REG,	A_REG,
75 	A_REG,	0,	0,	A_REG,	A_REG,	A_REG,	A_REG,	A_REG,
76 	A_REG,	A_REG,	A_REG,	A_REG,	A_REG,	A_REG,	A_REG,	A_REG,
77 	A_REG,	A_REG,	A_REG,	A_REG,	A_REG,	A_REG,	A_REG,	A_REG,
78 
79 	0,	A_NOT,	0,	A_REG,	A_REG,	A_MOD,	A_AND,	A_LIT,
80 	A_LPAR,	A_RPAR,	A_TIMES,A_PLUS,	A_COMMA,A_MINUS,A_DOT,	A_DIV,
81 	A_DIG,	A_DIG,	A_DIG,	A_DIG,	A_DIG,	A_DIG,	A_DIG,	A_DIG,
82 	A_DIG,	A_DIG,	A_COLON,A_REG,	A_LT,	A_ASSIGN,A_GT,	A_QUEST
83 
84 };
85 
86 
87 const char e_argcount[]		= "%s: function has wrong number of arguments";
88 const char e_badnum[]		= "%s: bad number";
89 const char e_moretokens[]	= "%s: more tokens expected";
90 const char e_paren[]		= "%s: unbalanced parenthesis";
91 const char e_badcolon[]		= "%s: invalid use of :";
92 const char e_divzero[]		= "%s: divide by zero";
93 const char e_synbad[]		= "%s: arithmetic syntax error";
94 const char e_notlvalue[]	= "%s: assignment requires lvalue";
95 const char e_recursive[]	= "%s: recursion too deep";
96 const char e_questcolon[]	= "%s: ':' expected for '?' operator";
97 const char e_function[]		= "%s: unknown function";
98 const char e_incompatible[]	= "%s: invalid floating point operation";
99 const char e_overflow[]		= "%s: overflow exception";
100 const char e_domain[]		= "%s: domain exception";
101 const char e_singularity[]	= "%s: singularity exception";
102 const char e_charconst[]	= "%s: invalid character constant";
103 
104 #include	"FEATURE/math"
105