OSDN Git Service

Fix debian bug 307503, error compiling libatomic-ops package.
[pf3gnuchains/gcc-fork.git] / gcc / unwind-compat.c
1 /* Backward compatibility unwind routines.
2    Copyright (C) 2004, 2005
3    Free Software Foundation, Inc.
4
5    This file is part of GCC.
6
7    GCC is free software; you can redistribute it and/or modify it
8    under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2, or (at your option)
10    any later version.
11
12    In addition to the permissions in the GNU General Public License, the
13    Free Software Foundation gives you unlimited permission to link the
14    compiled version of this file into combinations with other programs,
15    and to distribute those combinations without any restriction coming
16    from the use of this file.  (The General Public License restrictions
17    do apply in other respects; for example, they cover modification of
18    the file, and distribution when not linked into a combined
19    executable.)
20
21    GCC is distributed in the hope that it will be useful, but WITHOUT
22    ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
23    or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
24    License for more details.
25
26    You should have received a copy of the GNU General Public License
27    along with GCC; see the file COPYING.  If not, write to the Free
28    Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA
29    02110-1301, USA.  */
30
31 #if defined (USE_GAS_SYMVER) && defined (USE_LIBUNWIND_EXCEPTIONS)
32 #include "tconfig.h"
33 #include "tsystem.h"
34 #include "unwind.h"
35 #include "unwind-dw2-fde.h"
36 #include "unwind-compat.h"
37
38 extern _Unwind_Reason_Code __libunwind_Unwind_Backtrace
39   (_Unwind_Trace_Fn, void *);
40
41 _Unwind_Reason_Code
42 _Unwind_Backtrace (_Unwind_Trace_Fn trace, void *trace_argument)
43 {
44   return __libunwind_Unwind_Backtrace (trace, trace_argument);
45 }
46 symver (_Unwind_Backtrace, GCC_3.3);
47
48 extern void __libunwind_Unwind_DeleteException
49   (struct _Unwind_Exception *);
50
51 void
52 _Unwind_DeleteException (struct _Unwind_Exception *exc)
53 {
54   return __libunwind_Unwind_DeleteException (exc);
55 }
56 symver (_Unwind_DeleteException, GCC_3.0);
57
58 extern void * __libunwind_Unwind_FindEnclosingFunction (void *);
59
60 void *
61 _Unwind_FindEnclosingFunction (void *pc)
62 {
63   return __libunwind_Unwind_FindEnclosingFunction (pc);
64 }
65 symver (_Unwind_FindEnclosingFunction, GCC_3.3);
66
67 extern _Unwind_Reason_Code __libunwind_Unwind_ForcedUnwind
68   (struct _Unwind_Exception *, _Unwind_Stop_Fn, void *);
69
70 _Unwind_Reason_Code
71 _Unwind_ForcedUnwind (struct _Unwind_Exception *exc,
72                       _Unwind_Stop_Fn stop, void * stop_argument)
73 {
74   return __libunwind_Unwind_ForcedUnwind (exc, stop, stop_argument);
75 }
76 symver (_Unwind_ForcedUnwind, GCC_3.0);
77
78 extern _Unwind_Word __libunwind_Unwind_GetCFA
79   (struct _Unwind_Context *);
80
81 _Unwind_Word
82 _Unwind_GetCFA (struct _Unwind_Context *context)
83 {
84   return __libunwind_Unwind_GetCFA (context);
85 }
86 symver (_Unwind_GetCFA, GCC_3.3);
87
88 #ifdef __ia64__
89 extern _Unwind_Word __libunwind_Unwind_GetBSP
90   (struct _Unwind_Context *);
91
92 _Unwind_Word
93 _Unwind_GetBSP (struct _Unwind_Context * context)
94 {
95   return __libunwind_Unwind_GetBSP (context);
96 }
97 symver (_Unwind_GetBSP, GCC_3.3.2);
98 #else
99 extern _Unwind_Ptr __libunwind_Unwind_GetDataRelBase
100   (struct _Unwind_Context *);
101
102 _Unwind_Ptr
103 _Unwind_GetDataRelBase (struct _Unwind_Context *context)
104 {
105   return __libunwind_Unwind_GetDataRelBase (context);
106 }
107 symver (_Unwind_GetDataRelBase, GCC_3.0);
108
109 extern _Unwind_Ptr __libunwind_Unwind_GetTextRelBase
110   (struct _Unwind_Context *);
111
112 _Unwind_Ptr
113 _Unwind_GetTextRelBase (struct _Unwind_Context *context)
114 {
115   return __libunwind_Unwind_GetTextRelBase (context);
116 }
117 symver (_Unwind_GetTextRelBase, GCC_3.0);
118 #endif
119
120 extern _Unwind_Word __libunwind_Unwind_GetGR
121   (struct _Unwind_Context *, int );
122
123 _Unwind_Word
124 _Unwind_GetGR (struct _Unwind_Context *context, int index)
125 {
126   return __libunwind_Unwind_GetGR (context, index);
127 }
128 symver (_Unwind_GetGR, GCC_3.0);
129
130 extern _Unwind_Ptr __libunwind_Unwind_GetIP (struct _Unwind_Context *);
131
132 _Unwind_Ptr
133 _Unwind_GetIP (struct _Unwind_Context *context)
134 {
135   return __libunwind_Unwind_GetIP (context);
136 }
137 symver (_Unwind_GetIP, GCC_3.0);
138
139 extern void *__libunwind_Unwind_GetLanguageSpecificData
140   (struct _Unwind_Context *);
141
142 void *
143 _Unwind_GetLanguageSpecificData (struct _Unwind_Context *context)
144 {
145   return __libunwind_Unwind_GetLanguageSpecificData (context);
146 }
147 symver (_Unwind_GetLanguageSpecificData, GCC_3.0);
148
149 extern _Unwind_Ptr __libunwind_Unwind_GetRegionStart
150   (struct _Unwind_Context *);
151
152 _Unwind_Ptr
153 _Unwind_GetRegionStart (struct _Unwind_Context *context)
154 {
155   return __libunwind_Unwind_GetRegionStart (context);
156 }
157 symver (_Unwind_GetRegionStart, GCC_3.0);
158
159 extern _Unwind_Reason_Code __libunwind_Unwind_RaiseException
160   (struct _Unwind_Exception *);
161
162 _Unwind_Reason_Code
163 _Unwind_RaiseException(struct _Unwind_Exception *exc)
164 {
165   return __libunwind_Unwind_RaiseException (exc);
166 }
167 symver (_Unwind_RaiseException, GCC_3.0);
168
169 extern void __libunwind_Unwind_Resume (struct _Unwind_Exception *);
170
171 void
172 _Unwind_Resume (struct _Unwind_Exception *exc)
173 {
174   __libunwind_Unwind_Resume (exc);
175 }
176 symver (_Unwind_Resume, GCC_3.0);
177
178 extern _Unwind_Reason_Code __libunwind_Unwind_Resume_or_Rethrow
179    (struct _Unwind_Exception *);
180
181 _Unwind_Reason_Code
182 _Unwind_Resume_or_Rethrow (struct _Unwind_Exception *exc)
183 {
184   return __libunwind_Unwind_Resume_or_Rethrow (exc);
185 }
186 symver (_Unwind_Resume_or_Rethrow, GCC_3.3);
187
188 extern void __libunwind_Unwind_SetGR
189   (struct _Unwind_Context *, int, _Unwind_Word);
190
191 void
192 _Unwind_SetGR (struct _Unwind_Context *context, int index,
193                _Unwind_Word val) 
194 {
195   __libunwind_Unwind_SetGR (context, index, val);
196 }
197 symver (_Unwind_SetGR, GCC_3.0);
198
199 extern void __libunwind_Unwind_SetIP
200   (struct _Unwind_Context *, _Unwind_Ptr);
201
202 void
203 _Unwind_SetIP (struct _Unwind_Context *context, _Unwind_Ptr val)
204 {
205   return __libunwind_Unwind_SetIP (context, val);
206 }
207 symver (_Unwind_SetIP, GCC_3.0);
208 #endif