diff options
author | Nick Clifton <nickc@cygnus.com> | 1998-10-01 10:52:36 +0000 |
---|---|---|
committer | Nick Clifton <nickc@gcc.gnu.org> | 1998-10-01 10:52:36 +0000 |
commit | a09a009c459a7314cef619c329c9291a59fdb077 (patch) | |
tree | a0a48c15ec22cbd1c0d7be1f9f7615d0502fdff4 | |
parent | e2af664c2d6add614f1ef044f78b0c6ef89cf0d7 (diff) | |
download | gcc-a09a009c459a7314cef619c329c9291a59fdb077.zip gcc-a09a009c459a7314cef619c329c9291a59fdb077.tar.gz gcc-a09a009c459a7314cef619c329c9291a59fdb077.tar.bz2 |
Replace occurances of HANDLE_SYSV_PRAGMA with HANDLE_GENERIC_PRAGMAS.
From-SVN: r22711
-rw-r--r-- | gcc/cp/ChangeLog | 3 | ||||
-rw-r--r-- | gcc/cp/lex.c | 25 | ||||
-rw-r--r-- | gcc/f/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/f/lex.c | 6 |
4 files changed, 24 insertions, 15 deletions
diff --git a/gcc/cp/ChangeLog b/gcc/cp/ChangeLog index 61c67f1..8f358d8 100644 --- a/gcc/cp/ChangeLog +++ b/gcc/cp/ChangeLog @@ -5,6 +5,9 @@ Thu Oct 1 10:43:45 1998 Nick Clifton <nickc@cygnus.com> (start_function): Add invocation of SET_DEFAULT_DECL_ATTRIBUTES, if defined. + * lex.c: Replace occurances of HANDLE_SYSV_PRAGMA with + HANDLE_GENERIC_PRAGMAS. + 1998-09-28 Anthony Green <green@cygnus.com> * semantics.c (finish_asm_stmt): Always permit volatile asms. diff --git a/gcc/cp/lex.c b/gcc/cp/lex.c index 20e4700..ac4d8b49 100644 --- a/gcc/cp/lex.c +++ b/gcc/cp/lex.c @@ -75,8 +75,8 @@ static void store_pending_inline PROTO((tree, struct pending_inline *)); static void reinit_parse_for_expr PROTO((struct obstack *)); static int *init_cpp_parse PROTO((void)); static int handle_cp_pragma PROTO((char *)); -#ifdef HANDLE_SYSV_PRAGMA -static int handle_sysv_pragma PROTO((int)); +#ifdef HANDLE_GENERIC_PRAGMAS +static int handle_generic_pragma PROTO((int)); #endif #ifdef GATHER_STATISTICS #ifdef REDUCE_LENGTH @@ -2308,7 +2308,7 @@ check_newline () goto skipline; #ifdef HANDLE_PRAGMA - /* We invoke HANDLE_PRAGMA before HANDLE_SYSV_PRAGMA + /* We invoke HANDLE_PRAGMA before HANDLE_GENERIC_PRAGMAS (if both are defined), in order to give the back end a chance to override the interpretation of SYSV style pragmas. */ @@ -2317,10 +2317,10 @@ check_newline () goto skipline; #endif /* HANDLE_PRAGMA */ -#ifdef HANDLE_SYSV_PRAGMA - if (handle_sysv_pragma (token)) +#ifdef HANDLE_GENERIC_PRAGMAS + if (handle_generic_pragma (token)) goto skipline; -#endif /* !HANDLE_SYSV_PRAGMA */ +#endif /* HANDLE_GENERIC_PRAGMAS */ /* Issue a warning message if we have been asked to do so. Ignoring unknown pragmas in system header file unless @@ -4934,17 +4934,17 @@ handle_cp_pragma (pname) return 0; } -#ifdef HANDLE_SYSV_PRAGMA +#ifdef HANDLE_GENERIC_PRAGMAS -/* Handle a #pragma directive. INPUT is the current input stream, - and C is a character to reread. Processes the entire input line - and returns a character for the caller to reread: either \n or EOF. */ +/* Handle a #pragma directive. TOKEN is the type of the word following + the #pragma directive on the line. Process the entire input line and + return non-zero iff the directive successfully parsed. */ /* This function has to be in this file, in order to get at the token types. */ static int -handle_sysv_pragma (token) +handle_generic_pragma (token) register int token; { for (;;) @@ -4977,7 +4977,8 @@ handle_sysv_pragma (token) default: return handle_pragma_token (NULL_PTR, NULL_TREE); } + token = real_yylex (); } } -#endif /* HANDLE_SYSV_PRAGMA */ +#endif /* HANDLE_GENERIC_PRAGMAS */ diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog index 0745a23..2560e3f 100644 --- a/gcc/f/ChangeLog +++ b/gcc/f/ChangeLog @@ -1,3 +1,8 @@ +Thu Oct 1 10:43:45 1998 Nick Clifton <nickc@cygnus.com> + + * lex.c: Replace occurances of HANDLE_SYSV_PRAGMA with + HANDLE_GENERIC_PRAGMAS. + Mon Sep 28 04:22:00 1998 Jeffrey A Law (law@cygnus.com) * news.texi: Update from Craig. diff --git a/gcc/f/lex.c b/gcc/f/lex.c index 2ccdc07..c43aa7e 100644 --- a/gcc/f/lex.c +++ b/gcc/f/lex.c @@ -1145,10 +1145,10 @@ ffelex_hash_ (FILE *finput) if (HANDLE_PRAGMA (pragma_getc, pragma_ungetc, buffer)) goto skipline; #endif /* HANDLE_PRAGMA */ -#ifdef HANDLE_SYSV_PRAGMA - if (handle_sysv_pragma (buffer)) +#ifdef HANDLE_GENERIC_PRAGMAS + if (handle_generic_pragma (buffer)) goto skipline; -#endif /* !HANDLE_SYSV_PRAGMA */ +#endif /* !HANDLE_GENERIC_PRAGMAS */ /* Issue a warning message if we have been asked to do so. Ignoring unknown pragmas in system header file unless |