Mercurial > hg > CbC > CbC_gcc
comparison gcc/config/s390/tpf.md @ 0:a06113de4d67
first commit
author | kent <kent@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Fri, 17 Jul 2009 14:47:48 +0900 |
parents | |
children | 04ced10e8804 |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:a06113de4d67 |
---|---|
1 ;; S390 TPF-OS specific machine patterns | |
2 ;; Copyright (C) 2005, 2007 Free Software Foundation, Inc. | |
3 ;; | |
4 ;; This file is part of GCC. | |
5 ;; | |
6 ;; GCC is free software; you can redistribute it and/or modify | |
7 ;; it under the terms of the GNU General Public License as published by | |
8 ;; the Free Software Foundation; either version 3, or (at your option) | |
9 ;; any later version. | |
10 ;; | |
11 ;; GCC is distributed in the hope that it will be useful, | |
12 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 ;; GNU General Public License for more details. | |
15 ;; | |
16 ;; You should have received a copy of the GNU General Public License | |
17 ;; along with GCC; see the file COPYING3. If not see | |
18 ;; <http://www.gnu.org/licenses/>. | |
19 | |
20 (define_insn "prologue_tpf" | |
21 [(unspec_volatile [(const_int 0)] UNSPECV_TPF_PROLOGUE) | |
22 (clobber (reg:DI 1))] | |
23 "TARGET_TPF_PROFILING" | |
24 "larl\t%%r1,.+14\;tm\t4065,255\;bnz\t4064" | |
25 [(set_attr "length" "14")]) | |
26 | |
27 | |
28 (define_insn "epilogue_tpf" | |
29 [(unspec_volatile [(const_int 0)] UNSPECV_TPF_EPILOGUE) | |
30 (clobber (reg:DI 1))] | |
31 "TARGET_TPF_PROFILING" | |
32 "larl\t%%r1,.+14\;tm\t4071,255\;bnz\t4070" | |
33 [(set_attr "length" "14")]) |