shithub: riscv

Info  •  Files  •  Log  •  Branches

/sys/lib/acid/port: mind upper bounds of fnbound

Fnbound's upper bound is exclusive.

--- a/sys/lib/acid/port

+++ b/sys/lib/acid/port

@@ -517,7 +517,7 @@

 	loop 1,_asmlines do {

 		print(fmt(addr, 'a'), " ", fmt(addr, 'A'));

 		print("\t", @addr++, "\n");

-		if bound != {} && addr > bound[1] then {

+		if bound != {} && addr >= bound[1] then {

 			lasmaddr = addr;

 			return {};

 		}

@@ -627,7 +627,7 @@

 	if pc >= bound[0] && pc < bound[1] then

 		return {};

-	while (pc < bound[0] || pc > bound[1]) && sp >= *SP do {

+	while (pc < bound[0] || pc >= bound[1]) && sp >= *SP do {

 		step();

 		pc = *PC;

 	}