Find file
Fetching contributors…
Cannot retrieve contributors at this time
23 lines (17 sloc) 355 Bytes
#include "HsFFI.h"
//#include "Main_stub.h"
extern void hs_main(void);
#ifdef __GLASGOW_HASKELL__
extern void __stginit_Main ( void );
#endif
#include <SDL/SDL.h>
int main(int argc, char *argv[])
{
hs_init(&argc, &argv);
#ifdef __GLASGOW_HASKELL__
hs_add_root(__stginit_Main);
#endif
hs_main();
hs_exit();
return 0;
}