fpc_Write_Text_Pchar_as_Array

procedure fpc_Write_Text_Pchar_as_Array(

  Len: LongInt;

  var f: Text;

  const s: array [] of Char

);