1 /* valamethodtype.c generated by valac, the Vala compiler
2 * generated from valamethodtype.vala, do not modify */
3
4 /* valamethodtype.vala
5 *
6 * Copyright (C) 2007-2008 Jürg Billeter
7 *
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
12
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
17
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21 *
22 * Author:
23 * Jürg Billeter <j@bitron.ch>
24 */
25
26 #include "vala.h"
27 #include <glib.h>
28 #include <stdlib.h>
29 #include <string.h>
30
31 static gpointer vala_method_type_parent_class = NULL;
32
33 static ValaDataType* vala_method_type_real_copy (ValaDataType* base);
34 static gboolean vala_method_type_real_compatible (ValaDataType* base,
35 ValaDataType* target_type);
36 static gchar* vala_method_type_real_to_qualified_string (ValaDataType* base,
37 ValaScope* scope);
38 static ValaSymbol* vala_method_type_real_get_member (ValaDataType* base,
39 const gchar* member_name);
40 static GType vala_method_type_get_type_once (void);
41
42 ValaMethod*
vala_method_type_get_method_symbol(ValaMethodType * self)43 vala_method_type_get_method_symbol (ValaMethodType* self)
44 {
45 ValaMethod* result;
46 ValaSymbol* _tmp0_;
47 ValaSymbol* _tmp1_;
48 g_return_val_if_fail (self != NULL, NULL);
49 _tmp0_ = vala_data_type_get_symbol ((ValaDataType*) self);
50 _tmp1_ = _tmp0_;
51 result = G_TYPE_CHECK_INSTANCE_CAST (_tmp1_, VALA_TYPE_METHOD, ValaMethod);
52 return result;
53 }
54
55 ValaMethodType*
vala_method_type_construct(GType object_type,ValaMethod * method_symbol)56 vala_method_type_construct (GType object_type,
57 ValaMethod* method_symbol)
58 {
59 ValaMethodType* self = NULL;
60 g_return_val_if_fail (method_symbol != NULL, NULL);
61 self = (ValaMethodType*) vala_callable_type_construct (object_type, (ValaSymbol*) method_symbol);
62 return self;
63 }
64
65 ValaMethodType*
vala_method_type_new(ValaMethod * method_symbol)66 vala_method_type_new (ValaMethod* method_symbol)
67 {
68 return vala_method_type_construct (VALA_TYPE_METHOD_TYPE, method_symbol);
69 }
70
71 static ValaDataType*
vala_method_type_real_copy(ValaDataType * base)72 vala_method_type_real_copy (ValaDataType* base)
73 {
74 ValaMethodType * self;
75 ValaMethod* _tmp0_;
76 ValaMethod* _tmp1_;
77 ValaMethodType* _tmp2_;
78 ValaDataType* result = NULL;
79 self = (ValaMethodType*) base;
80 _tmp0_ = vala_method_type_get_method_symbol (self);
81 _tmp1_ = _tmp0_;
82 _tmp2_ = vala_method_type_new (_tmp1_);
83 result = (ValaDataType*) _tmp2_;
84 return result;
85 }
86
87 static gboolean
vala_method_type_real_compatible(ValaDataType * base,ValaDataType * target_type)88 vala_method_type_real_compatible (ValaDataType* base,
89 ValaDataType* target_type)
90 {
91 ValaMethodType * self;
92 ValaDelegateType* dt = NULL;
93 ValaDelegateType* _tmp0_;
94 ValaDelegateType* _tmp1_;
95 ValaDelegate* _tmp2_;
96 ValaDelegate* _tmp3_;
97 ValaMethod* _tmp4_;
98 ValaMethod* _tmp5_;
99 ValaDelegateType* _tmp6_;
100 gboolean result = FALSE;
101 self = (ValaMethodType*) base;
102 g_return_val_if_fail (target_type != NULL, FALSE);
103 dt = VALA_IS_DELEGATE_TYPE (target_type) ? ((ValaDelegateType*) target_type) : NULL;
104 _tmp0_ = dt;
105 if (_tmp0_ == NULL) {
106 result = FALSE;
107 return result;
108 }
109 _tmp1_ = dt;
110 _tmp2_ = vala_delegate_type_get_delegate_symbol (_tmp1_);
111 _tmp3_ = _tmp2_;
112 _tmp4_ = vala_method_type_get_method_symbol (self);
113 _tmp5_ = _tmp4_;
114 _tmp6_ = dt;
115 result = vala_delegate_matches_method (_tmp3_, _tmp5_, (ValaDataType*) _tmp6_);
116 return result;
117 }
118
119 static gchar*
vala_method_type_real_to_qualified_string(ValaDataType * base,ValaScope * scope)120 vala_method_type_real_to_qualified_string (ValaDataType* base,
121 ValaScope* scope)
122 {
123 ValaMethodType * self;
124 ValaMethod* _tmp0_;
125 ValaMethod* _tmp1_;
126 gchar* _tmp2_;
127 gchar* result = NULL;
128 self = (ValaMethodType*) base;
129 _tmp0_ = vala_method_type_get_method_symbol (self);
130 _tmp1_ = _tmp0_;
131 _tmp2_ = vala_symbol_get_full_name ((ValaSymbol*) _tmp1_);
132 result = _tmp2_;
133 return result;
134 }
135
136 static gpointer
_vala_code_node_ref0(gpointer self)137 _vala_code_node_ref0 (gpointer self)
138 {
139 return self ? vala_code_node_ref (self) : NULL;
140 }
141
142 static ValaSymbol*
vala_method_type_real_get_member(ValaDataType * base,const gchar * member_name)143 vala_method_type_real_get_member (ValaDataType* base,
144 const gchar* member_name)
145 {
146 ValaMethodType * self;
147 gboolean _tmp0_ = FALSE;
148 ValaMethod* _tmp1_;
149 ValaMethod* _tmp2_;
150 gboolean _tmp3_;
151 gboolean _tmp4_;
152 ValaSymbol* result = NULL;
153 self = (ValaMethodType*) base;
154 g_return_val_if_fail (member_name != NULL, NULL);
155 _tmp1_ = vala_method_type_get_method_symbol (self);
156 _tmp2_ = _tmp1_;
157 _tmp3_ = vala_method_get_coroutine (_tmp2_);
158 _tmp4_ = _tmp3_;
159 if (_tmp4_) {
160 _tmp0_ = g_strcmp0 (member_name, "begin") == 0;
161 } else {
162 _tmp0_ = FALSE;
163 }
164 if (_tmp0_) {
165 ValaMethod* _tmp5_;
166 ValaMethod* _tmp6_;
167 ValaSymbol* _tmp7_;
168 _tmp5_ = vala_method_type_get_method_symbol (self);
169 _tmp6_ = _tmp5_;
170 _tmp7_ = _vala_code_node_ref0 ((ValaSymbol*) _tmp6_);
171 result = _tmp7_;
172 return result;
173 } else {
174 gboolean _tmp8_ = FALSE;
175 ValaMethod* _tmp9_;
176 ValaMethod* _tmp10_;
177 gboolean _tmp11_;
178 gboolean _tmp12_;
179 _tmp9_ = vala_method_type_get_method_symbol (self);
180 _tmp10_ = _tmp9_;
181 _tmp11_ = vala_method_get_coroutine (_tmp10_);
182 _tmp12_ = _tmp11_;
183 if (_tmp12_) {
184 _tmp8_ = g_strcmp0 (member_name, "end") == 0;
185 } else {
186 _tmp8_ = FALSE;
187 }
188 if (_tmp8_) {
189 ValaMethod* _tmp13_;
190 ValaMethod* _tmp14_;
191 ValaSymbol* _tmp15_;
192 _tmp13_ = vala_method_type_get_method_symbol (self);
193 _tmp14_ = _tmp13_;
194 _tmp15_ = _vala_code_node_ref0 ((ValaSymbol*) _tmp14_);
195 result = _tmp15_;
196 return result;
197 } else {
198 gboolean _tmp16_ = FALSE;
199 ValaMethod* _tmp17_;
200 ValaMethod* _tmp18_;
201 gboolean _tmp19_;
202 gboolean _tmp20_;
203 _tmp17_ = vala_method_type_get_method_symbol (self);
204 _tmp18_ = _tmp17_;
205 _tmp19_ = vala_method_get_coroutine (_tmp18_);
206 _tmp20_ = _tmp19_;
207 if (_tmp20_) {
208 _tmp16_ = g_strcmp0 (member_name, "callback") == 0;
209 } else {
210 _tmp16_ = FALSE;
211 }
212 if (_tmp16_) {
213 ValaMethod* _tmp21_;
214 ValaMethod* _tmp22_;
215 ValaMethod* _tmp23_;
216 ValaSymbol* _tmp24_;
217 _tmp21_ = vala_method_type_get_method_symbol (self);
218 _tmp22_ = _tmp21_;
219 _tmp23_ = vala_method_get_callback_method (_tmp22_);
220 _tmp24_ = _vala_code_node_ref0 ((ValaSymbol*) _tmp23_);
221 result = _tmp24_;
222 return result;
223 }
224 }
225 }
226 result = NULL;
227 return result;
228 }
229
230 static void
vala_method_type_class_init(ValaMethodTypeClass * klass,gpointer klass_data)231 vala_method_type_class_init (ValaMethodTypeClass * klass,
232 gpointer klass_data)
233 {
234 vala_method_type_parent_class = g_type_class_peek_parent (klass);
235 ((ValaDataTypeClass *) klass)->copy = (ValaDataType* (*) (ValaDataType*)) vala_method_type_real_copy;
236 ((ValaDataTypeClass *) klass)->compatible = (gboolean (*) (ValaDataType*, ValaDataType*)) vala_method_type_real_compatible;
237 ((ValaDataTypeClass *) klass)->to_qualified_string = (gchar* (*) (ValaDataType*, ValaScope*)) vala_method_type_real_to_qualified_string;
238 ((ValaDataTypeClass *) klass)->get_member = (ValaSymbol* (*) (ValaDataType*, const gchar*)) vala_method_type_real_get_member;
239 }
240
241 static void
vala_method_type_instance_init(ValaMethodType * self,gpointer klass)242 vala_method_type_instance_init (ValaMethodType * self,
243 gpointer klass)
244 {
245 }
246
247 /**
248 * The type of a method referencea.
249 */
250 static GType
vala_method_type_get_type_once(void)251 vala_method_type_get_type_once (void)
252 {
253 static const GTypeInfo g_define_type_info = { sizeof (ValaMethodTypeClass), (GBaseInitFunc) NULL, (GBaseFinalizeFunc) NULL, (GClassInitFunc) vala_method_type_class_init, (GClassFinalizeFunc) NULL, NULL, sizeof (ValaMethodType), 0, (GInstanceInitFunc) vala_method_type_instance_init, NULL };
254 GType vala_method_type_type_id;
255 vala_method_type_type_id = g_type_register_static (VALA_TYPE_CALLABLE_TYPE, "ValaMethodType", &g_define_type_info, 0);
256 return vala_method_type_type_id;
257 }
258
259 GType
vala_method_type_get_type(void)260 vala_method_type_get_type (void)
261 {
262 static volatile gsize vala_method_type_type_id__volatile = 0;
263 if (g_once_init_enter (&vala_method_type_type_id__volatile)) {
264 GType vala_method_type_type_id;
265 vala_method_type_type_id = vala_method_type_get_type_once ();
266 g_once_init_leave (&vala_method_type_type_id__volatile, vala_method_type_type_id);
267 }
268 return vala_method_type_type_id__volatile;
269 }
270
271