fixed verify error with loop variable beeing a specific class

doc/CHANGES.txt

@@ -31,6 +31,7 @@ TODO :
 	flash9 : fixed UInt default parameter verify error
 	flash9 : fixed issue with flash.* string enums verify error
 	compiler : allowed \r line separators for HXML files
+	flash9 : fixed verify error with loop variable beeing a specific class
 
 2008-11-23: 2.02
 	Std.is(MyInterface, Class) now returns true (haXe/PHP)

genswf9.ml

@@ -637,7 +637,7 @@ let begin_fun ctx args tret el stat p =
 			| KBool -> HFalse :: s
 			| KType t -> HNull :: HAsType t :: s
 			| KDynamic -> HNull :: HAsAny :: s
-			| KNone -> HNull :: s
+			| KNone -> HNull :: HAsType (HMPath ([],"Class")) :: s
 		) (DynArray.to_list ctx.infos.iregs)) in
 		let delta = List.length extra in
 		let f = {