소스 검색

+ more dummy consts added

git-svn-id: branches/z80@45033 -
nickysn 5 년 전
부모
커밋
4ca4f8abd5
1개의 변경된 파일12개의 추가작업 그리고 0개의 파일을 삭제
  1. 12 0
      rtl/zxspectrum/system.pp

+ 12 - 0
rtl/zxspectrum/system.pp

@@ -123,6 +123,18 @@ const
   maxExitCode = 255;
   MaxPathLen = 256;
 
+{ Default filehandles }
+  UnusedHandle    = $ffff;{ instead of -1, as it is a word value}
+  StdInputHandle  = 0;
+  StdOutputHandle = 1;
+  StdErrorHandle  = 2;
+
+  FileNameCaseSensitive : boolean = false;
+  FileNameCasePreserving: boolean = false;
+  CtrlZMarksEOF: boolean = true; (* #26 is considered as end of file *)
+
+  sLineBreak = LineEnding;
+  DefaultTextLineBreakStyle : TTextLineBreakStyle = tlbsCRLF;
 
 {$I system.inc}
 {$I tinyheap.inc}