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

* fixed crash with resourcestring

Browse Source
This commit is contained in:
peter 1999-07-23 21:31:42 +00:00
parent 6c00bfc702
commit 62273909ca
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/pexpr.pas
View File

@ -1120,7 +1120,7 @@ unit pexpr;
constresourcestring:
begin
p1:=genloadnode(pvarsym(srsym),srsymtable);
pd:=cansistringdef;
p1^.resulttype:=cansistringdef;
end;
end;
pd:=p1^.resulttype;
@ -2056,7 +2056,10 @@ unit pexpr;
end.
{
$Log$
Revision 1.123 1999-07-23 11:37:46 peter
Revision 1.124 1999-07-23 21:31:42 peter
* fixed crash with resourcestring
Revision 1.123 1999/07/23 11:37:46 peter
* error for illegal type reference, instead of 10998
Revision 1.122 1999/07/22 09:37:52 florian