diff options
author | Nathan Sidwell <nathan@codesourcery.com> | 2003-07-05 16:11:53 +0000 |
---|---|---|
committer | Nathan Sidwell <nathan@gcc.gnu.org> | 2003-07-05 16:11:53 +0000 |
commit | f5924ac1ecc7def8262994d4a90fdcbc3df40f9d (patch) | |
tree | d2e9fdc94df1c994011ca95833f07282659dd155 /gcc/config | |
parent | f92c5313e17a9b084d8bb80f272d3b9996156d1f (diff) | |
download | gcc-f5924ac1ecc7def8262994d4a90fdcbc3df40f9d.zip gcc-f5924ac1ecc7def8262994d4a90fdcbc3df40f9d.tar.gz gcc-f5924ac1ecc7def8262994d4a90fdcbc3df40f9d.tar.bz2 |
toplev.c (output_clean_symbol_name): Remove.
* toplev.c (output_clean_symbol_name): Remove.
* toplev.h (output_clean_symbol_name): Remove.
* config/alpha/alpha.c (unicosmk_output_module_name): Use
lbasename & clean_symbol_name.
From-SVN: r68978
Diffstat (limited to 'gcc/config')
-rw-r--r-- | gcc/config/alpha/alpha.c | 21 |
1 files changed, 9 insertions, 12 deletions
diff --git a/gcc/config/alpha/alpha.c b/gcc/config/alpha/alpha.c index 927073f..df386de 100644 --- a/gcc/config/alpha/alpha.c +++ b/gcc/config/alpha/alpha.c @@ -9278,22 +9278,19 @@ unicosmk_initial_elimination_offset (int from, int to) static void unicosmk_output_module_name (FILE *file) { - const char *name; - - /* Strip directories. */ - - name = strrchr (main_input_filename, '/'); - if (name) - ++name; - else - name = main_input_filename; - + const char *name = lbasename (main_input_filename); + unsigned len = strlen (name); + char *clean_name = alloca (len + 2); + char *ptr = clean_name; + /* CAM only accepts module names that start with a letter or '$'. We prefix the module name with a '$' if necessary. */ if (!ISALPHA (*name)) - putc ('$', file); - output_clean_symbol_name (file, name); + *ptr++ = '$'; + memcpy (ptr, name, len + 1); + clean_symbol_name (clean_name); + fputs (clean_name, file); } /* Output the definition of a common variable. */ |