From c64ca00dfe2e73ca668e05321232367b979c0601 Mon Sep 17 00:00:00 2001
From: Mattias Gaertner <nc-gaertnma@netcologne.de>
Date: Wed, 31 Oct 2018 13:59:33 +0000
Subject: [PATCH] pastojs: nodejs file functions

git-svn-id: trunk@40106 -
---
 packages/pastojs/src/pas2jsfileutils.pp | 18 ------------------
 1 file changed, 18 deletions(-)

diff --git a/packages/pastojs/src/pas2jsfileutils.pp b/packages/pastojs/src/pas2jsfileutils.pp
index ed4cd9cdb9..fa60aa2052 100644
--- a/packages/pastojs/src/pas2jsfileutils.pp
+++ b/packages/pastojs/src/pas2jsfileutils.pp
@@ -236,11 +236,7 @@ function TryCreateRelativePath(const Filename, BaseDirectory: String;
 var
   UpDirCount: Integer;
   i: Integer;
-  {$IFDEF Pas2js}
   s: string;
-  {$ELSE}
-  ResultPos, FileNameRestLen: Integer;
-  {$ENDIF}
   SharedDirs: Integer;
   FileP, BaseP, FileEndP, BaseEndP, FileL, BaseL: integer;
 begin
@@ -313,7 +309,6 @@ begin
     exit(true);
   end;
 
-  {$IFDEF Pas2js}
   s:='';
   for i:=1 to UpDirCount do
     s+='..'+PathDelim;
@@ -322,19 +317,6 @@ begin
   else
     s+=copy(Filename,FileP);
   RelPath:=s;
-  {$ELSE}
-  FileNameRestLen:=length(Filename)-(FileP-1);
-  SetLength(RelPath,3*UpDirCount+FileNameRestLen);
-  ResultPos:=1;
-  for i:=1 to UpDirCount do begin
-    RelPath[ResultPos]:='.';
-    RelPath[ResultPos+1]:='.';
-    RelPath[ResultPos+2]:=PathDelim;
-    inc(ResultPos,3);
-  end;
-  if FileNameRestLen>0 then
-    Move(FileP^,RelPath[ResultPos],FileNameRestLen);
-  {$ENDIF}
   Result:=true;
 end;