chore(prif_test_s): rm redundant logic in report

BerkeleyLab · Dec 30, 2024 · 2ffdbb6 · 2ffdbb6
1 parent 7268613
commit 2ffdbb6
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/test/prif_test_s.f90 b/test/prif_test_s.f90
@@ -42,7 +42,7 @@ pure function both(lhs,rhs) result(lhs_and_rhs)
         end if
       end if first_report
 
-      print '(*(a))', new_line('a'), test%subject()
+      print '(*(a))', new_line(''), test%subject()
 
     end if
 
@@ -55,7 +55,7 @@ pure function both(lhs,rhs) result(lhs_and_rhs)
           block
             integer i
             do i=1,num_tests
-              if (me==1) print '(3x,a)', test_results(i)%characterize()
+              print '(3x,a)', test_results(i)%characterize()
             end do
           end block
         end if