(Under construction.)
procedure FillChar (var Dest; Count: SizeType; Val: Char);
procedure FillChar (var Dest; Count: SizeType; Val: Byte);
`FillChar' is a UCSD Pascal extension.