s390.md ("prologue_tpf", [...]): Alter trace hooks calls to improve performance.

2005-04-29  Jim Tison  <jtison@us.ibm.com>

        * config/s390/s390.md ("prologue_tpf", "epilogue_tpf"): Alter
        trace hooks calls to improve performance.

From-SVN: r98987

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 5d30e2c5b0fe4e5177deb3e23ea91c5770389d53..65dcd3f2b23063178b24526e7277af659e15e314 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2005-04-29  Jim Tison  <jtison@us.ibm.com>
+
+       * config/s390/s390.md ("prologue_tpf", "epilogue_tpf"): Alter
+       trace hooks calls to improve performance.
+
 2005-04-29  Julian Brown  <julian@codesourcery.com>
            Mark Mitchell  <mark@codesourcery.com>
            Paul Brook  <paul@codesourcery.com>

diff --git a/gcc/config/s390/s390.md b/gcc/config/s390/s390.md
index 65b49dc2d455ed4db5d3a7a40f13c66b83a461aa..300bffb1fbf75abb1ad3979ce088845a65355dc5 100644 (file)
--- a/gcc/config/s390/s390.md
+++ b/gcc/config/s390/s390.md
@@ -8103,9 +8103,8 @@
   [(unspec_volatile [(const_int 0)] UNSPECV_TPF_PROLOGUE)
    (clobber (reg:DI 1))]
   "TARGET_TPF_PROFILING"
-  "bas\t%%r1,4064"
-  [(set_attr "type" "jsr")
-   (set_attr "op_type" "RX")])
+  "larl\t%%r1,.+14\;tm\t4065,255\;bnz\t4064"
+  [(set_attr "length"   "14")])
 
 (define_expand "epilogue"
   [(use (const_int 1))]
@@ -8116,10 +8115,8 @@
   [(unspec_volatile [(const_int 0)] UNSPECV_TPF_EPILOGUE)
    (clobber (reg:DI 1))]
   "TARGET_TPF_PROFILING"
-  "bas\t%%r1,4070"
-  [(set_attr "type" "jsr")
-   (set_attr "op_type" "RX")])
-
+  "larl\t%%r1,.+14\;tm\t4071,255\;bnz\t4070"
+  [(set_attr "length"   "14")])
 
 (define_expand "sibcall_epilogue"
   [(use (const_int 0))]