c-common.h (GET_DIRECTIVE_LINE): Remove unused macro.

	* c-common.h (GET_DIRECTIVE_LINE): Remove unused macro.
	(get_directive_line): Remove unused function prototype.

	* f/lex.c (ffelex_get_directive_line): Provide a more descriptive
	comment.  Remove reference to non-existant get_directive_line.

From-SVN: r77850

gcc/ChangeLog

+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.

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)
 

gcc/f/ChangeLog

 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.

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)