Sfoglia il codice sorgente

rtl: system: undo linebreak

mattias 6 anni fa
parent
commit
38b0422b90
1 ha cambiato i file con 3 aggiunte e 3 eliminazioni
  1. 3 3
      packages/rtl/system.pas

+ 3 - 3
packages/rtl/system.pas

@@ -17,9 +17,9 @@ unit System;
 
 interface
 
-var
-  LineEnding: string = #10;
-  sLineBreak: string = #10;
+const
+  LineEnding = #10;
+  sLineBreak = LineEnding;
 const
   MaxSmallint = 32767;
   MinSmallint = -32768;