Source position: systemh.inc line 1351
procedure fpc_setstring_shortstr(
out S: Shortstring;
Buf: PAnsiChar;
Len: SizeInt
);