mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-04 22:24:01 +02:00
28 lines
618 B
ObjectPascal
28 lines
618 B
ObjectPascal
unit BrokenFilenames;
|
|
|
|
{$mode objfpc}{$H+}
|
|
|
|
interface
|
|
|
|
|
|
uses
|
|
Classes,
|
|
CustApp,
|
|
biglettersunit, // must be fixed to BigLettersUnit
|
|
biglettersunit in 'biglettersunit.pas',// -> BigLettersUnit.pas
|
|
biglettersunit in '..\ScanExamples\biglettersunit.pas',// -> ../scanexamples/BigLettersUnit
|
|
NonExistingUnit1, NonExistingUnit2, SysUtils, NonExistingUnit3,
|
|
{$IFDEF FPC}
|
|
NonExistingUnit4
|
|
{$ELSE}
|
|
NonExistingUnit5
|
|
{$ENDIF};
|
|
|
|
{$I BROKENincfiles.inc}// must be fixed to brokenincfiles.inc
|
|
{$I ../ScanExamples/BROKENincfiles.inc}// must be fixed to ../scanexamples/brokenincfiles.inc
|
|
|
|
implementation
|
|
|
|
end.
|
|
|