Source position: contnrs.pp line 535
type TBucketProc = procedure(
AInfo: Pointer;
AItem: Pointer;
AData: Pointer;
out AContinue: Boolean
);