mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 10:38:14 +02:00
9412d4abd2
procdef, so that the unit containing it is marked as "used" (mantis #15966) Even better would be if the unit containing the originally found procsym were not also marked as used, but that would require a significant rewrite (all symbols found using symboltable helpers are automatically marked by those routines) git-svn-id: trunk@21501 -
16 lines
155 B
ObjectPascal
16 lines
155 B
ObjectPascal
{ %norun }
|
|
{ %opt=-vh -Seh }
|
|
program tw15966;
|
|
|
|
uses
|
|
uw15966;
|
|
|
|
procedure test(c: char); public; overload;
|
|
begin
|
|
writeln(c);
|
|
end;
|
|
|
|
begin
|
|
test(0);
|
|
end.
|