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

* avoid RTE220 in gentypedconstloadnode

Browse Source
This commit is contained in:
pierre 1999-05-04 14:27:04 +00:00
parent 1184d1d208
commit 0fc900da28
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/tree.pas
View File

@ -992,7 +992,7 @@ unit tree;
p^.treetype:=loadn;
p^.left:=nil;
p^.resulttype:=sym^.definition;
p^.symtableentry:=pvarsym(sym);
p^.symtableentry:=sym;
p^.symtable:=st;
p^.disposetyp:=dt_nothing;
gentypedconstloadnode:=p;
@ -1717,7 +1717,10 @@ unit tree;
end.
{
$Log$
Revision 1.75 1999-05-01 13:25:02 peter
Revision 1.76 1999-05-04 14:27:04 pierre
* avoid RTE220 in gentypedconstloadnode
Revision 1.75 1999/05/01 13:25:02 peter
* merged nasm compiler
* old asm moved to oldasm/