projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 1997-03-13 08:22:19 by sof]
[ghc-hetmet.git]
/
ghc
/
includes
/
Parallel.lh
diff --git
a/ghc/includes/Parallel.lh
b/ghc/includes/Parallel.lh
index
6a565db
..
f87aa0c
100644
(file)
--- a/
ghc/includes/Parallel.lh
+++ b/
ghc/includes/Parallel.lh
@@
-85,9
+85,13
@@
void freeHashTable PROTO((HashTable *table, void (*freeDataFun) PROTO((void *dat
HashTable *allocHashTable(STG_NO_ARGS);
void *removeHashTable PROTO((HashTable *table, StgWord key, void *data));
HashTable *allocHashTable(STG_NO_ARGS);
void *removeHashTable PROTO((HashTable *table, StgWord key, void *data));
+/*
+ Redefining exit is more trouble than its worth, IMO -- SOF
+*/
extern void myexit PROTO((I_));
# define EXIT myexit
extern void myexit PROTO((I_));
# define EXIT myexit
-# define exit : error : Wrong exit!
+/* # define exit : error : Wrong exit! */
+
# else
# define EXIT exit
# endif
# else
# define EXIT exit
# endif