git-svn-id: trunk@928 -
This commit is contained in:
Jonas Maebe 2005-08-23 11:09:40 +00:00
parent 63a7fabebc
commit 8be8b5a6e9
2 changed files with 13 additions and 0 deletions

1
.gitattributes vendored
View File

@ -5505,6 +5505,7 @@ tests/webtbf/tw4139.pp svneol=native#text/plain
tests/webtbf/tw4144.pp svneol=native#text/plain
tests/webtbf/tw4153.pp svneol=native#text/plain
tests/webtbf/tw4227.pp svneol=native#text/plain
tests/webtbf/tw4244.pp svneol=native#text/plain
tests/webtbf/tw4256.pp svneol=native#text/plain
tests/webtbf/uw0744.pp svneol=native#text/plain
tests/webtbf/uw0840a.pp svneol=native#text/plain

12
tests/webtbf/tw4244.pp Normal file
View File

@ -0,0 +1,12 @@
{ %fail }
function f: pointer;
begin
f := pointer(1);
end;
var
p : pointer;
begin
p := @longint(f);
end.