Преглед изворни кода

store features in module instead of common context (see #4805)

Simon Krajewski пре 9 година
родитељ
комит
c486b3ef67
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      dce.ml

+ 1 - 1
dce.ml

@@ -85,7 +85,7 @@ let rec check_feature dce s =
 
 and check_and_add_feature dce s =
 	check_feature dce s;
-	Common.add_feature dce.com s;
+	Hashtbl.replace dce.curclass.cl_module.m_extra.m_features s true
 
 (* mark a field as kept *)
 and mark_field dce c cf stat =