[commit: ghc] master: Linker: Fix whitespace (3e8ab7c)

git at git.haskell.org git at git.haskell.org
Thu Jun 8 19:36:23 UTC 2017


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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/3e8ab7c6820f16a6434a7dd2f6ce90bb3bef62bd/ghc

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

commit 3e8ab7c6820f16a6434a7dd2f6ce90bb3bef62bd
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Mon Jun 5 19:43:02 2017 -0400

    Linker: Fix whitespace
    
    [skip ci]


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

3e8ab7c6820f16a6434a7dd2f6ce90bb3bef62bd
 rts/Linker.c | 32 ++++++++++++++++----------------
 1 file changed, 16 insertions(+), 16 deletions(-)

diff --git a/rts/Linker.c b/rts/Linker.c
index 6e710a1..3700726 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -1565,32 +1565,32 @@ int ocTryLoad (ObjectCode* oc) {
         }
     }
 
-#           if defined(OBJFORMAT_ELF)
-        r = ocResolve_ELF ( oc );
-#           elif defined(OBJFORMAT_PEi386)
-        r = ocResolve_PEi386 ( oc );
-#           elif defined(OBJFORMAT_MACHO)
-        r = ocResolve_MachO ( oc );
-#           else
+#   if defined(OBJFORMAT_ELF)
+    r = ocResolve_ELF ( oc );
+#   elif defined(OBJFORMAT_PEi386)
+    r = ocResolve_PEi386 ( oc );
+#   elif defined(OBJFORMAT_MACHO)
+    r = ocResolve_MachO ( oc );
+#   else
     barf("ocTryLoad: not implemented on this platform");
-#           endif
-        if (!r) { return r; }
+#   endif
+    if (!r) { return r; }
 
-        // run init/init_array/ctors/mod_init_func
+    // run init/init_array/ctors/mod_init_func
 
-        loading_obj = oc; // tells foreignExportStablePtr what to do
+    loading_obj = oc; // tells foreignExportStablePtr what to do
 #if defined(OBJFORMAT_ELF)
-        r = ocRunInit_ELF ( oc );
+    r = ocRunInit_ELF ( oc );
 #elif defined(OBJFORMAT_PEi386)
-        r = ocRunInit_PEi386 ( oc );
+    r = ocRunInit_PEi386 ( oc );
 #elif defined(OBJFORMAT_MACHO)
-        r = ocRunInit_MachO ( oc );
+    r = ocRunInit_MachO ( oc );
 #else
     barf("ocTryLoad: initializers not implemented on this platform");
 #endif
-        loading_obj = NULL;
+    loading_obj = NULL;
 
-        if (!r) { return r; }
+    if (!r) { return r; }
 
     oc->status = OBJECT_RESOLVED;
 



More information about the ghc-commits mailing list