summaryrefslogtreecommitdiff
path: root/driver/ghci
diff options
context:
space:
mode:
Diffstat (limited to 'driver/ghci')
-rw-r--r--driver/ghci/ghci.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/driver/ghci/ghci.c b/driver/ghci/ghci.c
index 03a8f98140..06165b54e7 100644
--- a/driver/ghci/ghci.c
+++ b/driver/ghci/ghci.c
@@ -9,6 +9,7 @@
#include <string.h>
int main(int argc, char** argv) {
+ char *binDir;
char *exePath;
char *preArgv[1];
@@ -18,7 +19,8 @@ int main(int argc, char** argv) {
fflush(stdout);
}
- exePath = "ghc.exe";
+ binDir = getExecutablePath();
+ exePath = mkString("%s/ghc.exe", binDir);
preArgv[0] = "--interactive";
run(exePath, 1, preArgv, argc - 1, argv + 1);