fix "sys" not being defined in macro context

common.ml

@@ -210,7 +210,7 @@ let init_platform com pf =
 	let forbid acc p = if p = name || PMap.mem p acc then acc else PMap.add p Forbidden acc in
 	com.package_rules <- List.fold_left forbid com.package_rules (List.map platform_name platforms);
 	(match pf with
-	| Cpp | Php | Neko -> ()
+	| Cpp | Php | Neko -> define com "sys"
 	| _ -> com.package_rules <- PMap.add "sys" Forbidden com.package_rules);
 	define com name
 

main.ml

@@ -909,18 +909,15 @@ try
 			end;
 			"swf"
 		| Neko ->
-			Common.define com "sys";
 			add_std "neko";
 			"n"
 		| Js ->
 			add_std "js";
 			"js"
 		| Php ->
-			Common.define com "sys";
 			add_std "php";
 			"php"
 		| Cpp ->
-			Common.define com "sys";
 			add_std "cpp";
 			"cpp"
 	) in