mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-07 12:28:02 +02:00
fffa66e2f9
from any ordinal constant, and give a warning for this one allowed
conversion like Kylix does (mantis #14713)
* this required calling simplify from typecheckpass in ttypeconvnode for
cord_to_pointer, because this simplification prevents the type checking
from happening (but the typecheck itself also does that simplification)
git-svn-id: trunk@13919 -
10 lines
64 B
ObjectPascal
10 lines
64 B
ObjectPascal
{ %fail }
|
|
|
|
{$mode delphi}
|
|
|
|
var
|
|
p: pointer;
|
|
begin
|
|
p:=1;
|
|
end.
|