godzil/ack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Next batch...

Browse Source
This commit is contained in:
Manoel Trapier
2013-03-13 18:56:03 +01:00
committed by Manoël Trapier
parent c5bfc89269
commit 41f96d5169
85 changed files with 1138 additions and 1727 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
util/ego/share/parser.c
View File

@@ -41,12 +41,9 @@ typedef struct class *class_p;
* generated automatically from the file classdefs.src.
*/
STATIC bool classes(instr,src_out,res_out)
int instr;
int *src_out, *res_out;
static bool classes(int instr, int *src_out, int *res_out)
{
/* Determine the classes of the given instruction */
class_p c;
if (instr < sp_fmnem || instr > sp_lmnem) return FALSE;
@@ -59,8 +56,7 @@ STATIC bool classes(instr,src_out,res_out)
STATIC bool uses_arg(class)
int class;
static bool uses_arg(int class)
{
/* See if a member of the given class uses
* an argument.
@@ -82,8 +78,7 @@ STATIC bool uses_arg(class)
STATIC bool uses_2args(class)
int class;
static bool uses_2args(int class)
{
/* See if a member of the given class uses
* 2 arguments.
@@ -93,9 +88,7 @@ STATIC bool uses_2args(class)
}
STATIC bool parse_locs(l,c1_out,c2_out)
line_p l;
offset *c1_out, *c2_out;
static bool parse_locs(line_p l, offset *c1_out, offset *c2_out)
{
if (INSTR(l) == op_loc && INSTR(PREV(l)) == op_loc) {
*c1_out = off_set(l);
@@ -107,10 +100,7 @@ STATIC bool parse_locs(l,c1_out,c2_out)
STATIC bool check_args(l,src_class,res_class,arg1_out,arg2_out)
line_p l;
int src_class,res_class;
offset *arg1_out, *arg2_out;
static bool check_args(line_p l, int src_class, int res_class, offset *arg1_out, offset *arg2_out)
{
/* Several EM instructions have an argument
* giving the size of the operand(s) of
@@ -144,9 +134,7 @@ STATIC bool check_args(l,src_class,res_class,arg1_out,arg2_out)
STATIC offset nrbytes(class,arg1,arg2)
int class;
offset arg1,arg2;
static offset nrbytes(int class, offset arg1, offset arg2)
{
/* Determine the number of bytes of the given
* arguments and class.
@@ -185,9 +173,7 @@ STATIC offset nrbytes(class,arg1,arg2)
STATIC attrib(l,expect_out,srcb_out,resb_out)
line_p l;
offset *expect_out, *srcb_out, *resb_out;
static void attrib(line_p l, offset *expect_out, offset *srcb_out, offset *resb_out)
{
/* Determine a number of attributes of an EM
* instruction appearing in an expression.
@@ -215,11 +201,7 @@ STATIC attrib(l,expect_out,srcb_out,resb_out)
bool parse(l,nbytes,l_out,level,action0)
line_p l, *l_out;
offset nbytes;
int level;
int (*action0) ();
bool parse(line_p l, offset nbytes, line_p *l_out, int level, int (*action0)(line_p, line_p, offset))
{
/* This is a recursive descent parser for
* EM expressions.