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

* insert framepointer as voidpointer instead of returntype

Browse Source
This commit is contained in:
peter 2003-11-03 17:47:30 +00:00
parent bed1aa36fe
commit af5a4842d5
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/pdecsub.pas
View File

@ -134,7 +134,7 @@ implementation
akttokenpos:=tprocdef(pd).fileinfo; akttokenpos:=tprocdef(pd).fileinfo;
{ Generate result variable accessing function result } { Generate result variable accessing function result }
vs:=tvarsym.create('$parentfp',vs_var,pd.rettype); vs:=tvarsym.create('$parentfp',vs_var,voidpointertype);
include(vs.varoptions,vo_is_parentfp); include(vs.varoptions,vo_is_parentfp);
pd.parast.insert(vs); pd.parast.insert(vs);
pd.insertpara(vs.vartype,vs,nil,true); pd.insertpara(vs.vartype,vs,nil,true);
@ -2132,7 +2132,10 @@ const
end. end.
{ {
$Log$ $Log$
Revision 1.150 2003-10-30 16:23:13 peter Revision 1.151 2003-11-03 17:47:30 peter
* insert framepointer as voidpointer instead of returntype
Revision 1.150 2003/10/30 16:23:13 peter
* don't search for overloads in parents for constructors * don't search for overloads in parents for constructors
Revision 1.149 2003/10/28 15:36:01 peter Revision 1.149 2003/10/28 15:36:01 peter