mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-20 04:59:26 +02:00
* fix crash with -CR
This commit is contained in:
parent
73bc40037f
commit
f4ec016665
@ -1529,6 +1529,7 @@ implementation
|
||||
hp:=casnode.create(left,cloadvmtaddrnode.create(ctypenode.create(resulttype)));
|
||||
left:=nil;
|
||||
result:=hp;
|
||||
exit;
|
||||
end;
|
||||
end
|
||||
|
||||
@ -2578,7 +2579,10 @@ begin
|
||||
end.
|
||||
{
|
||||
$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
|
||||
|
||||
Revision 1.172 2005/01/06 13:40:41 florian
|
||||
|
Loading…
Reference in New Issue
Block a user