mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-04 02:39:40 +01: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.
|