@@ -811,7 +811,7 @@ static void CheckExplicitDataArg(const characteristics::DummyDataObject &dummy,
811811 // General implementation of F'23 15.5.2.5 note 5
812812 // Adds a less specific error message for any copy-out that could overwrite
813813 // a unread value in the actual argument.
814- // Occurences of volatileOrAsyncNeedsTempDiagnosticIssued = true indicate a
814+ // Occurences of ` volatileOrAsyncNeedsTempDiagnosticIssued = true` indicate a
815815 // more specific error message has already been issued. We might be able to
816816 // clean this up by switching the coding style of MayNeedCopy to be more like
817817 // WhyNotDefinable.
@@ -828,8 +828,8 @@ static void CheckExplicitDataArg(const characteristics::DummyDataObject &dummy,
828828 // If there are any cases where we don't need a copy and some other compiler
829829 // does, we issue a portability warning here.
830830 if (context.ShouldWarn (common::UsageWarning::Portability)) {
831- // Nag, GFortran, and NVFortran all error on this case, even though it is
832- // ok, prossibly as an over-restriction of F'23 C1548.
831+ // 3 other compilers error on this case even though it is ok.
832+ // Possibly as an over-restriction of F'23 C1548.
833833 if (!copyOutNeeded && !volatileOrAsyncNeedsTempDiagnosticIssued &&
834834 (!dummyIsValue && (dummyIsAsynchronous || dummyIsVolatile)) &&
835835 !(actualIsAsynchronous || actualIsVolatile) &&
@@ -842,7 +842,7 @@ static void CheckExplicitDataArg(const characteristics::DummyDataObject &dummy,
842842 actual.AsFortran (), dummyName,
843843 dummyIsAsynchronous ? " ASYNCHRONOUS" : " VOLATILE" );
844844 }
845- // Probably an over-restriction of F'23 15.5.2.5 note 5
845+ // Possibly an over-restriction of F'23 15.5.2.5 note 5
846846 if (copyOutNeeded && !volatileOrAsyncNeedsTempDiagnosticIssued) {
847847 if ((dummyIsVolatile && !actualIsVolatile && !actualIsAsynchronous) ||
848848 (dummyIsAsynchronous && !actualIsVolatile && !actualIsAsynchronous)) {
0 commit comments