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

codetools: more examples

Browse Source 
git-svn-id: trunk@20292 -
This commit is contained in:
mattias 2009-05-29 08:02:22 +00:00
parent 65968ad5bf
commit 4cfb35e54c
4 changed files with 27 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
.gitattributes vendored
View File

@ -159,6 +159,9 @@ components/codetools/examples/scanexamples/unusedunits1.pas svneol=native#text/p
components/codetools/examples/scanexamples/wrongforwarddefinitions.pas svneol=native#text/plain
components/codetools/examples/setincludepath.lpi svneol=native#text/plain
components/codetools/examples/setincludepath.pas 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/caseend1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/procedurebegin1.inc svneol=native#text/plain
components/codetools/examples/testscompleteblock/unit1.pas svneol=native#text/plain
components/codetools/examples/testscompleteblock/whilebegin1.inc svneol=native#text/plain

9
components/codetools/examples/testscompleteblock/casecolon1.inc Normal file
View File

@ -0,0 +1,9 @@
{%MainUnit unit1.pas}
procedure Do1;
begin
case i of
1:
end;
end;

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

@ -0,0 +1,8 @@
{%MainUnit unit1.pas}
procedure Do1;
begin
case i of
else
end;

7
components/codetools/examples/testscompleteblock/caseend1.inc Normal file
View File

@ -0,0 +1,7 @@
{%MainUnit unit1.pas}
procedure Do1;
begin
case i of
end;