Flag to turn generics on and off (SupportGenerics), default off

frontend/frontend.icl

@@ -130,7 +130,7 @@ frontEndInterface upToPhase mod_ident search_paths dcl_modules functions_and_mac
 	# heaps = { heaps & hp_type_heaps = type_heaps }
 
 	#! (components, ti_common_defs, fun_defs, generic_range, td_infos, heaps, hash_table, predef_symbols, dcl_mods, error_admin) = 
-		case True of
+		case SupportGenerics of
 		True -> convertGenerics 
 					components main_dcl_module_n ti_common_defs fun_defs td_infos 
 					heaps hash_table predef_symbols dcl_mods error_admin

frontend/syntax.dcl

@@ -4,6 +4,7 @@ import StdEnv
 
 import scanner, general, typeproperties, Heap
 
+SupportGenerics :== False
 PA_BUG on off :== on
 
 switch_import_syntax one_point_three two_point_zero :== one_point_three

frontend/syntax.icl

@@ -4,6 +4,7 @@ import StdEnv, compare_constructor // ,RWSDebug
 
 import scanner, general, Heap, typeproperties, utilities
 
+SupportGenerics :== False
 PA_BUG on off :== on
 switch_import_syntax one_point_three two_point_zero :== one_point_three
 SwitchFusion fuse dont_fuse :== dont_fuse