Home Explore Help
Sign In
pascal
/
fpc
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* MorphOS, Amiga: changed definition of sLineBreak to match other system units, fixes fcl-base build

git-svn-id: trunk@16192 -
Károly Balogh 15 years ago
parent
5e84c557fa
commit
f5930b0dfc
2 changed files with 2 additions and 2 deletions
Split View Show Diff Stats
  1. 1 1
      rtl/amiga/system.pp
  2. 1 1
      rtl/morphos/system.pp

+ 1 - 1
rtl/amiga/system.pp
View File 

@@ -52,7 +52,7 @@ const
 
   FileNameCaseSensitive : Boolean = False;
 
   CtrlZMarksEOF: boolean = false; (* #26 not considered as end of file *)
 
 
-  sLineBreak : string[1] = LineEnding;
 
+  sLineBreak = LineEnding;
 
   DefaultTextLineBreakStyle : TTextLineBreakStyle = tlbsLF;
 
 
   BreakOn : Boolean = True;

+ 1 - 1
rtl/morphos/system.pp
View File 

@@ -49,7 +49,7 @@ const
 
   FileNameCaseSensitive : Boolean = False;
 
   CtrlZMarksEOF: boolean = false; { #26 not considered as end of file }
 
 
-  sLineBreak : string[1] = LineEnding;
 
+  sLineBreak = LineEnding;
 
   DefaultTextLineBreakStyle : TTextLineBreakStyle = tlbsLF;
 
 
   BreakOn : Boolean = True;