瀏覽代碼

[flash] always use DoABC tag (#8251)

Dan Korostelev 6 年之前
父節點
當前提交
170fb6e5c3
共有 2 個文件被更改,包括 1 次插入3 次删除
  1. 0 2
      src/core/define.ml
  2. 1 1
      src/generators/genswf.ml

+ 0 - 2
src/core/define.ml

@@ -102,7 +102,6 @@ type strict_defined =
 	| SwfPreloaderFrame
 	| SwfProtected
 	| SwfScriptTimeout
-	| SwfUseDoAbc
 	| Sys
 	| Unsafe
 	| UseNekoc
@@ -216,7 +215,6 @@ let infos = function
 	| SwfPreloaderFrame -> "swf_preloader_frame",("Insert empty first frame in swf",[Platform Flash])
 	| SwfProtected -> "swf_protected",("Compile Haxe private as protected in the SWF instead of public",[Platform Flash])
 	| SwfScriptTimeout -> "swf_script_timeout",("Maximum ActionScript processing time before script stuck dialog box displays (in seconds)",[Platform Flash])
-	| SwfUseDoAbc -> "swf_use_doabc",("Use DoAbc swf-tag instead of DoAbcDefine",[Platform Flash])
 	| Sys -> "sys",("Defined for all system platforms",[])
 	| Unsafe -> "unsafe",("Allow unsafe code when targeting C#",[Platform Cs])
 	| UseNekoc -> "use_nekoc",("Use nekoc compiler instead of internal one",[Platform Neko])

+ 1 - 1
src/generators/genswf.ml

@@ -246,7 +246,7 @@ let build_swf9 com file swc =
 				hls_fields = [|f|];
 			}
 		) code in
-		[tag (TActionScript3 ((if Common.defined com Define.SwfUseDoAbc then Some(1,boot_name) else None), As3hlparse.flatten inits))]
+		[tag (TActionScript3 ((Some (1,boot_name)), As3hlparse.flatten inits))]
 	) in
 	let cid = ref 0 in
 	let classes = ref [{ f9_cid = None; f9_classname = boot_name }] in