add generic_fusion project options (-generic_fusion and -ngeneric_fusion)

cpm/AbsSyn.dcl

@@ -39,6 +39,8 @@ from System.FilePath import :: FilePath
 :: ProjectOption
 	= DynamicsOn
 	| DynamicsOff
+	| GenericFusionOn
+	| GenericFusionOff
 
 :: ModuleAction
   =  CreateModule ModuleType

cpm/CpmLogic.icl

@@ -151,6 +151,10 @@ where
 		= PR_SetApplicationOptions {PR_GetApplicationOptions project & dynamics = True} project
 	set_project_option DynamicsOff project
 		= PR_SetApplicationOptions {PR_GetApplicationOptions project & dynamics = False} project
+	set_project_option GenericFusionOn project
+		= PR_SetApplicationOptions {PR_GetApplicationOptions project & generic_fusion = True} project
+	set_project_option GenericFusionOff project
+		= PR_SetApplicationOptions {PR_GetApplicationOptions project & generic_fusion = False} project
 
 doProjectAction _          _  _   _    world             =
   help "cpm project <projectname> <action>"

cpm/Parser.icl

@@ -79,6 +79,12 @@ parse_Project_options ["-dynamics":project_option_args]
 parse_Project_options ["-ndynamics":project_option_args]
 	# (ok,project_options) = parse_Project_options project_option_args;
 	= (ok,[DynamicsOff:project_options]);
+parse_Project_options ["-generic_fusion":project_option_args]
+	# (ok,project_options) = parse_Project_options project_option_args;
+	= (ok,[GenericFusionOn:project_options]);
+parse_Project_options ["-ngeneric_fusion":project_option_args]
+	# (ok,project_options) = parse_Project_options project_option_args;
+	= (ok,[GenericFusionOff:project_options]);
 parse_Project_options []
 	= (True,[]);
 parse_Project_options _