+//
+// .opt - turn a specific (or all) optimisation on or off
+//
+int d_opt(void)
+{
+ char * tmpstr;
+
+ while (*tok != EOL)
+ {
+ if (*tok == STRING)
+ {
+ tok++;
+ tmpstr = string[*tok++];
+
+ if (ParseOptimization(tmpstr) != OK)
+ {
+ char temperr[256];
+ sprintf(temperr, "unknown optimisation flag '%s'.", tmpstr);
+ return error(temperr);
+ }
+ }
+ else
+ return error(".opt directive needs every switch enclosed inside quotation marks.");
+ }
+}
\ No newline at end of file