trans-intrinsic.c (build_fixbound_expr): Clarify comment, fix comment typo.

* trans-intrinsic.c (build_fixbound_expr): Clarify comment, fix
comment typo.

From-SVN: r92274

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 7a022ba07559b75a31466f3b729b700f3e40151f..8887db0c486f14b6e2ab4c387b2988da0dff29ae 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2004-12-16  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
+
+       * trans-intrinsic.c (build_fixbound_expr): Clarify comment, fix
+       comment typo.
+
 2004-12-15  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
 
        PR fortran/18993

diff --git a/gcc/fortran/trans-intrinsic.c b/gcc/fortran/trans-intrinsic.c
index ee1f7f59bfdc5d8ac9ea4cf8f18958a7774177a4..e11aa302bfa47967075789d595ae42f6381b8a04 100644 (file)
--- a/gcc/fortran/trans-intrinsic.c
+++ b/gcc/fortran/trans-intrinsic.c
@@ -214,9 +214,9 @@ gfc_conv_intrinsic_conversion (gfc_se * se, gfc_expr * expr)
   se->expr = convert (type, arg);
 }
 
-
-/* This is needed because the gcc backend only implements FIX_TRUNC_EXPR
-   TRUNC(x) = INT(x) <= x ? INT(x) : INT(x) - 1
+/* This is needed because the gcc backend only implements
+   FIX_TRUNC_EXPR, which is the same as INT() in Fortran.
+   FLOOR(x) = INT(x) <= x ? INT(x) : INT(x) - 1
    Similarly for CEILING.  */
 
 static tree