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

* temp. fix for lochigh para

Browse Source
This commit is contained in:
florian 2004-02-17 19:14:09 +00:00
parent 2835ed1b55
commit eaa8405a15
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/paramgr.pas
View File

@ -480,6 +480,7 @@ implementation
begin begin
tg.gettemp(list,paraitem.paratype.def.size,tt_persistent,href); tg.gettemp(list,paraitem.paratype.def.size,tt_persistent,href);
locpara.loc:=LOC_REFERENCE; locpara.loc:=LOC_REFERENCE;
locpara.lochigh:=LOC_INVALID;
locpara.reference.index:=href.base; locpara.reference.index:=href.base;
locpara.reference.offset:=href.offset; locpara.reference.offset:=href.offset;
end; end;
@ -531,7 +532,10 @@ end.
{ {
$Log$ $Log$
Revision 1.70 2004-02-09 22:48:45 florian Revision 1.71 2004-02-17 19:14:09 florian
* temp. fix for lochigh para
Revision 1.70 2004/02/09 22:48:45 florian
* several fixes to parameter handling on arm * several fixes to parameter handling on arm
Revision 1.69 2004/02/09 22:14:17 peter Revision 1.69 2004/02/09 22:14:17 peter