Source position: gtkentry.pp line 40
procedure set_text_mb_dirty(
var a: TGtkEntry;
__text_mb_dirty: guint
);