X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2FRtsExternal.h;h=24dace2b14a632b35f0da2996d3f4180a3fe3768;hb=92986843271f2f400ebc0759b30eb11d47eaa193;hp=39a22fd3a8c84a63f59337747ef4a3555943db0c;hpb=1ed01a871030f05905a9595e4837dfffc087ef64;p=ghc-hetmet.git diff --git a/includes/RtsExternal.h b/includes/RtsExternal.h index 39a22fd..24dace2 100644 --- a/includes/RtsExternal.h +++ b/includes/RtsExternal.h @@ -73,13 +73,13 @@ extern void* createAdjustor(int cconv, StgStablePtr hptr, StgFunPtr wptr, extern void freeHaskellFunctionPtr(void* ptr); /* Hpc stuff */ -extern int hs_hpc_module(char *modName,int modCount,int modHashNo,StgWord64 *tixArr); +extern int hs_hpc_module(char *modName, StgWord32 modCount, StgWord32 modHashNo,StgWord64 *tixArr); // Simple linked list of modules typedef struct _HpcModuleInfo { char *modName; // name of module - int tickCount; // number of ticks - int tickOffset; // offset into a single large .tix Array - int hashNo; // Hash number for this module's mix info + StgWord32 tickCount; // number of ticks + StgWord32 tickOffset; // offset into a single large .tix Array + StgWord32 hashNo; // Hash number for this module's mix info StgWord64 *tixArr; // tix Array; local for this module struct _HpcModuleInfo *next; } HpcModuleInfo; @@ -111,9 +111,6 @@ extern void setIOManagerPipe (int fd); extern void* allocateExec(unsigned int len); // Breakpoint stuff -extern int rts_stop_next_breakpoint; -extern int rts_stop_on_exception; -extern HsStablePtr rts_breakpoint_io_action; /* ----------------------------------------------------------------------------- Storage manager stuff exported