From 8dbb5f0f254ca3d899d9d28be33703eac988f345 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Wed, 6 Apr 2005 10:13:35 +0000
Subject: [PATCH 1/1] [project @ 2005-04-06 10:13:35 by simonmar] fix build on
 non-x86_64

---
 ghc/rts/Linker.c |    2 ++
 1 file changed, 2 insertions(+)

diff --git a/ghc/rts/Linker.c b/ghc/rts/Linker.c
index 2f23c45..3633e54 100644
--- a/ghc/rts/Linker.c
+++ b/ghc/rts/Linker.c
@@ -3137,6 +3137,7 @@ do_Elf_Rela_relocations ( ObjectCode* oc, char* ehdrC,
             break;
 #        endif
 
+#if x86_64_HOST_OS
       case R_X86_64_64:
 	  *(Elf64_Xword *)P = value;
 	  break;
@@ -3152,6 +3153,7 @@ do_Elf_Rela_relocations ( ObjectCode* oc, char* ehdrC,
       case R_X86_64_32S:
 	  *(Elf64_Sword *)P = (Elf64_Sword)value;
 	  break;
+#endif
 
          default:
             errorBelch("%s: unhandled ELF relocation(RelA) type %d\n",
-- 
1.7.10.4