From: vondele Date: Fri, 5 Sep 2014 13:40:05 +0000 (+0000) Subject: PR fortran/62245 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e9230990d6fca6cb4575624fa834c5bdbe5285a6;p=thirdparty%2Fgcc.git PR fortran/62245 * intrinsic.texi (INT): clarify result. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@214958 138bc75d-0d04-0410-961f-82ee72b054a4 --- diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 9eeb4cf419b7..236c9097dad9 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2014-09-05 Joost VandeVondele + + PR fortran/62245 + * intrinsic.texi (INT): clarify result. + 2014-09-03 Fritz Reese PR fortran/62174 diff --git a/gcc/fortran/intrinsic.texi b/gcc/fortran/intrinsic.texi index 0f4a8a7021fe..48713a675193 100644 --- a/gcc/fortran/intrinsic.texi +++ b/gcc/fortran/intrinsic.texi @@ -7370,9 +7370,10 @@ the following rules: @item (A) If @var{A} is of type @code{INTEGER}, @code{INT(A) = A} @item (B) -If @var{A} is of type @code{REAL} and @math{|A| < 1}, @code{INT(A)} equals @code{0}. -If @math{|A| \geq 1}, then @code{INT(A)} equals the largest integer that does not exceed -the range of @var{A} and whose sign is the same as the sign of @var{A}. +If @var{A} is of type @code{REAL} and @math{|A| < 1}, @code{INT(A)} +equals @code{0}. If @math{|A| \geq 1}, then @code{INT(A)} is the integer +whose magnitude is the largest integer that does not exceed the magnitude +of @var{A} and whose sign is the same as the sign of @var{A}. @item (C) If @var{A} is of type @code{COMPLEX}, rule B is applied to the real part of @var{A}. @end table