Alexander Kuzmenko 7 年之前
父节点
当前提交
4877cb9fe9
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2 2
      src/optimization/dce.ml

+ 2 - 2
src/optimization/dce.ml

@@ -128,8 +128,8 @@ and mark_field dce c cf stat =
 			| Some (c,_) -> mark_field dce c cf stat
 		end else
 			add cf;
-		if not stat then
-			match c.cl_constructor && is_physical_var_field cf with
+		if not stat && is_physical_var_field cf then
+			match c.cl_constructor with
 				| None -> ()
 				| Some ctor -> mark_field dce c ctor false
 	end