Ticket #7382: 0001-Typo-in-compiler-ghci-Linker.lhs.patch

File 0001-Typo-in-compiler-ghci-Linker.lhs.patch, 899 bytes (added by parcs, 18 months ago)
  • compiler/ghci/Linker.lhs

    From d5dc360ccf31a2945dbeabd31fc9e7372f577a6f Mon Sep 17 00:00:00 2001
    From: Patrick Palka <patrick@parcs.ath.cx>
    Date: Thu, 1 Nov 2012 15:39:21 -0400
    Subject: [PATCH 1/2] Typo in compiler/ghci/Linker.lhs
    
    The GHCi linker state wasn't being properly updated after an
    object was linked via the system linker.
    ---
     compiler/ghci/Linker.lhs |    2 +-
     1 file changed, 1 insertion(+), 1 deletion(-)
    
    diff --git a/compiler/ghci/Linker.lhs b/compiler/ghci/Linker.lhs
    index 3ba9c3c..16bf7fd 100644
    a b dynLinkObjs dflags pls objs = do 
    793793 
    794794        if dYNAMIC_BY_DEFAULT dflags 
    795795            then do dynLoadObjs dflags wanted_objs 
    796                     return (pls, Succeeded) 
     796                    return (pls1, Succeeded) 
    797797            else do mapM_ loadObj wanted_objs 
    798798 
    799799                    -- Link them all together