updated

doc/CHANGES.txt

@@ -4,7 +4,7 @@
 	fixed Sqlite transactions (commit and rollback now restart a transaction)
 	optimized a...b loops (tmp variable can't be modified)
 	several flash9 optimizations
-	flash9 debug support (with -debug)
+	flash9 debug support (with -D fdb)
 	set align to TopLeft if not defined for flash9
 	added neko.vm.Gc
 	fixed Null should not be a value

doc/install.ml

@@ -104,7 +104,7 @@ let compile_libs() =
 
 	(* SWFLIB *)
 	Sys.chdir "ocaml/swflib";
-	let files = "-I .. -I ../extc as3.mli as3code.ml as3parse.ml swf.ml swfZip.ml actionScript.ml swfParser.ml" in
+	let files = "-I .. -I ../extc as3.mli as3hl.ml as3code.ml as3parse.ml as3hlparse.ml swf.ml swfZip.ml actionScript.ml swfParser.ml" in
 	if bytecode then command ("ocamlc -a -o swflib.cma " ^ files);
 	if native then command ("ocamlopt -a -o swflib.cmxa " ^ files);
 	Sys.chdir "../..";

genswf.ml

@@ -26,8 +26,6 @@ type context = {
 	mutable code : tag_data list;
 }
 
-let debug_pass = ref ""
-
 let tag ?(ext=false) d = {
 	tid = 0;
 	textended = ext;
@@ -81,7 +79,7 @@ let generate file ver header infile types hres =
 			else
 				[]
 		) in
-		let debug = (if ver = 9 && Plugin.defined "debug" then [tag (TEnableDebugger2 !debug_pass)] else []) in
+		let debug = (if ver = 9 && Plugin.defined "fdb" then [tag (TEnableDebugger2 (0,""))] else []) in
 		let base_id = ref 0x5000 in
 		let clips = List.fold_left (fun acc m ->
 			incr base_id;