lazarus/components/codetools/examples/scanexamples/brokenfilenames.pas
mattias 46c5ed7280 codetools: examples: fixed fixfilenames
git-svn-id: trunk@56268 -
2017-11-03 23:04:28 +00:00

28 lines
606 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',// -> BigLettersUnit.pas
NonExistingUnit1, NonExistingUnit2, SysUtils, NonExistingUnit3,
{$IFDEF FPC}
NonExistingUnit4
{$ELSE}
NonExistingUnit5
{$ENDIF};
{$I BROKENincfiles.inc}// must be fixed to brokenincfiles.inc
{$I ../scanexamples/include/BROKENincfile2.inc}// must be fixed to include/BrokenIncFile2.inc
implementation
end.