pass -fusion flag to backend

main/compile.icl

@@ -158,7 +158,8 @@ parseCommandLine [arg1=:"-dynamics":args] options
 	=	parseCommandLine args {options & compile_for_dynamics = True}
 parseCommandLine [arg1=:"-fusion":args] options
 	// switch on fusion transformations
-	= parseCommandLine args {options & compile_with_fusion = True}
+	# (args,modules,options) = parseCommandLine args {options & compile_with_fusion = True}
+	= ([arg1:args],modules,options)
 parseCommandLine [arg1=:"-dump":args] options
 	= parseCommandLine args {options & dump_core = True}
 parseCommandLine [arg1=:"-strip":args] options