X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=eagen0.c;h=2df5eceea09d11eb470232e8796d48c950bca594;hp=533dfa2e4eafadeca90506d770efbb32326ae1ee;hb=febff0eb16dd34a94b5b69cd89aacfea6fe870a9;hpb=7d0d2b9ecddea35722fd1d09c99735b98f6f0362

diff --git a/eagen0.c b/eagen0.c
index 533dfa2..2df5ece 100644
--- a/eagen0.c
+++ b/eagen0.c
@@ -2,7 +2,7 @@
 // RMAC - Reboot's Macro Assembler for all Atari computers
 // EAGEN0.C - Effective Address Code Generation
 //            Generated Code for eaN (Included twice by "eagen.c")
-// Copyright (C) 199x Landon Dyer, 2011-2019 Reboot and Friends
+// Copyright (C) 199x Landon Dyer, 2011-2020 Reboot and Friends
 // RMAC derived from MADMAC v1.07 Written by Landon Dyer, 1986
 // Source utilised with the kind permission of Landon Dyer
 //
@@ -326,6 +326,10 @@ int eaNgen(WORD siz)
 	case ABSL:
 		if (w) // Defined
 		{
+			if (optim_pc)
+				if (aNexattr&(DEFINED | REFERENCED | EQUATED) == DEFINED | REFERENCED)
+					return error("relocation not allowed");
+
 			if (tdb)
 				MarkRelocatable(cursect, sloc, tdb, MLONG, NULL);