ABS Documentation fix

The specific intrinsics ZABS and CDABS return REAL(8) not COMPLEX(8).

From-SVN: r274847

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 69ec726ac83e8d9f0252e2241793c878b2c13d0f..2beb71b4e7386849de0695a7f3455f0dc2484adc 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,7 @@
+2019-08-23  Mark Eggleston  <mark.eggleston@codethink.com>
+
+       * intrinsics.text: Correct the return types for ZABS and CDABS.
+
 2019-08-22  Steven G. Kargl  <kargl@gcc.gnu.org>
 
        * intrinsic.c (add_subroutines): ERRMSG is INTENT(INOUT) in

diff --git a/gcc/fortran/intrinsic.texi b/gcc/fortran/intrinsic.texi
index 31b97c4def6d2186e6729927d08a68f5174e8a1e..c0267263958c6e8bed4f95593f3990488b991704 100644 (file)
--- a/gcc/fortran/intrinsic.texi
+++ b/gcc/fortran/intrinsic.texi
@@ -470,8 +470,8 @@ end program test_abs
 @item @code{IIABS(A)} @tab @code{INTEGER(2) A} @tab @code{INTEGER(2)} @tab GNU extension
 @item @code{JIABS(A)} @tab @code{INTEGER(4) A} @tab @code{INTEGER(4)} @tab GNU extension
 @item @code{KIABS(A)} @tab @code{INTEGER(8) A} @tab @code{INTEGER(8)} @tab GNU extension
-@item @code{ZABS(A)}  @tab @code{COMPLEX(8) A} @tab @code{COMPLEX(8)} @tab GNU extension
-@item @code{CDABS(A)} @tab @code{COMPLEX(8) A} @tab @code{COMPLEX(8)} @tab GNU extension
+@item @code{ZABS(A)}  @tab @code{COMPLEX(8) A} @tab @code{REAL(8)} @tab GNU extension
+@item @code{CDABS(A)} @tab @code{COMPLEX(8) A} @tab @code{REAL(8)} @tab GNU extension
 @end multitable
 @end table