comparison: plugins/tcl/tcl_glib.c
plugins/tcl/tcl_glib.c
- changeset 14007
- 52538a5ed85d
- parent 13818
- 8139f8ef36d2
equal
deleted
inserted
replaced
| 14006:049c3afd1784 | 14007:52538a5ed85d |
|---|---|
| 181 Tcl_ServiceAll(); | 181 Tcl_ServiceAll(); |
| 182 } | 182 } |
| 183 | 183 |
| 184 static void tcl_delete_file_handler(int fd) | 184 static void tcl_delete_file_handler(int fd) |
| 185 { | 185 { |
| 186 struct tcl_file_handler *tfh = g_hash_table_lookup(tcl_file_handlers, (gpointer)fd); | 186 struct tcl_file_handler *tfh = g_hash_table_lookup(tcl_file_handlers, GINT_TO_POINTER(fd)); |
| 187 | 187 |
| 188 if (tfh == NULL) | 188 if (tfh == NULL) |
| 189 return; | 189 return; |
| 190 | 190 |
| 191 g_source_remove(tfh->source); | 191 g_source_remove(tfh->source); |
