Source position: lresources.pp line 573
function ReadLRSEndianLittleExtendedAsDouble(
s: TStream
):Double;