diff options
| author | Richard Kenner <kenner@gcc.gnu.org> | 1994-01-23 06:22:46 -0500 |
|---|---|---|
| committer | Richard Kenner <kenner@gcc.gnu.org> | 1994-01-23 06:22:46 -0500 |
| commit | 5b9589fe785d4c70f831525b670ec258725140b9 (patch) | |
| tree | cccaef159f49f461df59816bc140667f38c2d3e4 /gcc | |
| parent | 67232b230ede2fcd6c8e6e6ca21e1c9d8e393adf (diff) | |
| download | gcc-5b9589fe785d4c70f831525b670ec258725140b9.zip gcc-5b9589fe785d4c70f831525b670ec258725140b9.tar.gz gcc-5b9589fe785d4c70f831525b670ec258725140b9.tar.bz2 | |
(output_{pro,epi}log): Use assemble_name to output
alpha_function_name.
From-SVN: r6408
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/config/alpha/alpha.c | 24 |
1 files changed, 18 insertions, 6 deletions
diff --git a/gcc/config/alpha/alpha.c b/gcc/config/alpha/alpha.c index 3896044..df52478 100644 --- a/gcc/config/alpha/alpha.c +++ b/gcc/config/alpha/alpha.c @@ -1,5 +1,5 @@ /* Subroutines used for code generation on the DEC Alpha. - Copyright (C) 1992, 1993 Free Software Foundation, Inc. + Copyright (C) 1992, 1993, 1994 Free Software Foundation, Inc. Contributed by Richard Kenner (kenner@nyu.edu) This file is part of GNU CC. @@ -1228,7 +1228,9 @@ output_prolog (file, size) to the .ent directive, the lex_level, is ignored by the assembler, so we might as well omit it. */ - fprintf (file, "\t.ent %s\n", alpha_function_name); + fprintf (file, "\t.ent "); + assemble_name (file, alpha_function_name); + fprintf (file, "\n"); ASM_OUTPUT_LABEL (file, alpha_function_name); inside_function = TRUE; @@ -1258,7 +1260,8 @@ output_prolog (file, size) fprintf (file, "\tldgp $29,0($27)\n"); /* Put a label after the GP load so we can enter the function at it. */ - fprintf (file, "%s..ng:\n", alpha_function_name); + assemble_name (file, alpha_function_name); + fprintf (file, "..ng:\n"); /* Adjust the stack by the frame size. If the frame size is > 4096 bytes, we need to be sure we probe somewhere in the first and last @@ -1304,11 +1307,18 @@ output_prolog (file, size) add_long_const (file, blocks, 31, 5); fprintf (file, "\tlda $4,4096($30)\n"); - fprintf (file, "%s..sc:\n", alpha_function_name); + + assemble_name (file, alpha_function_name); + fprintf (file, "..sc:\n"); + fprintf (file, "\tldq $6,-8192($4)\n"); fprintf (file, "\tsubq $5,1,$5\n"); fprintf (file, "\tlda $4,-8192($4)\n"); - fprintf (file, "\tbne $5,%s..sc\n", alpha_function_name); + + fprintf (file, "\tbne $5"); + assemble_name (file, alpha_function_name); + fprintf (file, "%s..sc\n"); + fprintf (file, "\tlda $30,-%d($4)\n", leftover); if (leftover > 4096) @@ -1493,7 +1503,9 @@ output_epilog (file, size) } /* End the function. */ - fprintf (file, "\t.end %s\n", alpha_function_name); + fprintf (file, "\t.end "); + assemble_name (file, alpha_function_name); + fprintf (file, "\n"); inside_function = FALSE; /* Show that we know this function if it is called again. */ |