Browse Source

rtl: changed LineEnding to a variable, it is determined at runtime

mattias 6 years ago
parent
commit
f3db818bb3
1 changed files with 4 additions and 3 deletions
  1. 4 3
      packages/rtl/system.pas

+ 4 - 3
packages/rtl/system.pas

@@ -17,10 +17,10 @@ unit System;
 
 
 interface
 interface
 
 
+var
+  LineEnding: string = #10;
+  sLineBreak: string = #10;
 const
 const
-  LineEnding = #10;
-  sLineBreak = LineEnding;
-
   MaxSmallint = 32767;
   MaxSmallint = 32767;
   MinSmallint = -32768;
   MinSmallint = -32768;
   MaxShortInt = 127;
   MaxShortInt = 127;
@@ -206,6 +206,7 @@ function GUIDToString(const GUID: TGUID): string; external name 'rtl.guidrToStr'
 var
 var
   ExitCode: Integer; external name 'rtl.exitcode';
   ExitCode: Integer; external name 'rtl.exitcode';
   IsConsole: Boolean = {$IFDEF NodeJS}true{$ELSE}false{$ENDIF};
   IsConsole: Boolean = {$IFDEF NodeJS}true{$ELSE}false{$ENDIF};
+  FirstDotAtFileNameStartIsExtension : Boolean = False;
 
 
 type
 type
   TOnParamCount = function: Longint;
   TOnParamCount = function: Longint;