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

* Tidy indentation

Browse Source 
git-svn-id: trunk@4961 -
This commit is contained in:
daniel 2006-10-18 19:44:24 +00:00
parent 5718aa1428
commit aabc1e0fd2
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/inc/mmatimp.inc
View File

@ -704,10 +704,10 @@ begin
+r[1]*m2.data[1,0] +r[1]*m2.data[1,0]
{$if matsize>=3}+r[2]*m2.data[2,0]{$endif} {$if matsize>=3}+r[2]*m2.data[2,0]{$endif}
{$if matsize>=4}+r[3]*m2.data[3,0]{$endif}; {$if matsize>=4}+r[3]*m2.data[3,0]{$endif};
result.data[i,1]:=r[0]*m2.data[0,1] result.data[i,1]:=r[0]*m2.data[0,1]
+r[1]*m2.data[1,1] +r[1]*m2.data[1,1]
{$if matsize>=3}+r[2]*m2.data[2,1]{$endif} {$if matsize>=3}+r[2]*m2.data[2,1]{$endif}
{$if matsize>=4}+r[3]*m2.data[3,1]{$endif}; {$if matsize>=4}+r[3]*m2.data[3,1]{$endif};
{$if matsize>=3} {$if matsize>=3}
result.data[i,2]:=r[0]*m2.data[0,2] result.data[i,2]:=r[0]*m2.data[0,2]
+r[1]*m2.data[1,2] +r[1]*m2.data[1,2]