Browse Source

some tabs to spaces indentation cleanup. no functional change

git-svn-id: trunk@37599 -
Károly Balogh 7 years ago
parent
commit
4b113579a5
1 changed files with 7 additions and 7 deletions
  1. 7 7
      compiler/link.pas

+ 7 - 7
compiler/link.pas

@@ -180,13 +180,13 @@ Implementation
       begin
         result:=0;
         bufsize:=64*1024;
-	      fs:=CFileStreamClass.Create(fn,fmOpenRead or fmShareDenyNone);
-	      if CStreamError<>0 then
-	        begin
-	          fs.Free;
-	          Comment(V_Error,'Can''t open file: '+fn);
-	          exit;
-	        end;
+        fs:=CFileStreamClass.Create(fn,fmOpenRead or fmShareDenyNone);
+        if CStreamError<>0 then
+          begin
+            fs.Free;
+            Comment(V_Error,'Can''t open file: '+fn);
+            exit;
+          end;
         getmem(buf,bufsize);
         repeat
           bufcount:=fs.Read(buf^,bufsize);