[nfc][flang] Fix spelling errors and usage in an error message

[peixin]

LGTM

flang/lib/Semantics/check-call.cpp

if (arg) {
             } else {
               shape = std::move(argShape);
               shapeName = argName;
             }
           } else if ((dummy.GetIntent() == common::Intent::Out ||
                          dummy.GetIntent() == common::Intent::InOut) &&
               hasArrayArg) {
             messages.Say(
-                "In an elemental procedure with at least one array arugment, actual argument %s that corresponds to an INTENT(OUT) or INTENT(INOUT) dummay argument must be an array"_err_en_US,
+                "In an elemental procedure reference with at least one array argument, actual argument %s that corresponds to an INTENT(OUT) or INTENT(INOUT) dummy argument must be an array"_err_en_US,
                 expr->AsFortran());
           }
         }
       }
     }
   }
   return true;
 }

flang/test/Semantics/call02.f90

 subroutine p04
   implicit none
   !ERROR: No explicit type declared for 'index'
   call s1(index)
 end
 
 subroutine p05
   integer :: a1(2), a2, a3
-
-  !ERROR: In an elemental procedure with at least one array arugment, actual argument a2 that corresponds to an INTENT(OUT) or INTENT(INOUT) dummay argument must be an array
-  !ERROR: In an elemental procedure with at least one array arugment, actual argument a3 that corresponds to an INTENT(OUT) or INTENT(INOUT) dummay argument must be an array
+  !ERROR: In an elemental procedure reference with at least one array argument, actual argument a2 that corresponds to an INTENT(OUT) or INTENT(INOUT) dummy argument must be an array
+  !ERROR: In an elemental procedure reference with at least one array argument, actual argument a3 that corresponds to an INTENT(OUT) or INTENT(INOUT) dummy argument must be an array
   call s1(a1, a2, a3)
 contains
   elemental subroutine s1(a, b, c)
     integer, intent(in) :: a
     integer, intent(out) :: b
     integer, intent(inout) :: c
     b = a
     c = a
   end
 end
-