[flang] Fix typo in error message
The title says it all.
Differential Revision: https://reviews.llvm.org/D95233
GitOrigin-RevId: 02e174e8f77f8c03e32e5860492dd9c7dabc6906
diff --git a/lib/Semantics/check-call.cpp b/lib/Semantics/check-call.cpp
index 1bd0b0a..996cdf2 100644
--- a/lib/Semantics/check-call.cpp
+++ b/lib/Semantics/check-call.cpp
@@ -548,7 +548,7 @@
messages.Say(
"Actual procedure argument has an implicit interface "
"which is not known to be compatible with %s which has an "
- "explcit interface"_err_en_US,
+ "explicit interface"_err_en_US,
dummyName);
return;
}
diff --git a/test/Semantics/call09.f90 b/test/Semantics/call09.f90
index 36aaa8f..9db5887 100644
--- a/test/Semantics/call09.f90
+++ b/test/Semantics/call09.f90
@@ -78,7 +78,7 @@
call s01(null(intPtr))
!ERROR: Actual argument associated with procedure dummy argument 'p=' is not a procedure
call s01(B"0101")
- !ERROR: Actual procedure argument has an implicit interface which is not known to be compatible with dummy argument 'p=' which has an explcit interface
+ !ERROR: Actual procedure argument has an implicit interface which is not known to be compatible with dummy argument 'p=' which has an explicit interface
call s01(extfunc)
!ERROR: Actual argument associated with procedure pointer dummy argument 'p=' must be a POINTER unless INTENT(IN)
call s02(realfunc)
@@ -93,9 +93,9 @@
call s02(null(p))
!ERROR: Actual argument associated with procedure pointer dummy argument 'p=' must be a POINTER unless INTENT(IN)
call s02(sin)
- !ERROR: Actual procedure argument has an implicit interface which is not known to be compatible with dummy argument 'p=' which has an explcit interface
+ !ERROR: Actual procedure argument has an implicit interface which is not known to be compatible with dummy argument 'p=' which has an explicit interface
call s02(extfunc)
- !ERROR: Actual procedure argument has an implicit interface which is not known to be compatible with dummy argument 'p=' which has an explcit interface
+ !ERROR: Actual procedure argument has an implicit interface which is not known to be compatible with dummy argument 'p=' which has an explicit interface
call s03(extfuncPtr)
end subroutine