23 lines
691 B
C
23 lines
691 B
C
|
/* -----------------------------------------------------------------------------
|
||
|
|
*
|
||
|
|
* (c) The GHC Team, 1998-2009
|
||
|
|
*
|
||
|
|
* Adjustor API
|
||
|
|
*
|
||
|
|
* Do not #include this file directly: #include "Rts.h" instead.
|
||
|
|
*
|
||
|
|
* To understand the structure of the RTS headers, see the wiki:
|
||
|
|
* https://gitlab.haskell.org/ghc/ghc/wikis/commentary/source-tree/includes
|
||
|
|
*
|
||
|
|
* -------------------------------------------------------------------------- */
|
||
|
|
|
||
|
|
#pragma once
|
||
|
|
|
||
|
|
/* Creating and destroying an adjustor thunk */
|
||
|
|
void* createAdjustor (int cconv,
|
||
|
|
StgStablePtr hptr,
|
||
|
|
StgFunPtr wptr,
|
||
|
|
char *typeString);
|
||
|
|
|
||
|
|
void freeHaskellFunctionPtr (void* ptr);
|