projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Make the ghci.exe wrapper call the right ghc.exe
[ghc-hetmet.git]
/
driver
/
ghci
/
ghci.c
diff --git
a/driver/ghci/ghci.c
b/driver/ghci/ghci.c
index
03a8f98
..
06165b5
100644
(file)
--- a/
driver/ghci/ghci.c
+++ b/
driver/ghci/ghci.c
@@
-9,6
+9,7
@@
#include <string.h>
int main(int argc, char** argv) {
#include <string.h>
int main(int argc, char** argv) {
+ char *binDir;
char *exePath;
char *preArgv[1];
char *exePath;
char *preArgv[1];
@@
-18,7
+19,8
@@
int main(int argc, char** argv) {
fflush(stdout);
}
fflush(stdout);
}
- exePath = "ghc.exe";
+ binDir = getExecutablePath();
+ exePath = mkString("%s/ghc.exe", binDir);
preArgv[0] = "--interactive";
run(exePath, 1, preArgv, argc - 1, argv + 1);
preArgv[0] = "--interactive";
run(exePath, 1, preArgv, argc - 1, argv + 1);