Просмотр исходного кода

minor : force all packages forbid for cross platform

Nicolas Cannasse 16 лет назад
Родитель
Сommit
6b8c272d41
1 измененных файлов с 1 добавлено и 0 удалено
  1. 1 0
      main.ml

+ 1 - 0
main.ml

@@ -410,6 +410,7 @@ try
 	let ext = (match com.platform with
 		| Cross ->
 			(* no platform selected *)
+			set_platform Cross "cross" "";
 			no_output := true; ""
 		| Flash | Flash9 ->
 			Common.define com ("flash" ^ string_of_int com.flash_version);