lazarus/components/codetools/examples/scanexamples/brokenfilenames.pas
2006-03-09 21:20:19 +00:00

22 lines
514 B
ObjectPascal

unit BrokenFilenames;
{$mode objfpc}{$H+}
interface
uses
Classes,
biglettersunit, // must be fixed to BigLettersUnit
biglettersunit in 'biglettersunit.pas',// -> BigLettersUnit.pas
biglettersunit in '..\ScanExamples\biglettersunit.pas',// -> ../scanexamples/BigLettersUnit
NonExistingUnit1, SysUtils, NonExistingUnit2;
{$I BROKENincfiles.inc}// must be fixed to brokenincfiles.inc
{$I ../ScanExamples/BROKENincfiles.inc}// must be fixed to ../scanexamples/brokenincfiles.inc
implementation
end.