From 325e44736531360793ae505e714787f279662b1a Mon Sep 17 00:00:00 2001
From: pierre <pierre@3ad0048d-3df7-0310-abae-a5850022a9f2>
Date: Sun, 1 Nov 2020 08:23:40 +0000
Subject:  Fix compilation of RTL when USE_FILEREC_FULLNAME is not defined

git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@47267 3ad0048d-3df7-0310-abae-a5850022a9f2
---
 rtl/inc/file.inc | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'rtl/inc/file.inc')

diff --git a/rtl/inc/file.inc b/rtl/inc/file.inc
index f7357665e8..059c83004d 100644
--- a/rtl/inc/file.inc
+++ b/rtl/inc/file.inc
@@ -519,9 +519,11 @@ Begin
       end
     else InOutRes:=103;
   end;
+{$ifdef USE_FILEREC_FULLNAME}
 {$ifdef FPC_HAS_FEATURE_ANSISTRINGS}
   UnicodeString(FileRec(f).FullName):='';
 {$endif FPC_HAS_FEATURE_ANSISTRINGS}
+{$endif USE_FILEREC_FULLNAME}
 End;
 
 
-- 
cgit v1.2.1