Source position: intuition.pas line 4195
procedure GadgetMouse(
gadget: pGadget;
gInfo: pGadgetInfo;
mousePoint: psmallint
);