more tests

Author: eugeneepshteyn

flang/test/Semantics/OpenMP/do-schedule03.f90

@@ -3,7 +3,7 @@
 ! 2.7.1 Schedule Clause
 ! Test that does not catch non constant integer expressions like xx - xx.
   !DEF: /OMPDOSCHEDULE MainProgram
-program ompdoschedule
+program OMPDOSCHEDULE
   !DEF: /OMPDOSCHEDULE/a ObjectEntity REAL(4)
   !DEF: /OMPDOSCHEDULE/y ObjectEntity REAL(4)
   !DEF: /OMPDOSCHEDULE/z ObjectEntity REAL(4)
@@ -25,4 +25,4 @@ program ompdoschedule
     y(i) = z(i-1) + a(i)
   end do
   !$omp end do
-end program ompdoschedule
+end program OMPDOSCHEDULE

flang/test/Semantics/OpenMP/do01-positivecase.f90

@@ -5,7 +5,7 @@
 ! A positive case
 
 !DEF: /OMP_DO MainProgram
-program omp_do
+program OMP_DO
   !DEF: /OMP_DO/i ObjectEntity INTEGER(4)
   integer i
 
@@ -16,4 +16,4 @@ program omp_do
   end do
   !$omp end do
 
-end program omp_do
+end program OMP_DO

flang/test/Semantics/OpenMP/do04-positivecase.f90

@@ -3,7 +3,7 @@
 ! 2.7.1 Do Loop Constructs
 
 !DEF: /OMP_DO1 MainProgram
-program omp_do1
+program OMP_DO1
   !DEF: /OMP_DO1/i ObjectEntity INTEGER(4)
   !DEF: /OMP_DO1/j ObjectEntity INTEGER(4)
   !DEF: /OMP_DO1/k (OmpThreadprivate) ObjectEntity INTEGER(4)
@@ -19,4 +19,4 @@ program omp_do1
     end do
   end do
   !$omp end do
-end program omp_do1
+end program OMP_DO1

flang/test/Semantics/OpenMP/do05-positivecase.f90

@@ -4,7 +4,7 @@
 ! A positive case
 
 !DEF: /OMP_DO MainProgram
-program omp_do
+program OMP_DO
   !DEF: /OMP_DO/i ObjectEntity INTEGER(4)
   !DEF: /OMP_DO/n ObjectEntity INTEGER(4)
   integer i,n
@@ -71,4 +71,4 @@ program omp_do
     !REF: /OMP_DO/OtherConstruct7/i
     if(i < 5) cycle
   end do
-end program omp_do
+end program OMP_DO

flang/test/Semantics/OpenMP/do06-positivecases.f90

@@ -6,7 +6,7 @@
 
 ! A positive case
 !DEF: /OMP_DO MainProgram
-program omp_do
+program OMP_DO
   !DEF: /OMP_DO/i ObjectEntity INTEGER(4)
   !DEF: /OMP_DO/j ObjectEntity INTEGER(4)
   !DEF: /OMP_DO/k ObjectEntity INTEGER(4)
@@ -20,4 +20,4 @@ program omp_do
       !$omp end ordered
     end do
   !$omp end do
-end program omp_do
+end program OMP_DO

flang/test/Semantics/OpenMP/do11.f90

@@ -3,7 +3,7 @@
 ! 2.7.1 Do Loop Constructs
 
 !DEF: /OMP_DO MainProgram
-program omp_do
+program OMP_DO
   !DEF: /OMP_DO/i ObjectEntity INTEGER(4)
   !DEF: /OMP_DO/j ObjectEntity INTEGER(4)
   !DEF: /OMP_DO/k ObjectEntity INTEGER(4)
@@ -19,17 +19,17 @@ program omp_do
     end do
   end do
   !$omp end do
-end program omp_do
+end program OMP_DO
 
-!DEF: /OMP_DO2 (Subroutine)Subprogram
+!DEF: /omp_do2 (Subroutine)Subprogram
 subroutine omp_do2
-  !DEF: /OMP_DO2/i ObjectEntity INTEGER(4)
-  !DEF: /OMP_DO2/k ObjectEntity INTEGER(4)
+  !DEF: /omp_do2/i ObjectEntity INTEGER(4)
+  !DEF: /omp_do2/k ObjectEntity INTEGER(4)
   integer :: i = 0, k
   !$omp do
-  !DEF: /OMP_DO2/OtherConstruct1/i (OmpPrivate, OmpPreDetermined) HostAssoc INTEGER(4)
+  !DEF: /omp_do2/OtherConstruct1/i (OmpPrivate, OmpPreDetermined) HostAssoc INTEGER(4)
   do i=1,10
-    !REF: /OMP_DO2/OtherConstruct1/i
+    !REF: /omp_do2/OtherConstruct1/i
     print *, "it", i
   end do
   !$omp end do