fixed extra AS3 tag

doc/CHANGES.txt

@@ -6,6 +6,7 @@ TODO :
 2009-??-??: 2.04
 	flash9 : fixed get_full_path error with -D fdb
 	js : fixed Array.remove on IE
+	flash8 : removed extra empty AS3 tag (causing some issue with F8 loadMovie)
 
 2009-03-22: 2.03
 	optimized Type.enumEq : use index instead of tag comparison for neko/flash9/php

genswf.ml

@@ -477,7 +477,7 @@ let generate com swf_header swf_lib =
 			if c.f9_cid <> None && not (movieclip_exists com.types ctx.as3code path) then
 				ctx.as3code <- build_movieclip ctx path :: ctx.as3code;
 		) ctx.f9clips;
-		let code9 = if Common.defined com "swc" then begin
+		let code9 = if not isf9 then [] else if Common.defined com "swc" then begin
 			ctx.swc_catalog <- build_swc_catalog com (List.map (fun (t,_,_) -> t) ctx.hx9code);
 			List.map (fun (t,m,f) ->
 				let path = (match t_path t with