Source position: GPCStrings.pas line 316
procedure Str32IntoStr63(
const s: Str32;
var theResult: Str63
);