diff options
| -rw-r--r-- | compiler/codeGen/StgCmmUtils.hs | 2 | ||||
| -rw-r--r-- | rts/linker/elf_util.c | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/compiler/codeGen/StgCmmUtils.hs b/compiler/codeGen/StgCmmUtils.hs index 07432c45ab..b6092e8358 100644 --- a/compiler/codeGen/StgCmmUtils.hs +++ b/compiler/codeGen/StgCmmUtils.hs @@ -585,7 +585,7 @@ mk_float_switch rep scrut deflt_blk_id (lo_bound, hi_bound) branches -------------- label_default :: BlockId -> Maybe CmmAGraphScoped -> FCode (Maybe BlockId) label_default _ Nothing - = return Nothing + = return Nothing label_default join_lbl (Just code) = do lbl <- label_code join_lbl code return (Just lbl) diff --git a/rts/linker/elf_util.c b/rts/linker/elf_util.c index 9ff9d6271d..052b2d9cae 100644 --- a/rts/linker/elf_util.c +++ b/rts/linker/elf_util.c @@ -3,9 +3,9 @@ #if defined(OBJFORMAT_ELF) ElfSymbolTable * -findSymbolTable(ObjectCode * oc, unsigned symolTableIndex) { +findSymbolTable(ObjectCode * oc, unsigned symbolTableIndex) { for(ElfSymbolTable * t=oc->info->symbolTables; t != NULL; t = t->next) - if(t->index == symolTableIndex) + if(t->index == symbolTableIndex) return t; return NULL; } |