소스 검색

added @:nodebug for methods (remove debug infos)

Nicolas Cannasse 14 년 전
부모
커밋
8f6e36cb7d
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      genswf9.ml

+ 1 - 1
genswf9.ml

@@ -1878,7 +1878,7 @@ let generate_field_kind ctx f c stat =
 			in
 			let name, kind = lookup_kind f.cf_meta in
 			let old = ctx.debug in
-			ctx.debug <- old || has_meta ":debug" f.cf_meta;
+			ctx.debug <- (old || has_meta ":debug" f.cf_meta) && not (has_meta ":nodebug" f.cf_meta);
 			let m = generate_method ctx fdata stat in
 			ctx.debug <- old;
 			Some (HFMethod {