Andreas Klebinger pushed to branch wip/andreask/linker_fix at Glasgow Haskell Compiler / GHC

Commits:

2 changed files:

Changes:

  • rts/linker/CacheFlush.c
    ... ... @@ -37,7 +37,7 @@ void
    37 37
     ocFlushInstructionCache( ObjectCode *oc )
    
    38 38
     {
    
    39 39
         /* The main object code */
    
    40
    -    ocFlushInstructionCacheFrom(oc->image + oc->misalignment, oc->fileSize);
    
    40
    +    ocFlushInstructionCacheFrom(oc->image, oc->fileSize);
    
    41 41
     
    
    42 42
         /* Jump Islands */
    
    43 43
         ocFlushInstructionCacheFrom(oc->symbol_extras, sizeof(SymbolExtra) * oc->n_symbol_extras);
    

  • rts/linker/elf_reloc_riscv64.c
    ... ... @@ -678,7 +678,7 @@ void flushInstructionCacheRISCV64(ObjectCode *oc) {
    678 678
       // parameters couldn't be checked during development.)
    
    679 679
     
    
    680 680
       /* The main object code */
    
    681
    -  void *codeBegin = oc->image + oc->misalignment;
    
    681
    +  void *codeBegin = oc->image;
    
    682 682
       __builtin___clear_cache(codeBegin, (void*) ((uint64_t*) codeBegin + oc->fileSize));
    
    683 683
     
    
    684 684
       /* Jump Islands */