+bug0259-260

This commit is contained in:
pierre 1999-06-15 10:20:40 +00:00
parent 24b005a5f6
commit b91b803015
3 changed files with 41 additions and 1 deletions

6
bugs/bug0259.pp Normal file
View File

@ -0,0 +1,6 @@
VAR time1,time2 : Real;
BEGIN
time1 := 0;
time2 := time1*time1;
END.

32
bugs/bug0260.pp Normal file
View File

@ -0,0 +1,32 @@
program test;
type
obj1 = object
st : string;
constructor init;
procedure writeit;
end;
obj2 = object(obj1)
procedure writeit;virtual;
end;
obj3 = object(obj2)
l : longint;
end;
constructor obj1.init;
begin
end;
procedure obj1.writeit;
begin
end;
procedure obj2.writeit;
begin
end;
begin
end.

View File

@ -311,6 +311,7 @@ Fixed bugs:
bug0255.pp internal error 10 with in and function calls OK 0.99.12 (FK)
bug0256.pp problem with conditionnals in TP mode OK 0.99.11 (PM)
bug0257.pp problem with procvars in tp mode OK 0.99.11 (PM)
bug0258.pp bug in small const set extension to large sets OK 0.99.12 (PM)
Unproducable bugs:
@ -346,4 +347,5 @@ bug0244.pp nested procedures can't have same name as global ones (same as bug0
bug0245.pp assigning pointers to address of consts is allowed (refused by BP !)
bug0246.pp const para can be changed without error
bug0252.pp typecasting not possible within typed const
bug0258.pp bug in small const set extension to large sets
bug0259.pp problem with optimizer for real math (use -O1)
bug0260.pp problem with VMT generation if non virtual method has a virtual overload