[commit: ghc] master: Revert "Linker: some extra debugging / logging" (890ec98)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/890ec98cdf144ed7e1efd53c528187deee27b783/ghc

>---------------------------------------------------------------

commit 890ec98cdf144ed7e1efd53c528187deee27b783
Author: Simon Marlow <marlowsd at gmail.com>
Date:   Tue Jul 5 08:41:14 2016 +0100

    Revert "Linker: some extra debugging / logging"
    
    This reverts commit 6377757918c1e7f63638d6f258cad8d5f02bb6a7.


>---------------------------------------------------------------

890ec98cdf144ed7e1efd53c528187deee27b783
 rts/Linker.c | 25 -------------------------
 1 file changed, 25 deletions(-)

diff --git a/rts/Linker.c b/rts/Linker.c
index 894a31d..b41bc1a 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -1465,27 +1465,6 @@ void ghci_enquire(SymbolAddr* addr)
       }
    }
 }
-
-void ghci_find(SymbolAddr *addr);
-void ghci_find(SymbolAddr *addr)
-{
-    ObjectCode *oc;
-    uint32_t i;
-
-    for (oc = objects; oc != NULL; oc = oc->next) {
-        for (i = 0; i < (uint32_t)oc->n_sections; i++) {
-            Section *section = &oc->sections[i];
-            if (addr > section->start &&
-                (StgWord)addr < (StgWord)section->start+section->size) {
-                debugBelch("%p is in %" PATH_FMT, addr,
-                           oc->archiveMemberName ?
-                             oc->archiveMemberName : oc->fileName);
-                debugBelch(", section %d, offset %lx\n", i,
-                           (StgWord)addr - (StgWord)section->start);
-            }
-        }
-    }
-}
 #endif
 
 #if RTS_LINKER_USE_MMAP
@@ -2558,10 +2537,6 @@ int ocTryLoad (ObjectCode* oc) {
         }
     }
 
-    IF_DEBUG(linker, debugBelch("Resolving %" PATH_FMT "\n",
-                                oc->archiveMemberName ?
-                                oc->archiveMemberName : oc->fileName));
-
 #           if defined(OBJFORMAT_ELF)
         r = ocResolve_ELF ( oc );
 #           elif defined(OBJFORMAT_PEi386)