Ver código fonte

Add `-D neko-no-haxelib-paths`

tobil4sk 2 anos atrás
pai
commit
b0911a4b51
2 arquivos alterados com 13 adições e 1 exclusões
  1. 8 0
      src-json/define.json
  2. 5 1
      src/generators/genneko.ml

+ 8 - 0
src-json/define.json

@@ -460,6 +460,14 @@
 		"doc": "Output neko source instead of bytecode.",
 		"platforms": ["neko"]
 	},
+	{
+		"name": "NekoNoHaxelibPaths",
+		"define": "neko-no-haxelib-paths",
+		"doc": "Disable hard-coded Haxelib ndll paths.",
+		"platforms": [
+			"neko"
+		]
+	},
 	{
 		"name": "NekoV1",
 		"define": "neko-v1",

+ 5 - 1
src/generators/genneko.ml

@@ -773,7 +773,11 @@ let build ctx types =
 let generate com =
 	Hashtbl.clear files;
 	let ctx = new_context com (if Common.defined com Define.NekoV1 then 1 else 2) false in
-	let libs = (EBlock (generate_libs_init com.neko_lib_paths) , { psource = "<header>"; pline = 1; }) in
+	let libs = (EBlock
+		(if Common.defined com Define.NekoNoHaxelibPaths then []
+		else generate_libs_init com.neko_lib_paths),
+		{ psource = "<header>"; pline = 1; }
+	) in
 	let el = build ctx com.types in
 	let emain = (match com.main with None -> [] | Some e -> [gen_expr ctx e]) in
 	let e = (EBlock ((header()) @ libs :: el @ emain), null_pos) in