view lwasm/insn_inh.c @ 381:e3f4aaa2a4e8

Allow FCB-like syntax after constant in FCC under m80ext This is an abomination (say what you really mean!) but for compatibilty with Macro-80C, allow handling of FCB style syntax after a string constant specified for FCC. Mostly, there are better ways to do this in new code so it is only accepted under the m80ext pragma. Thanks to Erik G <erik@6809.org> for the patch.
author William Astle <lost@l-w.ca>
date Mon, 13 Jul 2015 21:11:12 -0600
parents 35d4213e6657
children 4fd16faa4d93
line wrap: on
line source

/*
insn_inh.c
Copyright © 2010 William Astle

This file is part of LWASM.

LWASM 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 "lwasm.h"
#include "instab.h"

PARSEFUNC(insn_parse_inh)
{
	l -> len = OPLEN(instab[l -> insn].ops[0]);
	skip_operand(p);
}

EMITFUNC(insn_emit_inh)
{
	lwasm_emitop(l, instab[l -> insn].ops[0]);
}

PARSEFUNC(insn_parse_inh6800)
{
	// there may be two operations here so check for both
	l -> len = OPLEN(instab[l -> insn].ops[0]);
	if (instab[l -> insn].ops[1] >= 0)
		l -> len += OPLEN(instab[l -> insn].ops[1]);
}

EMITFUNC(insn_emit_inh6800)
{
	// there may be two operations here so check for both
	lwasm_emitop(l, instab[l -> insn].ops[0]);
	if (instab[l -> insn].ops[1] >= 0)
		lwasm_emitop(l, instab[l -> insn].ops[1]);

	l -> cycle_adj = instab[l -> insn].ops[3];
}