diff --git a/gcc/testsuite/gfortran.dg/do_concurrent_typespec_1.f90 b/gcc/testsuite/gfortran.dg/do_concurrent_typespec_1.f90
index 45407a162e7d..5a25739da0f1 100644
--- a/gcc/testsuite/gfortran.dg/do_concurrent_typespec_1.f90
+++ b/gcc/testsuite/gfortran.dg/do_concurrent_typespec_1.f90
@@ -1,8 +1,5 @@
 ! { dg-do run }
 ! { dg-options "-std=f2008 -Wall" }
-! { dg-bogus "Unused variable '_i' declared" }
-! { dg-bogus "Unused variable '_k' declared" }
-! { dg-bogus "Unused variable 'n' declared" }
 !
 ! PR fortran/96255
 ! Test DO CONCURRENT with optional type specification