@@ -1892,7 +1892,7 @@ std::optional<SpecificCall> IntrinsicInterface::Match(
18921892 // arguments in a procedure reference.
18931893 std::size_t dummyArgPatterns{0 };
18941894 for (; dummyArgPatterns < maxArguments && dummy[dummyArgPatterns].keyword ;
1895- ++dummyArgPatterns) {
1895+ ++dummyArgPatterns) {
18961896 }
18971897 // MAX and MIN (and others that map to them) allow their last argument to
18981898 // be repeated indefinitely. The actualForDummy vector is sized
@@ -2696,7 +2696,7 @@ std::optional<SpecificCall> IntrinsicInterface::Match(
26962696 // Rearrange the actual arguments into dummy argument order.
26972697 ActualArguments rearranged (dummies);
26982698 for (std::size_t j{0 }; j < dummies; ++j) {
2699- if (ActualArgument * arg{actualForDummy[j]}) {
2699+ if (ActualArgument *arg{actualForDummy[j]}) {
27002700 rearranged[j] = std::move (*arg);
27012701 }
27022702 }
@@ -3127,7 +3127,7 @@ IntrinsicProcTable::Implementation::HandleC_F_Pointer(
31273127 }
31283128 } else if (!IsInteroperableIntrinsicType (
31293129 *type, &context.languageFeatures ())
3130- .value_or (true )) {
3130+ .value_or (true )) {
31313131 if (type->category () == TypeCategory::Character &&
31323132 type->kind () == 1 ) {
31333133 if (context.languageFeatures ().ShouldWarn (
@@ -3633,7 +3633,7 @@ std::optional<SpecificCall> IntrinsicProcTable::Implementation::Probe(
36333633 parser::Messages specificBuffer;
36343634 auto specificRange{specificFuncs_.equal_range (call.name )};
36353635 for (auto specIter{specificRange.first }; specIter != specificRange.second ;
3636- ++specIter) {
3636+ ++specIter) {
36373637 // We only need to check the cases with distinct generic names.
36383638 if (const char *genericName{specIter->second ->generic }) {
36393639 if (auto specificCall{
@@ -3655,13 +3655,13 @@ std::optional<SpecificCall> IntrinsicProcTable::Implementation::Probe(
36553655 if (context.languageFeatures ().IsEnabled (common::LanguageFeature::
36563656 UseGenericIntrinsicWhenSpecificDoesntMatch)) {
36573657 for (auto specIter{specificRange.first }; specIter != specificRange.second ;
3658- ++specIter) {
3658+ ++specIter) {
36593659 // We only need to check the cases with distinct generic names.
36603660 if (const char *genericName{specIter->second ->generic }) {
36613661 if (specIter->second ->useGenericAndForceResultType ) {
36623662 auto genericRange{genericFuncs_.equal_range (genericName)};
36633663 for (auto genIter{genericRange.first }; genIter != genericRange.second ;
3664- ++genIter) {
3664+ ++genIter) {
36653665 if (auto specificCall{
36663666 matchOrBufferMessages (*genIter->second , specificBuffer)}) {
36673667 // Force the call result type to the specific intrinsic result
0 commit comments