diff options
| author | Ian Lynagh <igloo@earth.li> | 2007-08-24 13:27:02 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2007-08-24 13:27:02 +0000 |
| commit | 6fa35a00131040cf7849fabe3af5d28b3542fc79 (patch) | |
| tree | 9153e431e4a147b6ac3553ffbcd4429a2436a846 /compiler/ghc-inplace.c | |
| parent | f4c9109d7f1deb6f79c2c141f69ec24b7022776b (diff) | |
| download | haskell-6fa35a00131040cf7849fabe3af5d28b3542fc79.tar.gz | |
In ghc-inplace, flush stdout after giving debugging output
Diffstat (limited to 'compiler/ghc-inplace.c')
| -rw-r--r-- | compiler/ghc-inplace.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/compiler/ghc-inplace.c b/compiler/ghc-inplace.c index 83f683465d..2e345bcd58 100644 --- a/compiler/ghc-inplace.c +++ b/compiler/ghc-inplace.c @@ -36,6 +36,7 @@ int main(int argc, char **argv) { args[2] = "-fhardwire-lib-paths"; if ((argc >= 2) && (strcmp(argv[1], "-v") == 0)) { printf("Using %s %s %s\n", args[0], args[1], args[2]); + fflush(stdout); } memcpy(args + 3, argv + 1, sizeof(char *) * (argc - 1)); args[argc+2] = NULL; |