1 /* -----------------------------------------------------------------------------
2  *
3  * (c) The GHC Team, 1998-2009
4  *
5  * Adjustor API
6  *
7  * Do not #include this file directly: #include "Rts.h" instead.
8  *
9  * To understand the structure of the RTS headers, see the wiki:
10  *   http://ghc.haskell.org/trac/ghc/wiki/Commentary/SourceTree/Includes
11  *
12  * -------------------------------------------------------------------------- */
13 
14 #pragma once
15 
16 /* Creating and destroying an adjustor thunk */
17 void* createAdjustor (int cconv,
18                       StgStablePtr hptr,
19                       StgFunPtr wptr,
20                       char *typeString);
21 
22 void freeHaskellFunctionPtr (void* ptr);
23