Procházet zdrojové kódy

added @:nodebug for methods (remove debug infos)

Nicolas Cannasse před 14 roky
rodič
revize
8f6e36cb7d
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  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 {