OSDN Git Service

2004-06-12 Eric Christopher <echristo@redhat.com>
authorechristo <echristo@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 13 Jun 2004 00:40:37 +0000 (00:40 +0000)
committerechristo <echristo@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 13 Jun 2004 00:40:37 +0000 (00:40 +0000)
* config/s390/s390.h: Rename TARGET_TPF to TARGET_TPF_PROFILING.
* config/s390/s390.md: Ditto.
* config/s390/s390.c: Ditto.
(s390_frame_info): Conditionalize frame and setup info on
TARGET_TPF_PROFILING.
(s390_arg_frame_offset): Ditto.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@83051 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/ChangeLog
gcc/config/s390/s390.c
gcc/config/s390/s390.h
gcc/config/s390/s390.md

index 69df57b..27dcc96 100644 (file)
@@ -1,3 +1,12 @@
+2004-06-12  Eric Christopher  <echristo@redhat.com>
+
+       * config/s390/s390.h: Rename TARGET_TPF to TARGET_TPF_PROFILING.
+       * config/s390/s390.md: Ditto.
+       * config/s390/s390.c: Ditto.
+       (s390_frame_info): Conditionalize frame and setup info on
+       TARGET_TPF_PROFILING.
+       (s390_arg_frame_offset): Ditto.
+
 2004-06-12  Roger Sayle  <roger@eyesopen.com>
 
        * fold-const.c (omit_two_operands): New function.
index 9c537ec..b34aefb 100644 (file)
@@ -5280,6 +5280,7 @@ s390_frame_info (void)
   /* Does function need to setup frame and save area.  */
 
   if (! current_function_is_leaf
+      || TARGET_TPF_PROFILING
       || cfun->machine->frame_size > 0
       || current_function_calls_alloca
       || current_function_stdarg)
@@ -5289,6 +5290,7 @@ s390_frame_info (void)
      it is going to be saved/restored.  */
 
   if (!current_function_is_leaf
+      || TARGET_TPF_PROFILING
       || regs_ever_live[RETURN_REGNUM])
     cfun->machine->save_return_addr_p = 1;
 
@@ -5356,6 +5358,7 @@ s390_arg_frame_offset (void)
   /* Does function need to setup frame and save area.  */
 
   if (! current_function_is_leaf
+      || TARGET_TPF_PROFILING
       || fsize > 0
       || current_function_calls_alloca
       || current_function_stdarg)
@@ -5557,7 +5560,7 @@ s390_emit_prologue (void)
      See below for why TPF must use the register 1.  */
 
   if (!current_function_is_leaf
-      && !TARGET_TPF)
+      && !TARGET_TPF_PROFILING)
     temp_reg = gen_rtx_REG (Pmode, RETURN_REGNUM);
   else
     temp_reg = gen_rtx_REG (Pmode, 1);
@@ -5682,7 +5685,7 @@ s390_emit_prologue (void)
   if (flag_pic && regs_ever_live[PIC_OFFSET_TABLE_REGNUM])
     s390_load_got(true);
 
-  if (TARGET_TPF)
+  if (TARGET_TPF_PROFILING)
     {
       /* Generate a BAS instruction to serve as a function
         entry intercept to facilitate the use of tracing
@@ -5705,7 +5708,7 @@ s390_emit_epilogue (bool sibcall)
   rtvec p;
   int i;
 
-  if (TARGET_TPF)
+  if (TARGET_TPF_PROFILING)
     {
 
       /* Generate a BAS instruction to serve as a function
@@ -7074,7 +7077,7 @@ static bool
 s390_function_ok_for_sibcall (tree decl, tree exp)
 {
   /* The TPF epilogue uses register 1.  */
-  if (TARGET_TPF)
+  if (TARGET_TPF_PROFILING)
     return false;
 
   /* The 31 bit PLT code uses register 12 (GOT pointer - caller saved)
index 9c35632..f12d62b 100644 (file)
@@ -95,7 +95,7 @@ extern int target_flags;
 #define MASK_64BIT                 0x10
 #define MASK_ZARCH                 0x20
 #define MASK_MVCLE                 0x40
-#define MASK_TPF                   0x80
+#define MASK_TPF_PROFILING         0x80
 #define MASK_NO_FUSED_MADD         0x100
 
 #define TARGET_HARD_FLOAT          (target_flags & MASK_HARD_FLOAT)
@@ -106,7 +106,7 @@ extern int target_flags;
 #define TARGET_64BIT               (target_flags & MASK_64BIT)
 #define TARGET_ZARCH               (target_flags & MASK_ZARCH)
 #define TARGET_MVCLE               (target_flags & MASK_MVCLE)
-#define TARGET_TPF                 (target_flags & MASK_TPF)
+#define TARGET_TPF_PROFILING       (target_flags & MASK_TPF_PROFILING)
 #define TARGET_NO_FUSED_MADD       (target_flags & MASK_NO_FUSED_MADD)
 #define TARGET_FUSED_MADD         (! TARGET_NO_FUSED_MADD)
 
index 151b5b4..91caa4a 100644 (file)
 (define_insn "prologue_tpf"
   [(unspec_volatile [(const_int 0)] UNSPECV_TPF_PROLOGUE)
    (clobber (reg:DI 1))]
-  "TARGET_TPF"
+  "TARGET_TPF_PROFILING"
   "bas\t%%r1,4064"
   [(set_attr "type" "jsr")
    (set_attr "op_type" "RX")])
 (define_insn "epilogue_tpf"
   [(unspec_volatile [(const_int 0)] UNSPECV_TPF_EPILOGUE)
    (clobber (reg:DI 1))]
-  "TARGET_TPF"
+  "TARGET_TPF_PROFILING"
   "bas\t%%r1,4070"
   [(set_attr "type" "jsr")
    (set_attr "op_type" "RX")])