Browse Source

Also apply signature neutral config to deprecated defines

Rudy Ges 2 months ago
parent
commit
a2aa5c5b40
1 changed files with 6 additions and 1 deletions
  1. 6 1
      src/prebuild.ml

+ 6 - 1
src/prebuild.ml

@@ -237,7 +237,12 @@ let gen_define_info defines =
 					[Printf.sprintf "DefaultValue(%s)" quoted]
 			in
 			(match def.d_signature_neutral with
-				| Some true -> DynArray.add sig_neutral (Printf.sprintf "| %S" (convert_define define))
+				| Some true ->
+					DynArray.add sig_neutral (Printf.sprintf "| %S" (convert_define define));
+					begin match def.d_deprecated_define with
+					| None -> ()
+					| Some s -> DynArray.add sig_neutral (Printf.sprintf "| %S" (convert_define s))
+					end
 				| _ -> ());
 			"\t| " ^ def.d_name ^ " -> \"" ^ define ^ "\",(" ^ (Printf.sprintf "%S" def.d_doc) ^ ",[" ^ (String.concat "; " (platforms_str @ params_str @ links_str @ deprecated @ default)) ^ "])"
 	) defines in