* trans-types.h: Add comments.

	(intmax_type_node, string_type_node, const_string_type_node): Remove.
libgfortran/
	* libgfortran.h: Add comments.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@86810 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 6f368c2..042b72c 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2004-08-31  Paul Brook  <paul@codesourcery.com>
+
+       * trans-types.h: Add comments.
+       (intmax_type_node, string_type_node, const_string_type_node): Remove.
+

 2004-08-30  Richard Henderson  <rth@redhat.com>
 
        * Make-lang.in (fortran/f95-lang.o): Update dependencies.
 2004-08-30  Richard Henderson  <rth@redhat.com>
 
        * Make-lang.in (fortran/f95-lang.o): Update dependencies.

diff --git a/gcc/fortran/trans-types.h b/gcc/fortran/trans-types.h
index 0bb131e..6e92359 100644 (file)
--- a/gcc/fortran/trans-types.h
+++ b/gcc/fortran/trans-types.h
@@ -45,15 +45,13 @@ extern GTY(()) tree gfc_character1_type_node;
 extern GTY(()) tree ppvoid_type_node;
 extern GTY(()) tree pvoid_type_node;
 extern GTY(()) tree pchar_type_node;
 extern GTY(()) tree ppvoid_type_node;
 extern GTY(()) tree pvoid_type_node;
 extern GTY(()) tree pchar_type_node;

+/* This is the type used to hold string lengths.  It has nothing to do with
+   the C strlen(3) function.  It must be the same as the corresponding
+   definition in gfortran.h.  */
+/* TODO: This is still hardcoded as kind=4 in some bits of the compiler
+   and runtime library.  */

 extern GTY(()) tree gfc_strlen_type_node;
 
 extern GTY(()) tree gfc_strlen_type_node;
 

-/* These C-specific types are used while building builtin function decls.
-   For now it doesn't really matter what these are defined to as we don't
-   need any of the builtins that use them.  */
-#define intmax_type_node gfc_int8_type_node
-#define string_type_node pchar_type_node
-#define const_string_type_node pchar_type_node
-

 /* be-function.c */
 void gfc_convert_function_code (gfc_namespace *);
 
 /* be-function.c */
 void gfc_convert_function_code (gfc_namespace *);
 

diff --git a/libgfortran/ChangeLog b/libgfortran/ChangeLog
index 48b652f..49af843 100644 (file)
--- a/libgfortran/ChangeLog
+++ b/libgfortran/ChangeLog
@@ -1,3 +1,7 @@
+2004-08-31  Paul Brook  <paul@codesourcery.com>
+
+       * libgfortran.h: Add comments.
+

 2004-08-30  Richard Henderson  <rth@redhat.com>
 
        * Makefile.am (gfor_helper_src): Split selected_kind.f90.
 2004-08-30  Richard Henderson  <rth@redhat.com>
 
        * Makefile.am (gfor_helper_src): Split selected_kind.f90.

diff --git a/libgfortran/libgfortran.h b/libgfortran/libgfortran.h
index b87dde6..2819703 100644 (file)
--- a/libgfortran/libgfortran.h
+++ b/libgfortran/libgfortran.h
@@ -87,7 +87,11 @@ typedef double GFC_REAL_8;
 typedef complex float GFC_COMPLEX_4;
 typedef complex double GFC_COMPLEX_8;
 
 typedef complex float GFC_COMPLEX_4;
 typedef complex double GFC_COMPLEX_8;
 

+/* The following two definitions must be consistent with the types used
+   by the compiler.  */
+/* The type used of array indices, amongst other things.  */

 typedef size_t index_type;
 typedef size_t index_type;

+/* The type used for string lengths.  Nothing to do with strlen(3).  */

 typedef GFC_INTEGER_4 gfc_strlen_type;
 
 /* This will be 0 on little-endian machines and one on big-endian machines.  */
 typedef GFC_INTEGER_4 gfc_strlen_type;
 
 /* This will be 0 on little-endian machines and one on big-endian machines.  */