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

* the length of a sequence loading a constant in a register is properly set

Browse Source 
* register contents are fully cleared in clearregcontentsfrom()

git-svn-id: trunk@3654 -
This commit is contained in:
Jonas Maebe 2006-05-24 14:38:35 +00:00
parent c0f805ae6d
commit a854918f9a
2 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/i386/csopt386.pas
View File

@ -870,6 +870,8 @@ begin
begin
typ := con_unknown;
memwrite := nil;
startmod := nil;
nrofmods := 0;
end;
end;
getNextInstruction(p,p);

1
compiler/i386/daopt386.pas
View File

@ -2566,6 +2566,7 @@ begin
DestroyReg(curprop, tmpsupreg, true);
typ := Con_Const;
StartMod := p;
nrOfMods := 1;
end
end;
top_ref: