Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
jberryman
GHC
Commits
732cf22e
Commit
732cf22e
authored
Jan 13, 2003
by
simonmar
Browse files
[project @ 2003-01-13 14:02:07 by simonmar]
The hook NoRunnableThreads() is not used; kill it.
parent
a7c1d388
Changes
2
Hide whitespace changes
Inline
Side-by-side
ghc/rts/Linker.c
View file @
732cf22e
/* -----------------------------------------------------------------------------
* $Id: Linker.c,v 1.10
9
200
2/12/27 10:32:59 panne
Exp $
* $Id: Linker.c,v 1.1
1
0 200
3/01/13 14:02:07 simonmar
Exp $
*
* (c) The GHC Team, 2000, 2001
*
...
...
@@ -330,7 +330,6 @@ typedef struct _RtsSymbolVal {
SymX(ErrorHdrHook) \
MAIN_CAP_SYM \
SymX(MallocFailHook) \
SymX(NoRunnableThreadsHook) \
SymX(OnExitHook) \
SymX(OutOfHeapHook) \
SymX(PatErrorHdrHook) \
...
...
ghc/rts/hooks/NoRunnableThreads.c
deleted
100644 → 0
View file @
a7c1d388
/* -----------------------------------------------------------------------------
* $Id: NoRunnableThreads.c,v 1.4 2002/07/18 06:05:31 sof Exp $
*
* User-overridable RTS hooks.
*
* ---------------------------------------------------------------------------*/
#include "Rts.h"
#include <stdio.h>
#include <stdlib.h>
/*
Hook to invoke when there's nothing left on the runnable threads
queue {\em and} we've got nothing to wait for. The value
returned is the exit code to report back.
NOTE: This hook is really CONCURRENT specific, but we include
it in the way-independent libHSclib.a.
*/
int
NoRunnableThreadsHook
(
void
)
{
fflush
(
stdout
);
fprintf
(
stderr
,
"No runnable threads!
\n
"
);
return
(
EXIT_FAILURE
);
}
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment