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

* fixed web bug #1242

Browse Source
This commit is contained in:
Jonas Maebe 2000-11-16 15:27:48 +00:00
parent 30071b6a3d
commit 03005b8b6b
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/i386/n386cnv.pas
View File

@ -1100,7 +1100,7 @@ implementation
href.symbol:=nil; href.symbol:=nil;
pushusedregisters(pushedregs,$ff); pushusedregisters(pushedregs,$ff);
gettempofsizereference(32,href); gettempofsizereference(32,href);
emitpushreferenceaddr(left.location.reference); emit_push_mem_size(left.location.reference,4);
emitpushreferenceaddr(href); emitpushreferenceaddr(href);
emitcall('FPC_SET_LOAD_SMALL'); emitcall('FPC_SET_LOAD_SMALL');
maybe_loadesi; maybe_loadesi;
@ -1483,7 +1483,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.6 2000-11-13 11:30:56 florian Revision 1.7 2000-11-16 15:27:48 jonas
* fixed web bug 1242
Revision 1.6 2000/11/13 11:30:56 florian
* some bugs with interfaces and NIL fixed * some bugs with interfaces and NIL fixed
Revision 1.5 2000/11/12 23:24:14 florian Revision 1.5 2000/11/12 23:24:14 florian