diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 2b541881446..fc23908a4c3 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2002-03-11  Kazu Hirata  <kazu@hxi.com>
+
+	* gcc.c-torture/execute/20020307-1.c: Use long.
+
 2002-03-11  Jakub Jelinek  <jakub@redhat.com>
 
 	PR optimization/5844
diff --git a/gcc/testsuite/gcc.c-torture/execute/20020307-1.c b/gcc/testsuite/gcc.c-torture/execute/20020307-1.c
index 6a0c65490be..c6379de3e8b 100644
--- a/gcc/testsuite/gcc.c-torture/execute/20020307-1.c
+++ b/gcc/testsuite/gcc.c-torture/execute/20020307-1.c
@@ -1,7 +1,7 @@
-#define MASK(N) ((int)((1U << (N)) - 1))
-#define BITS(N) ((1 << ((N) - 1)) + 2)
+#define MASK(N) ((1UL << (N)) - 1)
+#define BITS(N) ((1UL << ((N) - 1)) + 2)
 
-#define FUNC(N) void f##N(int j) { if ((j & MASK(N)) >= BITS(N)) abort();}
+#define FUNC(N) void f##N(long j) { if ((j & MASK(N)) >= BITS(N)) abort();}
 
 FUNC(3)
 FUNC(4)