Source position: tuples.pp line 254
function Quadruple(
constref AFirst: TFirst;
constref ASecond: TSecond;
constref AThird: TThird;
constref AFourth: TFourth
):;