Source position: glib.pp line 273
type TGHookFreeFunc = procedure(
hook_list: PGHookList;
hook: PGHook
);