Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
GHC
Commits
4078a5cf
Commit
4078a5cf
authored
Jan 31, 2005
by
simonmar
Browse files
[project @ 2005-01-31 12:55:50 by simonmar]
Move signal prototypes into RtsExternal.h
parent
c560ae86
Changes
2
Hide whitespace changes
Inline
Side-by-side
ghc/includes/RtsExternal.h
View file @
4078a5cf
/* -----------------------------------------------------------------------------
* $Id: RtsExternal.h,v 1.
7
2005/01/
10 18:44:40 wolfgang
Exp $
* $Id: RtsExternal.h,v 1.
8
2005/01/
31 12:55:50 simonmar
Exp $
*
* (c) The GHC Team, 1998-2004
*
...
...
@@ -63,6 +63,12 @@ extern void* createAdjustor(int cconv, StgStablePtr hptr, StgFunPtr wptr,
char
*
typeString
);
extern
void
freeHaskellFunctionPtr
(
void
*
ptr
);
#if defined(mingw32_HOST_OS)
extern
int
stg_InstallConsoleEvent
(
int
action
,
StgStablePtr
*
handler
);
#else
extern
int
stg_sig_install
(
int
,
int
,
StgStablePtr
*
,
void
*
);
#endif
/* -----------------------------------------------------------------------------
Storage manager stuff exported
-------------------------------------------------------------------------- */
...
...
ghc/includes/Signals.h
View file @
4078a5cf
/* -----------------------------------------------------------------------------
*
* (c) The GHC Team, 1998-200
2
* (c) The GHC Team, 1998-200
5
*
* RTS signal handling
*
...
...
@@ -9,17 +9,10 @@
#ifndef SIGNALS_H
#define SIGNALS_H
#define STG_SIG_DFL (-1)
#define STG_SIG_IGN (-2)
#define STG_SIG_ERR (-3)
#define STG_SIG_HAN (-4)
#define STG_SIG_RST (-5)
#if defined(mingw32_HOST_OS)
extern
int
stg_InstallConsoleEvent
(
int
action
,
StgStablePtr
*
handler
);
#else
extern
int
stg_sig_install
(
int
,
int
,
StgStablePtr
*
,
void
*
);
#endif
#define STG_SIG_DFL (-1)
#define STG_SIG_IGN (-2)
#define STG_SIG_ERR (-3)
#define STG_SIG_HAN (-4)
#define STG_SIG_RST (-5)
#endif // SIGNALS_H
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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