소스 검색

[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
 	List.iter (fun f -> match f.fname with
 		| "value__" -> ()
+		| _ when not (List.mem CStatic f.fflags.ff_contract) -> ()
 		| _ ->
 			let meta, const = match f.fconstant with
 				| Some IChar i