From 04cd22847ec65c670b992b24cd88d9cec8e441be Mon Sep 17 00:00:00 2001
From: zerico <71151164+ZERICO2005@users.noreply.github.com>
Date: Fri, 30 Jan 2026 19:15:40 -0700
Subject: [PATCH 1/2] combined two nearby rjumps

---
 src/libload/libload.asm | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/src/libload/libload.asm b/src/libload/libload.asm
index 803639981..d5a6dbcf3 100644
--- a/src/libload/libload.asm
+++ b/src/libload/libload.asm
@@ -538,10 +538,7 @@ check_for_lib_marker:
 	jr	z, goto_load_lib
 	set	optional, (iy + LIB_FLAGS)
 	cp	a, OPT_LIB_MARKER
-	jr	nz, check_has_deps
-goto_load_lib:
-	rjump	load_lib		; load the next library
-
+	jr	z, goto_load_lib	; load the next library
 check_has_deps:				; the first time we hit this,  we have all the dependencies placed onto the queue that the libraries use.
 	res	optional, (iy + LIB_FLAGS)
 	bit	is_dep, (iy + LIB_FLAGS)
@@ -555,15 +552,16 @@ load_next_dep:
 	sbc	hl, de			; make sure we are done parsing the dependency queue
 	add	hl, de
 					; now we need to parse the libraries like they are programs. this will be fun.
-	jr	z, .exit
+	jr	z, start_execution
 	dec	hl
 	dec	hl
 	dec	hl			; hl->dependency ($C0, "LIBNAME", 0, VERSION, JUMP_TABLE)
 	ld	(end_dep_queue), hl
 	ld	hl, (hl)		; valid pointer to $C0 (REQ_LIB_MARKER)
+goto_load_lib:
 	rjump	load_lib		; load current dependency if needed,  or resolve entry points
 
-.exit:
+start_execution:
 	call	ti.PopOP1		; restore program name
 	ld	hl, (prgm_start)
 	ld	ix, (ix_save)		; restore IX register

From 22dc2df9dac285e8e1cd9b89cd4157b5456accc6 Mon Sep 17 00:00:00 2001
From: unknown <71151164+ZERICO2005@users.noreply.github.com>
Date: Sun, 21 Sep 2025 19:06:51 -0600
Subject: [PATCH 2/2] optimize jump relative (it no longer clobbers IX)

---
 src/libload/libload.asm | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/src/libload/libload.asm b/src/libload/libload.asm
index d5a6dbcf3..3ab255f7f 100644
--- a/src/libload/libload.asm
+++ b/src/libload/libload.asm
@@ -155,12 +155,13 @@ call_relative:
 	jp	(ix)
 end if
 jump_relative:
-	pop	ix
+	ex	(sp), hl
 	push	de
-	ld	de, (ix)
-	add	ix, de
+	ld	de, (hl)
+	add	hl, de
 	pop	de
-	jp	(ix)
+	ex	(sp), hl
+	ret
 ld_relative:
 	pop	hl
 	ld	de, 0