1/***********************************************************************
2*                                                                      *
3*               This software is part of the ast package               *
4*          Copyright (c) 1982-2010 AT&T Intellectual Property          *
5*                      and is licensed under the                       *
6*                  Common Public License, Version 1.0                  *
7*                    by AT&T Intellectual Property                     *
8*                                                                      *
9*                A copy of the License is available at                 *
10*            http://www.opensource.org/licenses/cpl1.0.txt             *
11*         (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9)         *
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
29const 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 */
72const 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
87const char e_argcount[]		= "%s: function has wrong number of arguments";
88const char e_badnum[]		= "%s: bad number";
89const char e_moretokens[]	= "%s: more tokens expected";
90const char e_paren[]		= "%s: unbalanced parenthesis";
91const char e_badcolon[]		= "%s: invalid use of :";
92const char e_divzero[]		= "%s: divide by zero";
93const char e_synbad[]		= "%s: arithmetic syntax error";
94const char e_notlvalue[]	= "%s: assignment requires lvalue";
95const char e_recursive[]	= "%s: recursion too deep";
96const char e_questcolon[]	= "%s: ':' expected for '?' operator";
97const char e_function[]		= "%s: unknown function";
98const char e_incompatible[]	= "%s: invalid floating point operation";
99const char e_overflow[]		= "%s: overflow exception";
100const char e_domain[]		= "%s: domain exception";
101const char e_singularity[]	= "%s: singularity exception";
102const char e_charconst[]	= "%s: invalid character constant";
103
104#include	"FEATURE/math"
105