mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-07-14 15:36:00 +02:00

Some files have been moved to other directories to avoid conflicts with the jcfbase and jcfidelazarus package paths.
41 lines
1.8 KiB
ObjectPascal
41 lines
1.8 KiB
ObjectPascal
program TestJCF;
|
|
|
|
{$mode objfpc}{$H+}
|
|
|
|
uses {$IFDEF UNIX}
|
|
cthreads, {$ENDIF} {$IFDEF HASAMIGA}
|
|
athreads, {$ENDIF}
|
|
Interfaces, // this includes the LCL widgetset
|
|
Forms, unit1, JcfSettings, BuildParseTree, PreProcessorExpressionParser,
|
|
PreProcessorExpressionTokenise, PreProcessorExpressionTokens,
|
|
PreProcessorParseTree, fShowParseTree, Converter, JcfUiTools, JcfUiToolsGUI,
|
|
JcfStringUtils, SettingsStream, ReturnAfter, NoReturnBefore,
|
|
RemoveReturnsBeforeEnd, PropertyOnOneLine, NoReturnAfter, LongLineBreaker,
|
|
BlockStyles, RemoveBlankLinesAfterProcHeader, RemoveBlankLinesInVars,
|
|
RemoveConsecutiveReturns, RemoveReturnsAfter, RemoveReturnsAfterBegin,
|
|
ReturnBefore, ReturnChars, ReturnsAfterFinalEnd, SingleSpaceBefore,
|
|
NoSpaceAfter, NoSpaceBefore, MaxSpaces, SingleSpaceAfter, SpaceToTab,
|
|
TabToSpace, MoveSpaceToBeforeColon, SpaceBeforeColon, RemoveSpaceAtLineEnd,
|
|
IndentAsmParam, Indenter, AlignAssign, AlignBase, AlignComment, AlignConst,
|
|
AlignField, AlignTypedef, AlignVars, Capitalisation, IdentifierCaps,
|
|
SpecificWordCaps, UnitNameCaps, AddBeginEnd, AddBlockEndSemicolon,
|
|
FindReplace, SortUses, SortUsesData, UsesClauseFindReplace, UsesClauseInsert,
|
|
UsesClauseRemove, BasicStats, FixCase, RebreakLines, ReduceWhiteSpace,
|
|
RemoveBlankLine, RemoveComment, RemoveConsecutiveWhiteSpace, RemoveReturn,
|
|
RemoveUnneededWhiteSpace, WarnAssignToFunctionName, WarnCaseNoElse,
|
|
WarnDestroy, WarnEmptyBlock, WarnImbalancedComment, Warning, WarnRealType,
|
|
WarnUnusedParam, AllProcesses, BaseVisitor, FormatFlags, Nesting,
|
|
RemoveEmptyComment, SwitchableVisitor, TreeWalker, VisitSetNesting,
|
|
VisitSetXY, VisitStripEmptySpace, SysUtils;
|
|
|
|
{$R *.res}
|
|
|
|
begin
|
|
RequireDerivedFormResource := True;
|
|
Application.Scaled := True;
|
|
Application.Initialize;
|
|
Application.CreateForm(TForm1, Form1);
|
|
Application.Run;
|
|
end.
|
|
|