Browse Source

Fix compilation of RTL when USE_FILEREC_FULLNAME is not defined

git-svn-id: trunk@47267 -
pierre 4 năm trước cách đây
mục cha
commit
c2c4048e92
1 tập tin đã thay đổi với 2 bổ sung0 xóa
  1. 2 0
      rtl/inc/file.inc

+ 2 - 0
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;