paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 10:29:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fix crash with -CR

Browse Source
This commit is contained in:
peter 2005-01-09 15:04:36 +00:00
parent 73bc40037f
commit f4ec016665
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/ncnv.pas
View File

@ -1529,6 +1529,7 @@ implementation
hp:=casnode.create(left,cloadvmtaddrnode.create(ctypenode.create(resulttype))); hp:=casnode.create(left,cloadvmtaddrnode.create(ctypenode.create(resulttype)));
left:=nil; left:=nil;
result:=hp; result:=hp;
exit;
end; end;
end end
@ -2578,7 +2579,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.173 2005-01-07 21:14:21 florian Revision 1.174 2005-01-09 15:04:36 peter
* fix crash with -CR
Revision 1.173 2005/01/07 21:14:21 florian
+ compiler side of variant<->interface implemented + compiler side of variant<->interface implemented
Revision 1.172 2005/01/06 13:40:41 florian Revision 1.172 2005/01/06 13:40:41 florian