projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
d646207
)
we don't need OutOfHeapHook(), and the version in the RTS has a better message
author
Simon Marlow
<simonmar@microsoft.com>
Wed, 24 May 2006 11:20:07 +0000
(11:20 +0000)
committer
Simon Marlow
<simonmar@microsoft.com>
Wed, 24 May 2006 11:20:07 +0000
(11:20 +0000)
compiler/parser/hschooks.c
patch
|
blob
|
history
diff --git
a/compiler/parser/hschooks.c
b/compiler/parser/hschooks.c
index
f3e7447
..
5c87b31
100644
(file)
--- a/
compiler/parser/hschooks.c
+++ b/
compiler/parser/hschooks.c
@@
-39,15
+39,6
@@
defaultsHook (void)
}
void
}
void
-OutOfHeapHook (unsigned long request_size/* always zero these days */,
- unsigned long heap_size)
- /* both in bytes */
-{
- fprintf(stderr, "GHC's heap exhausted: current limit is %lu bytes;\nUse the `-M<size>' option to increase the total heap size.\n",
- heap_size);
-}
-
-void
StackOverflowHook (unsigned long stack_size) /* in bytes */
{
fprintf(stderr, "GHC stack-space overflow: current limit is %ld bytes.\nUse the `-K<size>' option to increase it.\n", stack_size);
StackOverflowHook (unsigned long stack_size) /* in bytes */
{
fprintf(stderr, "GHC stack-space overflow: current limit is %ld bytes.\nUse the `-K<size>' option to increase it.\n", stack_size);