From ec8cc2e82f26022574761c3f8e450829cf3a31c0 Mon Sep 17 00:00:00 2001 From: mattias Date: Tue, 28 Nov 2017 09:19:19 +0000 Subject: [PATCH] codetools: test attribute in dispinterface git-svn-id: trunk@56519 - --- components/codetools/tests/testfinddeclaration.pas | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/components/codetools/tests/testfinddeclaration.pas b/components/codetools/tests/testfinddeclaration.pas index 11a5d943d8..cbd50bcd56 100644 --- a/components/codetools/tests/testfinddeclaration.pas +++ b/components/codetools/tests/testfinddeclaration.pas @@ -874,7 +874,7 @@ begin ' end;', ' [Bird{declaration:BirdAttribute}]', ' THawk = class', - ' [Bird(1)]', + ' [Bird{declaration:BirdAttribute}(1)]', ' FField: integer;', ' [Bird(2)]', ' procedure DoSome;', @@ -889,6 +889,11 @@ begin ' [Bird(13)]', ' property Some: integer read GetSome;', ' end;', + ' IMy = dispinterface', + ' [''guid'']', + ' [Bird(21)]', + ' function GetMore: integer;', + ' end;', '[test1.bird]', '[bird(4)]', 'procedure DoIt; forward;',