diff options
| -rw-r--r-- | gcc/fortran/ChangeLog | 8 | ||||
| -rw-r--r-- | gcc/fortran/dump-parse-tree.c | 6 |
2 files changed, 11 insertions, 3 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 4e1937a5aac..f610a2ed12b 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,7 +1,11 @@ +2005-11-08 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de> + + * dump-parse-tree.c: Fix comment typo, add a few blank lines. + 2005-11-07 Steven G. Kargl <kargls@comcast.net> - *error.c: Use flag_fatal_error. - *invoke.texi: Remove -Werror from list of options. + * error.c: Use flag_fatal_error. + * invoke.texi: Remove -Werror from list of options. 2005-11-06 Paul Thomas <pault@gcc.gnu.org> diff --git a/gcc/fortran/dump-parse-tree.c b/gcc/fortran/dump-parse-tree.c index 2d708f7efed..7d2b26d2d72 100644 --- a/gcc/fortran/dump-parse-tree.c +++ b/gcc/fortran/dump-parse-tree.c @@ -61,6 +61,7 @@ code_indent (int level, gfc_st_label * label) /* Simple indentation at the current level. This one is used to show symbols. */ + static inline void show_indent (void) { @@ -70,6 +71,7 @@ show_indent (void) /* Show type-specific information. */ + static void gfc_show_typespec (gfc_typespec * ts) { @@ -686,6 +688,7 @@ gfc_show_symbol (gfc_symbol * sym) /* Show a user-defined operator. Just prints an operator and the name of the associated subroutine, really. */ + static void show_uop (gfc_user_op * uop) { @@ -746,6 +749,7 @@ show_common (gfc_symtree * st) gfc_status_char ('\n'); } + /* Worker function to display the symbol tree. */ static void @@ -1434,7 +1438,7 @@ gfc_show_code_node (int level, gfc_code * c) } -/* Show and equivalence chain. */ +/* Show an equivalence chain. */ static void gfc_show_equiv (gfc_equiv *eq) |