Cutover to system.h:

Mon Jun 15 22:21:57 1998  Craig Burley  <burley@gnu.org>
	Cutover to system.h:
	* Make-lang.in:
	* Makefile.in:
	* ansify.c:
	* bad.c:
	* bld.c:
	* com.c:
	* com.h:
	* expr.c:
	* fini.c:
	* g77spec.c:
	* implic.c:
	* intdoc.c:
	* intrin.c:
	* lex.c:
	* lex.h:
	* parse.c:
	* proj.c:
	* proj.h:
	* src.c:
	* src.h:
	* stb.c:
	* ste.c:
	* target.c:
	* top.c:
	* system.j: New file.
	Use toplev.h where appropriate:
	* Make-lang.in:
	* Makefile.in:
	* bad.c:
	* bld.c:
	* com.c:
	* lex.c:
	* ste.c:
	* top.c:
	* toplev.j: New file.
	Conditionalize all dumping/reporting routines so they don't
	get built for gcc/egcs:
	* bld.c:
	* bld.h:
	* com.c:
	* equiv.c:
	* equiv.h:
	* sta.c:
	* stt.c:
	* stt.h:
	* symbol.c:
	* symbol.h:
	Use hconfig.h instead of config.h where appropriate:
	* Makefile.in (proj-h.o): Compile with -DUSE_HCONFIG.
	* fini.c: Define USE_HCONFIG before including proj.h.
	* Makefile.in (deps-kinda): Redirect stderr to stdout,
	to eliminate diagnostics vis-a-vis g77spec.c.
	* Makefile.in: Regenerate dependencies via deps-kinda.
	* lex.c (ffelex_file_fixed, ffelex_file_free): Eliminate
	apparently spurious warnings about uninitialized variables
	`c', `column', and so on.

From-SVN: r20520

1 files changed, 2 insertions, 2 deletions

diff --git a/gcc/f/src.h b/gcc/f/src.h
index 20a1993..0216a7c 100644
--- a/gcc/f/src.h
+++ b/gcc/f/src.h
@@ -87,9 +87,9 @@ extern bool ffesrc_ok_match_noninit_lower_;
    characters for which ffelex_is_firstnamechar returns TRUE.  */
 
 #define ffesrc_is_name_init(c) \
-  ((isalpha ((c))) || (!(1 || ffe_is_90 ()) && ((c) == '_')))
+  ((ISALPHA ((c))) || (! (1 || ffe_is_90 ()) && ((c) == '_')))
 #define ffesrc_is_name_noninit(c) \
-  ((isalnum ((c))) || (!(1 || ffe_is_90 ()) && ((c) == '_')))
+  ((ISALNUM ((c))) || (! (1 || ffe_is_90 ()) && ((c) == '_')))
 
 /* Test if source-translated character matches given alphabetic character
    (passed in both uppercase and lowercase, to allow for custom speedup