Explorar o código

* indention fixed

git-svn-id: trunk@36775 -
florian %!s(int64=8) %!d(string=hai) anos
pai
achega
8c33fbbe64
Modificáronse 1 ficheiros con 5 adicións e 5 borrados
  1. 5 5
      compiler/utils/mkspreg.pp

+ 5 - 5
compiler/utils/mkspreg.pp

@@ -189,7 +189,7 @@ begin
             cpustr:=readstr;
             cpustr:=readstr;
           end
           end
         else
         else
-          cpustr:='';		
+          cpustr:='';
         { Create register number }
         { Create register number }
         if supregs[regcount][1]<>'$' then
         if supregs[regcount][1]<>'$' then
           begin
           begin
@@ -197,18 +197,18 @@ begin
             writeln('Line: "',s,'"');
             writeln('Line: "',s,'"');
             halt(1);
             halt(1);
           end;
           end;
-		
+
         if i<length(s) then
         if i<length(s) then
           begin
           begin
             writeln('Extra chars at end of line, at line ',line);
             writeln('Extra chars at end of line, at line ',line);
             writeln('Line: "',s,'"');
             writeln('Line: "',s,'"');
             halt(1);
             halt(1);
           end;
           end;
-		if (cpustr<>'SPARC64') or sparc64 then
-		  begin
+        if (cpustr<>'SPARC64') or sparc64 then
+          begin
             numbers[regcount]:=regtypes[regcount]+copy(subregs[regcount],2,255)+'00'+copy(supregs[regcount],2,255);
             numbers[regcount]:=regtypes[regcount]+copy(subregs[regcount],2,255)+'00'+copy(supregs[regcount],2,255);
             inc(regcount);
             inc(regcount);
-		  end;
+          end;
         if regcount>max_regcount then
         if regcount>max_regcount then
           begin
           begin
             writeln('Error: Too much registers, please increase maxregcount in source');
             writeln('Error: Too much registers, please increase maxregcount in source');