Commit 3e2cd89a authored by Simon Marlow's avatar Simon Marlow
Browse files

Change some ints to unsigned ints

Fixes some gratuitous warnings when compiling via C with -fhpc
parent 000be170
...@@ -73,13 +73,13 @@ extern void* createAdjustor(int cconv, StgStablePtr hptr, StgFunPtr wptr, ...@@ -73,13 +73,13 @@ extern void* createAdjustor(int cconv, StgStablePtr hptr, StgFunPtr wptr,
extern void freeHaskellFunctionPtr(void* ptr); extern void freeHaskellFunctionPtr(void* ptr);
/* Hpc stuff */ /* Hpc stuff */
extern int hs_hpc_module(char *modName,int modCount,int modHashNo,StgWord64 *tixArr); extern int hs_hpc_module(char *modName,unsigned int modCount,unsigned int modHashNo,StgWord64 *tixArr);
// Simple linked list of modules // Simple linked list of modules
typedef struct _HpcModuleInfo { typedef struct _HpcModuleInfo {
char *modName; // name of module char *modName; // name of module
int tickCount; // number of ticks unsigned int tickCount; // number of ticks
int tickOffset; // offset into a single large .tix Array unsigned int tickOffset; // offset into a single large .tix Array
int hashNo; // Hash number for this module's mix info unsigned int hashNo; // Hash number for this module's mix info
StgWord64 *tixArr; // tix Array; local for this module StgWord64 *tixArr; // tix Array; local for this module
struct _HpcModuleInfo *next; struct _HpcModuleInfo *next;
} HpcModuleInfo; } HpcModuleInfo;
......
...@@ -101,7 +101,7 @@ static StgWord64 expectWord64(void) { ...@@ -101,7 +101,7 @@ static StgWord64 expectWord64(void) {
static void static void
readTix(void) { readTix(void) {
int i; unsigned int i;
HpcModuleInfo *tmpModule; HpcModuleInfo *tmpModule;
totalTixes = 0; totalTixes = 0;
...@@ -186,11 +186,11 @@ static void hpc_init(void) { ...@@ -186,11 +186,11 @@ static void hpc_init(void) {
int int
hs_hpc_module(char *modName, hs_hpc_module(char *modName,
int modCount, unsigned int modCount,
int modHashNo, unsigned int modHashNo,
StgWord64 *tixArr) { StgWord64 *tixArr) {
HpcModuleInfo *tmpModule, *lastModule; HpcModuleInfo *tmpModule, *lastModule;
int i; unsigned int i;
int offset = 0; int offset = 0;
debugTrace(DEBUG_hpc,"hs_hpc_module(%s,%d)",modName,modCount); debugTrace(DEBUG_hpc,"hs_hpc_module(%s,%d)",modName,modCount);
...@@ -266,7 +266,7 @@ startupHpc(void) { ...@@ -266,7 +266,7 @@ startupHpc(void) {
static void static void
writeTix(FILE *f) { writeTix(FILE *f) {
HpcModuleInfo *tmpModule; HpcModuleInfo *tmpModule;
int i, inner_comma, outer_comma; unsigned int i, inner_comma, outer_comma;
outer_comma = 0; outer_comma = 0;
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment