mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-07 17:28:14 +02:00
1ee8207ffa
to complex types (caused a lot of internal errors later on, and
was also Delphi-incompatible)
git-svn-id: trunk@8369 -
13 lines
133 B
ObjectPascal
13 lines
133 B
ObjectPascal
{ %fail }
|
|
|
|
type
|
|
dummyrec = record
|
|
i : int64;
|
|
end;
|
|
|
|
var
|
|
d: double;
|
|
begin
|
|
d := double(dummyrec($ffffffff80000000));
|
|
end.
|