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

* adapted previous fix to Peter's asmsymbol patch

Browse Source
This commit is contained in:
Jonas Maebe 2002-08-14 18:13:28 +00:00
parent dc44063472
commit 9af3fc1776
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/ncgld.pas
View File

@ -335,7 +335,7 @@ implementation
begin
if left.nodetype <> typen then
internalerror(200205161);
reference_reset_symbol(href,newasmsymbol(tobjectdef(left.resulttype.def).vmt_mangledname),
reference_reset_symbol(href,objectlibrary.newasmsymbol(tobjectdef(left.resulttype.def).vmt_mangledname),
tprocdef(resulttype.def)._class.vmtmethodoffset(tprocdef(resulttype.def).extnumber));
end
else
@ -942,7 +942,10 @@ begin
end.
{
$Log$
Revision 1.22 2002-08-14 18:00:42 jonas
Revision 1.23 2002-08-14 18:13:28 jonas
* adapted previous fix to Peter's asmsymbol patch
Revision 1.22 2002/08/14 18:00:42 jonas
* fixed tb0403
Revision 1.21 2002/08/13 21:40:56 florian