fix naming

src/syntax/grammar.mly

@@ -197,7 +197,7 @@ and parse_type_decl mode s =
 				d_doc = doc_from_string_opt doc;
 				d_meta = meta;
 				d_params = pl;
-				d_flags = ExtList.List.filter_map decl_flag_to_global_flag c;
+				d_flags = ExtList.List.filter_map decl_flag_to_module_static_flag c;
 				d_data = FFun f;
 			}, punion p1 p2)
 		| [< '(Kwd Var,p1); name = dollar_ident; s >] ->
@@ -216,7 +216,7 @@ and parse_type_decl mode s =
 				d_doc = doc_from_string_opt doc;
 				d_meta = meta;
 				d_params = [];
-				d_flags = ExtList.List.filter_map decl_flag_to_global_flag c;
+				d_flags = ExtList.List.filter_map decl_flag_to_module_static_flag c;
 				d_data = t;
 			}, punion p1 p2)
 		| [< '(Kwd Enum,p1) >] ->
@@ -298,7 +298,7 @@ and parse_type_decl mode s =
 						d_doc = doc_from_string_opt doc;
 						d_meta = meta;
 						d_params = [];
-						d_flags = (ExtList.List.filter_map decl_flag_to_global_flag (List.rev crest)) @ [AFinal,p1];
+						d_flags = (ExtList.List.filter_map decl_flag_to_module_static_flag (List.rev crest)) @ [AFinal,p1];
 						d_data = FVar(t,e);
 					}, punion p1 p2)
 				| [< >] -> check_type_decl_flag_completion mode c s)

src/syntax/parser.ml

@@ -203,7 +203,7 @@ let decl_flag_to_abstract_flag (flag,p) = match flag with
 	| DDynamic -> syntax_error_with_pos (Custom "dynamic on abstracts is not allowed") p None
 	| DInline -> syntax_error_with_pos (Custom "inline on abstracts is not allowed") p None
 
-let decl_flag_to_global_flag (flag,p) = match flag with
+let decl_flag_to_module_static_flag (flag,p) = match flag with
 	| DPrivate -> Some (APrivate,p)
 	| DMacro -> Some (AMacro,p)
 	| DDynamic -> Some (ADynamic,p)