paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-22 11:49:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

* 2 tests for integer constant to pointer conversion

Browse Source
This commit is contained in:
daniel 2003-12-16 10:27:47 +00:00
parent f670a09707
commit 213f373613
2 changed files with 18 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
tests/tbf/tb0159.pp Normal file
View File

@ -0,0 +1,8 @@
{%fail}
program tb0159;
var x:pointer;
begin
x:=0;
end.

10
tests/tbs/tb0465.pp Normal file
View File

@ -0,0 +1,10 @@
program tb0465;
{$mode delphi}
var x:pointer;
begin
x:=0;
x:=pointer(0);
end.