From 91eeb82e5adf6efa42566e54ebf9917ed779632f Mon Sep 17 00:00:00 2001 From: nickysn Date: Thu, 23 Apr 2020 02:58:33 +0000 Subject: [PATCH] + some dummy consts for the file io git-svn-id: branches/z80@45030 - --- rtl/zxspectrum/system.pp | 14 ++++++++++++++ 1 file changed, 14 insertions(+) diff --git a/rtl/zxspectrum/system.pp b/rtl/zxspectrum/system.pp index 50c8de0cfd..72473bba03 100644 --- a/rtl/zxspectrum/system.pp +++ b/rtl/zxspectrum/system.pp @@ -110,6 +110,20 @@ implementation {$ifdef FULL_RTL} +const + LineEnding = #13#10; + { LFNSupport is a variable here, defined below!!! } + DirectorySeparator = '\'; + DriveSeparator = ':'; + ExtensionSeparator = '.'; + PathSeparator = ';'; + AllowDirectorySeparators : set of char = ['\','/']; + AllowDriveSeparators : set of char = [':']; + { FileNameCaseSensitive and FileNameCasePreserving are defined separately below!!! } + maxExitCode = 255; + MaxPathLen = 256; + + {$I system.inc} {$I tinyheap.inc}