mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 08:09:33 +02:00
+bug0259-260
This commit is contained in:
parent
24b005a5f6
commit
b91b803015
6
bugs/bug0259.pp
Normal file
6
bugs/bug0259.pp
Normal file
@ -0,0 +1,6 @@
|
||||
|
||||
VAR time1,time2 : Real;
|
||||
BEGIN
|
||||
time1 := 0;
|
||||
time2 := time1*time1;
|
||||
END.
|
32
bugs/bug0260.pp
Normal file
32
bugs/bug0260.pp
Normal 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.
|
@ -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
|
Loading…
Reference in New Issue
Block a user