diff --git a/tests/test_bitmap.F90 b/tests/test_bitmap.F90
index 13194e01..75b82b4e 100644
--- a/tests/test_bitmap.F90
+++ b/tests/test_bitmap.F90
@@ -19,7 +19,7 @@ program test_bitmap
 
   character(len=1), dimension(:), pointer :: cbuf
   integer :: iret, nnum, nlen, numlocal, numfields
-  integer :: listsec0(3), listsec1(13) maxvals(7)
+  integer :: listsec0(3), listsec1(13), maxvals(7)
   !integer, dimension(*):: igds, igdstmpl, ideflist, ipdstmpl, coordlist, &
   !    idrstmpl, bmap, fld
   !integer :: igdslen, idefnum, ipdsnum, ipdslen, numcoord, ndpts, idrsnum, &