X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=sect.c;h=781a81bda516c5e5fdbf7f0f06351a8a3e63f69e;hp=3cedbb24221c2f7279b40612cce48faef1f9e3d4;hb=HEAD;hpb=09135712da4550a1d5d014051e8ef3cc6dd47d99

diff --git a/sect.c b/sect.c
index 3cedbb2..12f9c89 100644
--- a/sect.c
+++ b/sect.c
@@ -18,9 +18,8 @@
 #include "riscasm.h"
 #include "symbol.h"
 #include "token.h"
-#define DEF_KW
-#include "kwtab.h"
-#undef DEF_KW
+#define DEF_REGRISC
+#include "riscregs.h"
 
 // Function prototypes
 void MakeSection(int, uint16_t);
@@ -463,6 +462,15 @@ int ResolveFixups(int sno)
 			if (evexpr(fup->expr, &eval, &eattr, &esym) != OK)
 				continue;
 
+			if (esym)
+				if (!(esym->sattr & DEFINED) && eval==0)
+				{
+					// If our expression still has an undefined symbol at this stage, it's bad news.
+					// The linker is never going to resolve the expression, so that's an error.
+					error("cannot export complex expression with unresloved symbol '%s'", esym->sname);
+					continue;
+				}
+
 			if ((CHECK_OPTS(OPT_PC_RELATIVE)) && (eattr & (DEFINED | REFERENCED | EQUATED)) == (DEFINED | REFERENCED))
 			{
 				error("relocation not allowed when o30 is enabled");
@@ -549,6 +557,9 @@ int ResolveFixups(int sno)
 						// In this instruction the PC is located a DWORD away
 						if (dw & FU_PCRELX)
 							eval += 2;
+						
+						if ((int64_t)eval > 0x7fff || (int64_t)eval < -32768)
+							error(range_error);
 					}
 					else
 					{
@@ -722,7 +733,7 @@ int ResolveFixups(int sno)
 			}
 			else if ((dw & FUMASKRISC) == FU_REGONE)
 			{
-				eval -= KW_R0;
+				eval -= REGRISC_R0;
 				if (eval > 31)
 				{
 					error("register one value out of range");
@@ -736,7 +747,7 @@ int ResolveFixups(int sno)
 			}
 			else if ((dw & FUMASKRISC) == FU_REGTWO)
 			{
-				eval -= KW_R0;
+				eval -= REGRISC_R0;
 				if (eval > 31)
 				{
 					error("register two value out of range");