This commit is contained in:
peter 1999-08-16 18:27:18 +00:00
parent 63499d5cc5
commit 9a787d944a
2 changed files with 18 additions and 0 deletions

17
bugs/bug0281.pp Normal file
View File

@ -0,0 +1,17 @@
type
test_one = class
protected
fTest : String;
public
property Test: String READ fTest WRITE fTest;
procedure Testen(Test: BOolean);
{ ^ duplicate identifier? }
end;
procedure test_one.testen(test: boolean);
begin
end;
begin
end.

View File

@ -369,3 +369,4 @@ bug0274.pp @(proc) is not allowed
bug0275.pp too many warnings
bug0277.pp typecasting with const not possible
bug0279.pp crash with ansistring and new(^ansistring)
bug0281.pp dup id checking with property is wrong