Source position: GPCStrings.pas line 314
procedure Str63IntoStr31(
const s: Str63;
var theResult: Str31
);