aix41.h (RS6000_CALL_GLUE): Define.

* rs6000/aix41.h (RS6000_CALL_GLUE): Define.
	* rs6000/aix43.h (RS6000_CALL_GLUE): Likewise.
	* rs6000/rs6000.c (rs6000_file_start): Use putc.
	(rs6000_output_load_toc_table): Same.
	(output_prolog, output_mi_thunk): Same.
	* rs6000/rs6000.h (SELECT_SECTION): Formatting.
	(ASM_GLOBALIZE_LABEL): Use putc.

From-SVN: r27287
This commit is contained in:
David Edelsohn 1999-06-01 16:12:21 +00:00 committed by David Edelsohn
parent 80ee53c1d3
commit 949ea3566a
5 changed files with 28 additions and 7 deletions

View File

@ -1,3 +1,13 @@
Tue Jun 1 19:06:22 1999 David Edelsohn <edelsohn@gnu.org>
* rs6000/aix41.h (RS6000_CALL_GLUE): Define.
* rs6000/aix43.h (RS6000_CALL_GLUE): Likewise.
* rs6000/rs6000.c (rs6000_file_start): Use putc.
(rs6000_output_load_toc_table): Same.
(output_prolog, output_mi_thunk): Same.
* rs6000/rs6000.h (SELECT_SECTION): Formatting.
(ASM_GLOBALIZE_LABEL): Use putc.
Mon May 31 15:23:23 1999 Richard Henderson <rth@cygnus.com>
* alpha.md (reload_*_help): New patterns and splitters.

View File

@ -168,3 +168,9 @@ Boston, MA 02111-1307, USA. */
%{mthreads:%{pg:gcrt0_r%O%s}%{!pg:%{p:mcrt0_r%O%s}%{!p:crt0_r%O%s}}}\
%{!mthreads:%{pg:gcrt0%O%s}%{!pg:%{p:mcrt0%O%s}%{!p:crt0%O%s}}}}}"
/* AIX 4 uses PowerPC nop (ori 0,0,0) instruction as call glue for PowerPC
and "cror 31,31,31" for POWER architecture. */
#undef RS6000_CALL_GLUE
#define RS6000_CALL_GLUE "{cror 31,31,31|nop}"

View File

@ -204,3 +204,8 @@ do { \
#undef PTRDIFF_TYPE
#define PTRDIFF_TYPE "long int"
/* AIX 4 uses PowerPC nop (ori 0,0,0) instruction as call glue for PowerPC
and "cror 31,31,31" for POWER architecture. */
#undef RS6000_CALL_GLUE
#define RS6000_CALL_GLUE "{cror 31,31,31|nop}"

View File

@ -414,7 +414,7 @@ rs6000_file_start (file, default_cpu)
#endif
if (*start == '\0')
fputs ("\n", file);
putc ('\n', file);
}
}
@ -3903,7 +3903,7 @@ rs6000_output_load_toc_table (file, reg)
reg_names[0]);
ASM_GENERATE_INTERNAL_LABEL (buf, "LCL", rs6000_pic_labelno);
assemble_name (file, buf);
fputs ("-", file);
putc ('-', file);
ASM_GENERATE_INTERNAL_LABEL (buf, "LCF", rs6000_pic_labelno);
assemble_name (file, buf);
fprintf (file, ")(%s)\n", reg_names[reg]);
@ -4156,7 +4156,7 @@ output_prolog (file, size)
ASM_GENERATE_INTERNAL_LABEL (buf, "LCprobe", probe_labelno++);
fputs ("\tbdnz ", file);
assemble_name (file, buf);
fputs ("\n", file);
putc ('\n', file);
}
}
@ -4676,7 +4676,7 @@ output_mi_thunk (file, thunk_fndecl, delta, function)
fprintf (file, "\tb %s", prefix);
assemble_name (file, fname);
if (DEFAULT_ABI == ABI_V4 && flag_pic) fputs ("@local", file);
fputs ("\n", file);
putc ('\n', file);
}
else
@ -4725,7 +4725,7 @@ output_mi_thunk (file, thunk_fndecl, delta, function)
fprintf (file, "\tb %s", prefix);
assemble_name (file, fname);
if (flag_pic) fputs ("@plt", file);
fputs ("\n", file);
putc ('\n', file);
break;
/* Don't use r11, that contains the static chain, just use r0/r12. */

View File

@ -2704,7 +2704,7 @@ extern int toc_initialized;
#define SELECT_SECTION(EXP,RELOC) \
{ \
if ((TREE_CODE (EXP) == STRING_CST \
&& !flag_writable_strings) \
&& ! flag_writable_strings) \
|| (TREE_CODE_CLASS (TREE_CODE (EXP)) == 'd' \
&& TREE_READONLY (EXP) && ! TREE_THIS_VOLATILE (EXP) \
&& DECL_INITIAL (EXP) \
@ -2967,7 +2967,7 @@ extern char rs6000_reg_names[][8]; /* register names (0 vs. %r0). */
#define ASM_GLOBALIZE_LABEL(FILE,NAME) \
do { fputs ("\t.globl ", FILE); \
RS6000_OUTPUT_BASENAME (FILE, NAME); fputs ("\n", FILE);} while (0)
RS6000_OUTPUT_BASENAME (FILE, NAME); putc ('\n', FILE);} while (0)
/* This is how to output a reference to a user-level label named NAME.
`assemble_name' uses this. */