diff --git a/.gitattributes b/.gitattributes index bf2855649a..999369d386 100644 --- a/.gitattributes +++ b/.gitattributes @@ -186,6 +186,8 @@ components/codetools/examples/testscompleteblock/record1.inc svneol=native#text/ components/codetools/examples/testscompleteblock/record1_result1.inc svneol=native#text/plain components/codetools/examples/testscompleteblock/repeatifelse1.inc svneol=native#text/plain components/codetools/examples/testscompleteblock/repeatifelse1_result.inc svneol=native#text/plain +components/codetools/examples/testscompleteblock/tryif1.inc svneol=native#text/plain +components/codetools/examples/testscompleteblock/tryif1_result.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 components/codetools/examples/testscompleteblock/whilebegin1_result.inc svneol=native#text/plain diff --git a/components/codetools/examples/testscompleteblock/tryif1.inc b/components/codetools/examples/testscompleteblock/tryif1.inc new file mode 100644 index 0000000000..0f362563ca --- /dev/null +++ b/components/codetools/examples/testscompleteblock/tryif1.inc @@ -0,0 +1,10 @@ +{%MainUnit unit1.pas} +procedure Do1; +begin + try + if + finally + + end; +end; + diff --git a/components/codetools/examples/testscompleteblock/tryif1_result.inc b/components/codetools/examples/testscompleteblock/tryif1_result.inc new file mode 100644 index 0000000000..0f362563ca --- /dev/null +++ b/components/codetools/examples/testscompleteblock/tryif1_result.inc @@ -0,0 +1,10 @@ +{%MainUnit unit1.pas} +procedure Do1; +begin + try + if + finally + + end; +end; + diff --git a/components/codetools/examples/testscompleteblock/unit1.pas b/components/codetools/examples/testscompleteblock/unit1.pas index b86fe3e5e2..5f53f1c294 100644 --- a/components/codetools/examples/testscompleteblock/unit1.pas +++ b/components/codetools/examples/testscompleteblock/unit1.pas @@ -25,6 +25,7 @@ implementation {$IFDEF casecolon} {$I casecolon1.inc} {$ENDIF} {$IFDEF repeatifelse} {$I repeatifelse1.inc} {$ENDIF} +{$IFDEF tryif} {$I tryif1.inc} {$ENDIF} {$IFDEF ifbegin} {$I ifbegin1.inc} {$ENDIF} {$IFDEF ifbeginelse} {$I ifbeginelse1.inc} {$ENDIF} diff --git a/test/codetoolstests/testcompleteblock.pas b/test/codetoolstests/testcompleteblock.pas index 720168c9d0..83c923d0c1 100644 --- a/test/codetoolstests/testcompleteblock.pas +++ b/test/codetoolstests/testcompleteblock.pas @@ -62,6 +62,7 @@ begin CompareComplete('procedurebeginifbegin1.inc','11 74 procedurebeginifbegin fpcunit', 'procedurebeginifbegin1_result.inc'); CompareComplete('record1.inc','3 22 record fpcunit', 'record1_result1.inc'); CompareComplete('repeatifelse1.inc','11 18 repeatifelse fpcunit', 'repeatifelse1_result.inc'); + CompareComplete('tryif1.inc','4 6 tryif fpcunit', 'tryif1_result.inc'); end; end.