mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-06 21:07:58 +02:00
d36f8ac542
display purposes if there was a parameter with a default value > 255 chars * replace #0, #10 and #13 in the fullprocname with '.' so they do not cause line breaks or early string termination when writing them to the assembler file (mantis #17928) git-svn-id: trunk@16344 -
12 lines
150 B
ObjectPascal
12 lines
150 B
ObjectPascal
{ %norun }
|
|
{ %opt=-a }
|
|
|
|
{$mode delphi}
|
|
|
|
procedure AddItemsFromString(const aItems: String; const aSeparator: String = #13#10);
|
|
begin
|
|
end;
|
|
|
|
begin
|
|
end.
|