Source position: GPCStrings.pas line 305
procedure Str31IntoStr255(
const s: Str31;
var theResult: Str255
);