This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[gfortran, committed] Fix comment


I committed this fix to the comment preceding gfc_intrinsic_conversion, which
had a glaring typo. This was preapproved by Paul on IRC.

- Tobi

Index: ChangeLog
===================================================================
RCS file: /cvs/gcc/gcc/gcc/fortran/ChangeLog,v
retrieving revision 1.275
diff -u -p -r1.275 ChangeLog
--- ChangeLog   15 Dec 2004 19:15:38 -0000      1.275
+++ ChangeLog   16 Dec 2004 19:09:52 -0000
@@ -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
Index: trans-intrinsic.c
===================================================================
RCS file: /cvs/gcc/gcc/gcc/fortran/trans-intrinsic.c,v
retrieving revision 1.33
diff -u -p -r1.33 trans-intrinsic.c
--- trans-intrinsic.c   15 Dec 2004 03:56:06 -0000      1.33
+++ trans-intrinsic.c   16 Dec 2004 19:09:52 -0000
@@ -214,9 +214,9 @@ gfc_conv_intrinsic_conversion (gfc_se *
   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


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]