#define GtkSourceTagTable_val(val) check_cast(GTK_SOURCE_TAG_TABLE,val)
#define GtkSourceBuffer_val(val) check_cast(GTK_SOURCE_BUFFER,val)
#define GtkSourceView_val(val) check_cast(GTK_SOURCE_VIEW,val)
-#define GtkTextIter_val(val) ((GtkTextIter*)Data_custom_val(val))
+#define GtkTextIter_val(val) ((GtkTextIter*)MLPointer_val(val))
#define Val_option_GtkAny(v) Val_option(v,Val_GtkAny)
#define string_list_of_GSList(l) Val_GSList(l, (value_in) Val_string)
/* #define GSList_of_string_list(l) GSList_val(l, String_val) */