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

* fixed sse register display

Browse Source 
git-svn-id: trunk@3601 -
This commit is contained in:
florian 2006-05-20 19:43:27 +00:00
parent d93af200bc
commit 1cb8a2b9e8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ide/fpregs.pas
View File

@ -1445,12 +1445,12 @@ Const
end; end;
SetColor(rs.mxcsr,OldReg.mxcsr); SetColor(rs.mxcsr,OldReg.mxcsr);
WriteStr(1,i,'mxcsr'+IntToStr(i)+' '+rs.mxcsr,color); WriteStr(1,8,'mxcsr'+IntToStr(i)+' '+rs.mxcsr,color);
for i:=0 to 7 do for i:=0 to 7 do
begin begin
SetColor(rs.mmx[i],OldReg.mmx[i]); SetColor(rs.mmx[i],OldReg.mmx[i]);
WriteStr(1,i+8,'mmx'+IntToStr(i)+' '+rs.mmx[i],color); WriteStr(1,i+9,'mmx'+IntToStr(i)+' '+rs.mmx[i],color);
end; end;
{$endif cpui386} {$endif cpui386}
{$ifdef cpupowerpc} {$ifdef cpupowerpc}