view lwasm/pass3.c @ 66:0359d9f1dfca

Added tag lwtools-4.0 for changeset 05f1a31f8f1e
author lost@l-w.ca
date Fri, 08 Apr 2011 21:38:15 -0600
parents 2c24602be78f
children 697bc543368c
line wrap: on
line source

/*
pass3.c

Copyright © 2010 William Astle

This file is part of LWTOOLS.

LWTOOLS is free software: you can redistribute it and/or modify it under the
terms of the GNU General Public License as published by the Free Software
Foundation, either version 3 of the License, or (at your option) any later
version.

This program is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
more details.

You should have received a copy of the GNU General Public License along with
this program. If not, see <http://www.gnu.org/licenses/>.
*/

#include <stdio.h>
#include <string.h>

#include <lw_alloc.h>
#include <lw_string.h>

#include "lwasm.h"
#include "instab.h"

/*
Resolve1 Pass

repeatedly resolve instruction sizes and line addresses
until nothing more reduces

*/
void do_pass3(asmstate_t *as)
{
	int rc;
	line_t *cl;
	struct line_expr_s *le;
	
	do
	{
		rc = 0;
		for (cl = as -> line_head; cl; cl = cl -> next)
		{
			as -> cl = cl;
			
			// simplify address
			lwasm_reduce_expr(as, cl -> addr);
		
			// simplify each expression
			for (le = cl -> exprs; le; le = le -> next)
				lwasm_reduce_expr(as, le -> expr);
			
			if (cl -> len == -1)
			{
				// try resolving the instruction length
				// but don't force resolution
				if (cl -> insn >= 0 && instab[cl -> insn].resolve)
				{
					(instab[cl -> insn].resolve)(as, cl, 0);
					if (cl -> len != -1)
						rc++;
				}
			}
		}
		if (as -> errorcount > 0)
			return;
	} while (rc > 0);
}