Index: gap-4r10p0/src/intfuncs.c
===================================================================
--- gap-4r10p0.orig/src/intfuncs.c
+++ gap-4r10p0/src/intfuncs.c
@@ -228,7 +228,12 @@ static inline uint32_t rotl32 ( uint32_t
 
 FORCE_INLINE uint32_t getblock4 ( const uint32_t * p, int i )
 {
-  return p[i];
+  uint32_t val =p[i];
+#ifdef WORDS_BIGENDIAN
+  val = ((val&0xff00ff00)>>8)|((val&0x00ff00ff)<<8);
+  val = (val>>16)|(val<<16);
+#endif
+  return val;
 }
 
 //-----------------------------------------------------------------------------
@@ -332,6 +337,13 @@ FORCE_INLINE uint64_t getblock8 ( const
 {
   uint64_t val;
   memcpy(&val, p + i, sizeof(uint64_t));
+#ifdef WORDS_BIGENDIAN
+  val = ((val&BIG_CONSTANT(0xff00ff00ff00ff00))>>8) 
+       |((val&BIG_CONSTANT(0x00ff00ff00ff00ff))<<8);
+  val = ((val&BIG_CONSTANT(0xffff0000ffff0000))>>16)
+       |((val&BIG_CONSTANT(0x0000ffff0000ffff))<<16);
+  val = (val>>32)|(val<<32);
+#endif
   return val;
 }
 
