shithub: scc

Info  •  Files  •  Log  •  Branches

[as-z80] Fix RET cc opcodes

The test for flag was inside of the test for imm, and this
was false in the case of RET.

--- a/as/target/x80/ins.c

+++ b/as/target/x80/ins.c

@@ -370,18 +370,18 @@

 	if (imm) {

 		val = imm->sym->value;

-		if (!relative) {

-			fun = cc2int;

+		if (!relative)

 			buf[--i] = val >> 8;

-		} else {

-			fun = ss2int;

+		else

 			val -= cursec->curpc - 2;

-		}

 		buf[--i] = val;

-		if (flag)

-			buf[--i] |= (*fun)(flag) << 3;

 	}

+	if (flag) {

+		fun = (relative) ? ss2int : cc2int;

+		buf[--i] |= (*fun)(flag) << 3;

+	}

+

 	emit(buf, n);

 }