X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=rmac.c;h=a8eb72c8661e95d3108a1acb2c3e7007784479b2;hp=a7d1770b1a2348fc81ac1ccbedca0495c1f806df;hb=91beff6462d791d651b66ed0e1a4e1a82157fb6d;hpb=d1fe92e22362ab81cdf10f09b4847261f3b9899a

diff --git a/rmac.c b/rmac.c
index a7d1770..a8eb72c 100644
--- a/rmac.c
+++ b/rmac.c
@@ -132,6 +132,8 @@ void DisplayHelp(void)
 		"  -l[filename]      Create an output listing file\n"
 		"  -n                Don't do things behind your back in RISC assembler\n"
 		"  -o file           Output file name\n"
+		"  -p[n]             Create an ST .prg (1=normal, 2=w/symbols)\n"
+		"                    Forces -fa\n"
 		"  -r[size]          Pad segments to boundary size specified\n"
 		"                    w: word (2 bytes, default alignment)\n"
 		"                    l: long (4 bytes)\n"
@@ -316,6 +318,10 @@ int Process(int argc, char ** argv)
 						++errcnt;
 						return errcnt;
 				}
+
+				// Enforce Alcyon object format - kind of silly
+				// to ask for .prg output without it!
+				obj_format = ALCYON;
 				break;
 			case 'r':				// Pad seg to requested boundary size
 			case 'R':