diff options
| author | Tristan Gingold <gingold@adacore.com> | 2011-11-15 10:22:55 +0000 |
|---|---|---|
| committer | Tristan Gingold <gingold@gcc.gnu.org> | 2011-11-15 10:22:55 +0000 |
| commit | e50e723eec48cdf285b27e51fead37b385d5f891 (patch) | |
| tree | d4582430bbacc6d392241d140391b5fb7daa194c /gcc/c-family | |
| parent | 7c209481147555ddd22296b1eff0fd1833588d35 (diff) | |
| download | gcc-e50e723eec48cdf285b27e51fead37b385d5f891.zip gcc-e50e723eec48cdf285b27e51fead37b385d5f891.tar.gz gcc-e50e723eec48cdf285b27e51fead37b385d5f891.tar.bz2 | |
c-pragma.h (pragma_extern_prefix): Declare.
2011-11-15 Tristan Gingold <gingold@adacore.com>
* c-family/c-pragma.h (pragma_extern_prefix): Declare.
* c-family/c-pragma.c (pragma_extern_prefix): Make it public.
* config/vms/vms-c.c (saved_extern_prefix): New variable.
(vms_pragma_extern_prefix): New function.
(vms_c_register_pragma): Register vms_pragma_extern_prefix.
From-SVN: r181379
Diffstat (limited to 'gcc/c-family')
| -rw-r--r-- | gcc/c-family/c-pragma.c | 3 | ||||
| -rw-r--r-- | gcc/c-family/c-pragma.h | 2 |
2 files changed, 4 insertions, 1 deletions
diff --git a/gcc/c-family/c-pragma.c b/gcc/c-family/c-pragma.c index 7622f0b..930423b 100644 --- a/gcc/c-family/c-pragma.c +++ b/gcc/c-family/c-pragma.c @@ -494,7 +494,8 @@ add_to_renaming_pragma_list (tree oldname, tree newname) p->newname = newname; } -static GTY(()) tree pragma_extern_prefix; +/* The current prefix set by #pragma extern_prefix. */ +GTY(()) tree pragma_extern_prefix; /* #pragma extern_prefix "prefix" */ static void diff --git a/gcc/c-family/c-pragma.h b/gcc/c-family/c-pragma.h index 04af94f..86681ae 100644 --- a/gcc/c-family/c-pragma.h +++ b/gcc/c-family/c-pragma.h @@ -146,4 +146,6 @@ extern enum cpp_ttype c_lex_with_flags (tree *, location_t *, unsigned char *, extern void c_pp_lookup_pragma (unsigned int, const char **, const char **); +extern GTY(()) tree pragma_extern_prefix; + #endif /* GCC_C_PRAGMA_H */ |