kc3-lang/libtommath

diff --git a/bn_mp_get_long.c b/bn_mp_get_long.c
index 0bb17ff..08a82f6 100644
--- a/bn_mp_get_long.c
+++ b/bn_mp_get_long.c
@@ -30,10 +30,12 @@ unsigned long mp_get_long(mp_int * a)
 
   /* get most significant digit of result */
   res = DIGIT(a,i);
-   
+
+#if ULONG_MAX != 0xfffffffful || DIGIT_BIT < 32
   while (--i >= 0) {
     res = (res << DIGIT_BIT) | DIGIT(a,i);
   }
+#endif
   return res;
 }
 #endif