diff options
| -rw-r--r-- | gcc/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/c-common.h | 3 | ||||
| -rw-r--r-- | gcc/f/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/f/lex.c | 6 |
4 files changed, 15 insertions, 4 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index d960d60..3887bbee 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,8 @@ +2004-02-15 Roger Sayle <roger@eyesopen.com> + + * c-common.h (GET_DIRECTIVE_LINE): Remove unused macro. + (get_directive_line): Remove unused function prototype. + 2004-02-14 Josef Zlomek <zlomekj@suse.cz> * tree-inline.c (copy_body_r): Do not replace ret_label. diff --git a/gcc/c-common.h b/gcc/c-common.h index 5529252..f409e7a 100644 --- a/gcc/c-common.h +++ b/gcc/c-common.h @@ -931,9 +931,6 @@ extern tree convert_and_check (tree, tree); extern void overflow_warning (tree); extern void unsigned_conversion_warning (tree, tree); -/* Read the rest of the current #-directive line. */ -extern char *get_directive_line (void); -#define GET_DIRECTIVE_LINE() get_directive_line () #define c_sizeof(T) c_sizeof_or_alignof_type (T, SIZEOF_EXPR, 1) #define c_alignof(T) c_sizeof_or_alignof_type (T, ALIGNOF_EXPR, 1) diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog index 9893e52..e047170 100644 --- a/gcc/f/ChangeLog +++ b/gcc/f/ChangeLog @@ -1,5 +1,10 @@ 2004-02-15 Roger Sayle <roger@eyesopen.com> + * lex.c (ffelex_get_directive_line): Provide a more descriptive + comment. Remove reference to non-existant get_directive_line. + +2004-02-15 Roger Sayle <roger@eyesopen.com> + PR fortran/14129 * lex.c (ffelex_cfelex_): Avoid calling xrealloc on a local stack allocated array. diff --git a/gcc/f/lex.c b/gcc/f/lex.c index 8475d2f..9a38ad5 100644 --- a/gcc/f/lex.c +++ b/gcc/f/lex.c @@ -920,7 +920,11 @@ ffelex_finish_statement_ (void) } } -/* Copied from gcc/c-common.c get_directive_line. */ +/* Read a preprocessor directive line from file FINPUT. This function + returns either '\n' or EOF to indicate success or failure respectively. + Upon return, TEXT points to the contents of the line, which is stripped + of initial whitespace. The buffer pointed to by TEXT should not be + free'd and is overwritten by subsequent calls to this function. */ static int ffelex_get_directive_line_ (char **text, FILE *finput) |