Mercurial > hg > index.cgi
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]; }