mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-17 01:19:35 +02:00
15 lines
260 B
ObjectPascal
15 lines
260 B
ObjectPascal
{ this name should be accepted with -Un option !! }
|
|
UNIT bug0180;
|
|
INTERFACE
|
|
uses
|
|
bug0180a;
|
|
|
|
procedure dummy;
|
|
IMPLEMENTATION
|
|
procedure dummy;
|
|
begin
|
|
{ Unit_with_strange_name.dummy; should this work ?? }
|
|
bug0180a.dummy;
|
|
end;
|
|
END.
|