fpc/tests/webtbs/tw1251b.pp

13 lines
127 B
ObjectPascal

program strings;
uses classes;
var list : TStringList;
function strcat(dest,source : pchar) : pchar;
begin
end;
begin
end.