瀏覽代碼

[cs] Filter all non-static fields from enums

Cauê Waneck 10 年之前
父節點
當前提交
aa26777850
共有 1 個文件被更改,包括 1 次插入0 次删除
  1. 1 0
      gencs.ml

+ 1 - 0
gencs.ml

@@ -3459,6 +3459,7 @@ let convert_ilenum ctx p ?(is_flag=false) ilcls =
 	let data = ref [] in
 	let data = ref [] in
 	List.iter (fun f -> match f.fname with
 	List.iter (fun f -> match f.fname with
 		| "value__" -> ()
 		| "value__" -> ()
+		| _ when not (List.mem CStatic f.fflags.ff_contract) -> ()
 		| _ ->
 		| _ ->
 			let meta, const = match f.fconstant with
 			let meta, const = match f.fconstant with
 				| Some IChar i
 				| Some IChar i