diff --git a/crypto/bn/bn.h b/crypto/bn/bn.h
index eedde6a016db715bb2351ccd26a35f7c7cc9eac8..2333682a1738364be61cc5874dc05f2576a0d657 100644
--- a/crypto/bn/bn.h
+++ b/crypto/bn/bn.h
@@ -752,12 +752,12 @@ int RAND_pseudo_bytes(unsigned char *buf,int num);
 #define bn_correct_top(a) \
         { \
         BN_ULONG *ftl; \
-	int __top = (a)->top; \
-	if (__top > 0) \
+	int _t371q = (a)->top; \
+	if (_t371q > 0) \
 		{ \
-		for (ftl= &((a)->d[__top-1]); __top > 0; __top--) \
+		for (ftl= &((a)->d[_t371q-1]); _t371q > 0; _t371q--) \
 			if (*(ftl--)) break; \
-		(a)->top = __top; \
+		(a)->top = _t371q; \
 		} \
 	bn_pollute(a); \
 	}