Explorar o código

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

Simon Krajewski %!s(int64=9) %!d(string=hai) anos
pai
achega
c486b3ef67
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  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 =