paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-25 11:39:35 +02:00
Code Issues Packages Projects Releases Wiki Activity

codetools: added more indentation examples

Browse Source 
git-svn-id: trunk@20378 -
This commit is contained in:
mattias 2009-06-03 17:14:42 +00:00
parent 552a63960f
commit cb61eaabf5
4 changed files with 35 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
.gitattributes vendored
View File

@ -162,7 +162,10 @@ components/codetools/examples/setincludepath.pas svneol=native#text/plain
components/codetools/examples/testscompleteblock/casecolon1.inc svneol=native#text/plain components/codetools/examples/testscompleteblock/casecolon1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/caseelseend1.inc svneol=native#text/plain components/codetools/examples/testscompleteblock/caseelseend1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/caseend1.inc svneol=native#text/plain components/codetools/examples/testscompleteblock/caseend1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/ifbegin1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/procedurebegin1.inc svneol=native#text/plain components/codetools/examples/testscompleteblock/procedurebegin1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/procedurebeginend1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/record1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/unit1.pas svneol=native#text/plain components/codetools/examples/testscompleteblock/unit1.pas svneol=native#text/plain
components/codetools/examples/testscompleteblock/whilebegin1.inc svneol=native#text/plain components/codetools/examples/testscompleteblock/whilebegin1.inc svneol=native#text/plain
components/codetools/expreval.pas svneol=native#text/pascal components/codetools/expreval.pas svneol=native#text/pascal

8
components/codetools/examples/testscompleteblock/ifbegin1.inc Normal file
View File

@ -0,0 +1,8 @@
{%MainUnit unit1.pas}
procedure Do1;
begin
if expr then begin
code;
end;

14
components/codetools/examples/testscompleteblock/procedurebeginend1.inc Normal file
View File

@ -0,0 +1,14 @@
{%MainUnit unit1.pas}
procedure Do1;
begin
Code;
Code;
end;
procedure Do2;
begin
end;

10
components/codetools/examples/testscompleteblock/record1.inc Normal file
View File

@ -0,0 +1,10 @@
{%MainUnit unit1.pas}
type
TMyRecord = record
PMyRecord = ^TMyRecord;
procedure Do1;
begin
end;