paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-09 15:29:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed tgeneric5 test

Browse Source 
git-svn-id: trunk@2679 -
This commit is contained in:
tom_at_work 2006-02-25 13:58:01 +00:00
parent 2a14ed7c32
commit 7d89336fdd
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tests/test/tgeneric5.pp
View File

@ -18,7 +18,7 @@ var
p : pointer;
begin
i:=item;
if item=i then;
data := item;
p:=typeinfo(_T);
if p<>typeinfo(integer) then
begin