Source position: compproc.inc line 139
function fpc_ShortStr_To_WideStr(
const S2: ShortString
):WideString;