OSDN Git Service

* generated/minval_r8.c: Regenerate.
[pf3gnuchains/gcc-fork.git] / libgfortran / generated / maxloc0_16_r8.c
index 6c004b0..ed51b8a 100644 (file)
@@ -128,7 +128,7 @@ maxloc0_16_r8 (gfc_array_i16 * const restrict retarray,
              the next dimension.  */
           count[n] = 0;
           /* We could precalculate these products, but this is a less
-             frequently used path so proabably not worth it.  */
+             frequently used path so probably not worth it.  */
           base -= sstride[n] * extent[n];
           n++;
           if (n == rank)
@@ -253,7 +253,7 @@ mmaxloc0_16_r8 (gfc_array_i16 * const restrict retarray,
              the next dimension.  */
           count[n] = 0;
           /* We could precalculate these products, but this is a less
-             frequently used path so proabably not worth it.  */
+             frequently used path so probably not worth it.  */
           base -= sstride[n] * extent[n];
           mbase -= mstride[n] * extent[n];
           n++;