X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=object.c;h=af019f07c14a8ef32d78e04d655840443d131040;hp=cbedaab6b0b2cdf5907af53d377a42cb4dc5b8ab;hb=5cd8a4814b805f1ef8ce689423eb5eeba12573c5;hpb=60f204cb9e3905100da0d89f14bb40db764acd9e

diff --git a/object.c b/object.c
index cbedaab..af019f0 100644
--- a/object.c
+++ b/object.c
@@ -12,7 +12,7 @@
 #include "riscasm.h"
 #include "sect.h"
 #include "symbol.h"
-
+extern void m6502obj(int ofd);
 
 //#define DEBUG_ELF
 
@@ -57,7 +57,7 @@ See left.		4 & 5	If these bits are set to 0 (PF_PRIVATE), the processes'
 
 
 //
-// Add entry to symbol table
+// Add entry to symbol table (in ALCYON mode)
 // If 'globflag' is 1, make the symbol global
 // If in .PRG mode, adjust symbol values for fake link
 //
@@ -752,6 +752,11 @@ for(int j=0; j<i; j++)
 			free(strtable);
 		}
 	}
+	else if (obj_format == XEX)
+	{
+		// Just write the object file
+		m6502obj(fd);
+	}
 
 	return 0;
 }