Explorar o código

[swf] fix const parsing

Simon Krajewski %!s(int64=9) %!d(string=hai) anos
pai
achega
82526b9ea1
Modificáronse 2 ficheiros con 3 adicións e 2 borrados
  1. 2 1
      genswf.ml
  2. 1 1
      libs

+ 2 - 1
genswf.ml

@@ -323,7 +323,8 @@ let build_class com c file =
 			| [] -> []
 			| f :: l ->
 				match f.cff_kind with
-				| FVar (Some (CTPath { tpackage = []; tname = ("String" | "Int" | "UInt") as tname }),None) when List.mem AStatic f.cff_access ->
+				| FVar (Some (CTPath { tpackage = []; tname = ("String" | "Int" | "UInt") as tname }),None)
+				| FProp ("default","never",Some (CTPath { tpackage = []; tname = ("String" | "Int" | "UInt") as tname }),None) when List.mem AStatic f.cff_access ->
 					if !real_type = "" then real_type := tname else if !real_type <> tname then raise Exit;
 					{
 						ec_name = f.cff_name;

+ 1 - 1
libs

@@ -1 +1 @@
-Subproject commit 4a8f47724a6f4d37a94bc3c0a21fc1800768c287
+Subproject commit 457caa17137a6536a526d25536da7864669a4696