projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
107787d
)
Fixing HPCTIXDIR problem with mkdir usage on Windows
author
andy@galois.com
<unknown>
Fri, 11 Apr 2008 22:05:10 +0000
(22:05 +0000)
committer
andy@galois.com
<unknown>
Fri, 11 Apr 2008 22:05:10 +0000
(22:05 +0000)
rts/Hpc.c
patch
|
blob
|
history
diff --git
a/rts/Hpc.c
b/rts/Hpc.c
index
3c725f4
..
1624079
100644
(file)
--- a/
rts/Hpc.c
+++ b/
rts/Hpc.c
@@
-182,9
+182,14
@@
static void hpc_init(void) {
hpc_tixdir = getenv("HPCTIXDIR");
if (hpc_tixdir != NULL) {
- /* Make sure the directory is present
+ /* Make sure the directory is present;
+ * conditional code for mkdir lifted from lndir.c
*/
+#ifdef WIN32
+ mkdir(hpc_tixdir);
+#else
mkdir(hpc_tixdir,0777);
+#endif
/* Then, try open the file
*/
tixFilename = (char *) malloc(strlen(hpc_tixdir) + strlen(prog_name) + 12);