Explorar o código

Revert "return correct path for Sys.executablePath() when in macro (closes #3401)"

This reverts commit 8ee14ca6a00673e421ae87a895e614f329d9e44e.
Dan Korostelev %!s(int64=11) %!d(string=hai) anos
pai
achega
c5b0c649fc
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      interp.ml

+ 1 - 1
interp.ml

@@ -1738,7 +1738,7 @@ let std_lib =
 			VString (try Extc.get_full_path (vstring file) with _ -> error())
 		);
 		"sys_exe_path", Fun0 (fun() ->
-			VString (Sys.argv.(0))
+			VString (Extc.executable_path())
 		);
 		"sys_env", Fun0 (fun() ->
 			let env = Unix.environment() in