From 60f04ca053600c948a3b3e807884665b3b151db8 Mon Sep 17 00:00:00 2001
From: Andrew Alderwick <andrew@alderwick.co.uk>
Date: Wed, 1 Dec 2021 11:42:44 +0000
Subject: [PATCH] (uxnasm) Add error for relative references that are too far.

---
 src/uxnasm.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/uxnasm.c b/src/uxnasm.c
index 6da762b..d63ec32 100644
--- a/src/uxnasm.c
+++ b/src/uxnasm.c
@@ -351,6 +351,8 @@ resolve(void)
 			if(!(l = findlabel(r->name)))
 				return error("Unknown relative reference", r->name);
 			p.data[r->addr + 1] = (Sint8)(l->addr - r->addr - 3);
+			if((Sint8)p.data[r->addr + 1] != (l->addr - r->addr - 3))
+				return error("Relative reference is too far", r->name);
 			l->refs++;
 			break;
 		case ';':