equal
deleted
inserted
replaced
103 luaL_checkenum (L, 3, sub_type_lm_message)); |
103 luaL_checkenum (L, 3, sub_type_lm_message)); |
104 else |
104 else |
105 message = lm_message_new (to, type); |
105 message = lm_message_new (to, type); |
106 bless_lm_message (L, message); |
106 bless_lm_message (L, message); |
107 lm_message_unref (message); |
107 lm_message_unref (message); |
108 D ("Message %X created", (int) message); |
108 D ("Message %p created", message); |
109 return 1; |
109 return 1; |
110 } |
110 } |
111 |
111 |
112 /// message table |
112 /// message table |
113 /// Table describes xml structure of the message, the only exception is mtype key of root table. |
113 /// Table describes xml structure of the message, the only exception is mtype key of root table. |
208 |
208 |
209 fill_lm_node (L, lm_message_get_node (message), 1); |
209 fill_lm_node (L, lm_message_get_node (message), 1); |
210 |
210 |
211 bless_lm_message (L, message); |
211 bless_lm_message (L, message); |
212 lm_message_unref (message); |
212 lm_message_unref (message); |
213 D ("Message %X created", (int) message); |
213 D ("Message %p created", message); |
214 |
214 |
215 return 1; |
215 return 1; |
216 } |
216 } |
217 |
217 |
218 /// lm.message.bless |
218 /// lm.message.bless |
260 } |
260 } |
261 |
261 |
262 static int gc_lm_message (lua_State *L) |
262 static int gc_lm_message (lua_State *L) |
263 { |
263 { |
264 llm_message_t *message = luaL_checklm_message (L, 1); |
264 llm_message_t *message = luaL_checklm_message (L, 1); |
265 D ("Message %X gc called", (int) message); |
265 D ("Message %p gc called", message); |
266 lm_message_unref (message->message); |
266 lm_message_unref (message->message); |
267 return 0; |
267 return 0; |
268 } |
268 } |
269 |
269 |
270 static const luaL_Reg reg_f_lm_message[] = { |
270 static const luaL_Reg reg_f_lm_message[] = { |