1 /* -----------------------------------------------------------------------------
3 * (c) The GHC Team, 2005
5 * RTS entry points as mandated by the FFI addendum to the Haskell 98 report
7 * ---------------------------------------------------------------------------*/
12 // hs_init and hs_exit are defined in RtsStartup.c
15 hs_set_argv(int argc, char *argv[])
17 setProgArgv(argc,argv);
23 /* Hmmm, the FFI spec is a bit vague, but it seems to imply a major GC... */
28 hs_free_stable_ptr(HsStablePtr sp)
30 /* The cast is for clarity only, both HsStablePtr and StgStablePtr are
31 typedefs for void*. */
32 freeStablePtr((StgStablePtr)sp);
36 hs_free_fun_ptr(HsFunPtr fp)
38 /* I simply *love* all these similar names... */
39 freeHaskellFunctionPtr(fp);