X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=rmac.c;h=ee8d9ee3a70b6a9273f6ac6e0df8544585886579;hp=0683739847ce7172b1562068545f393a5b969266;hb=40f1a3ec69fd0f0dade867d8ffcb840add5b21f1;hpb=01ad052f31fbf2660fec864060aca90c7761a25a

diff --git a/rmac.c b/rmac.c
index 0683739..ee8d9ee 100644
--- a/rmac.c
+++ b/rmac.c
@@ -45,7 +45,7 @@ char * firstfname;				// First source filename
 char * cmdlnexec;				// Executable name, pointer to ARGV[0]
 char * searchpath;				// Search path for include files 
 char defname[] = "noname.o";	// Default output filename
-
+int optim_flag;					// Optimise all the things!
 
 //
 // Manipulate file extension.
@@ -142,8 +142,11 @@ void DisplayHelp(void)
 		"                    d: double phrase (16 bytes)\n"
 		"                    q: quad phrase (32 bytes)\n"
 		"  -s                Warn about possible short branches\n"
+		"                    and applied optimisations\n"
 		"  -u                Force referenced and undefined symbols global\n"
+		"  -w                Turn off optimisations done automatically\n"
 		"  -v                Set verbose mode\n"
+		"  -x                Turn on debugging mode\n"
 		"  -y[pagelen]       Set page line length (default: 61)\n"
 		"\n", cmdlnexec);
 }
@@ -200,6 +203,7 @@ int Process(int argc, char ** argv)
 	orgactive = 0;					// Not in RISC org section
 	orgwarning = 0;					// No ORG warning issued
 	segpadsize = 2;					// Initialise segment padding size
+	optim_flag = 1;					// Automatically optimise
 
 	// Initialise modules
 	InitSymbolTable();				// Symbol table
@@ -357,6 +361,10 @@ int Process(int argc, char ** argv)
 					DisplayVersion();
 
 				break;
+			case 'w':
+			case 'W':
+				optim_flag=0;
+				break;
 			case 'x':				// Turn on debugging
 			case 'X':
 				debug = 1;