summaryrefslogtreecommitdiff
path: root/rts/Hpc.c
diff options
context:
space:
mode:
Diffstat (limited to 'rts/Hpc.c')
-rw-r--r--rts/Hpc.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Hpc.c b/rts/Hpc.c
index c4ff8d3be1..47d1acddbc 100644
--- a/rts/Hpc.c
+++ b/rts/Hpc.c
@@ -151,7 +151,7 @@ readTix(void) {
ws();
lookup = lookupHashTable(moduleHash, (StgWord)tmpModule->modName);
- if (tmpModule == NULL) {
+ if (lookup == NULL) {
debugTrace(DEBUG_hpc,"readTix: new HpcModuleInfo for %s",
tmpModule->modName);
insertHashTable(moduleHash, (StgWord)tmpModule->modName, tmpModule);