fixed bug in test3

jacobwilliams · Jun 22, 2024 · cc2badb · cc2badb
1 parent c276c03
commit cc2badb
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/test/csv_test3.f90 b/test/csv_test3.f90
@@ -75,7 +75,7 @@ program csv_test3
     do i = 1, size(header)
       print "(*(g0))", ">"//trim(header(i))//"<"
     end do
-    if (.not. all(header == ['x','y','z','t'])) error stop 'error reading header'
+    if (.not. all(header == ['x  ','y  ','z  ','t  ', 'int', 'str'])) error stop 'error reading header'
 
     call f%get(1,col1,status_ok)
     print "(*(g0))", "col1:"