Explorar o código

fixed checking dashed defines of strict_define list (#10184)

Aleksandr Kuzmenko %!s(int64=4) %!d(string=hai) anos
pai
achega
a990a0d5c7
Modificáronse 1 ficheiros con 1 adicións e 0 borrados
  1. 1 0
      src-prebuild/prebuild.ml

+ 1 - 0
src-prebuild/prebuild.ml

@@ -126,6 +126,7 @@ let gen_define_info defines =
 			let platforms_str = gen_platforms platforms in
 			let params_str = gen_params params in
 			let links_str = gen_links links in
+			let define = String.concat "_" (ExtString.String.nsplit define "-") in
 			"\t| " ^ name ^ " -> \"" ^ define ^ "\",(" ^ (Printf.sprintf "%S" doc) ^ ",[" ^ (String.concat "; " (platforms_str @ params_str @ links_str)) ^ "])"
 	) defines in
 	String.concat "\n" define_str