fix for protected/private/internal properties in AS3 library swf

doc/CHANGES.txt

@@ -17,6 +17,7 @@ TODO inlining : substitute class+function type parameters in order to have fully
 	fixed php.Sys
 	allowed optional Context in remoting connections
 	fixed extern classes for flash < 8
+	fixed inherited protected/private properties in as3 SWF library
 
 2008-07-28: 2.0
 	fixed current package bug in inherited constructor type

genswf.ml

@@ -133,8 +133,7 @@ let add_as3_code ctx data types =
 	(* set all protected+private fields to public - this will enable overriding/reflection in haXe classes *)
 	let data = { data with as3_namespaces = Array.map (fun ns ->
 		match ns with
-		| A3NPrivate i | A3NInternal i -> A3NPublic i
-		| A3NProtected i -> A3NPublic (Some i)
+		| A3NPrivate _ | A3NInternal _ | A3NProtected _ -> A3NPublic None
 		| A3NPublic _
 		| A3NNamespace _
 		| A3NExplicit _