X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=mark.c;h=7495c71c1eeecf571b26b7031dba32ae97495495;hb=d1f5f1caccb26da6a3da7fc00b94b79000a55302;hp=088263b2c0271d795f33b043046fda331f01bd97;hpb=03dd34951a331e0b8971195ccef1600fffaea2e6;p=rmac

diff --git a/mark.c b/mark.c
index 088263b..7495c71 100644
--- a/mark.c
+++ b/mark.c
@@ -90,18 +90,13 @@ if (symbol)
 
 	//
 	// Complain about some things are not allowed in '-p' (PRG) mode:
-	//  o Marks that aren't to LONGs
-	//  o External references
+	//  o  Marks that aren't to LONGs
+	//  o  External references
 	//
 	if (prg_flag)
 	{
-#if 0
-		if ((flags & MLONG) == 0)
-			error("illegal word relocatable (in .PRG mode)");
-#endif
-
 		if (symbol != NULL)
-			errors("illegal external reference (in .PRG mode) to '%s'",
+			error("illegal external reference (in .PRG mode) to '%s'",
 				symbol->sname);
 	}
 
@@ -533,7 +528,7 @@ uint32_t CreateELFRelocationRecord(uint8_t * buf, uint8_t * secBuf, uint16_t sec
 
 				// Deposit the relocation record
 				D_long(r_offset);
-				D_long((r_sym << 8) | r_type);
+				D_long(((r_sym << 8) | r_type));
 				D_long(r_addend);
 				rsize += 0x0C;
 			}