set LF line ending as default, CRLF is a option

Author: paweld

generator/Common/generate.common.pas

@@ -195,8 +195,8 @@ procedure TGenerator.Generate;
   BuildStationNames;
 
   //initialize line ending if not corrected
-  if FLineEnding <> #10 then
-    FLineEnding := #13#10;
+  if FLineEnding <> #13#10 then
+    FLineEnding := #10;
 
   outputFileStream := TFileStream.Create(FOutPutFile, fmCreate);
 

generator/Common/generate.console.pas

@@ -72,7 +72,7 @@ procedure WriteHelp;
   WriteLn('  -o|--output-file <filename>    The file that will contain the generated lines');
   WriteLn('  -n|--line-count <number>       The amount of lines to be generated ( Can use 1_000_000_000 )');
   WriteLn('  -4|--400stations               Only 400 weather stations in output file');
-  WriteLn('  -b|--line-ending               Line ending: CRLF (default) or LF');
+  WriteLn('  -b|--line-ending               Line ending: LF (default) or CRLF');
 end;
 
 end.

generator/Delphi/src/generator.dpr

@@ -257,8 +257,8 @@ begin
     end
     else 
     begin
-      if UpperCase(tmpLineEnd) = 'LF' then
-        lineEnding := #10;  
+      if UpperCase(tmpLineEnd) = 'CRLF' then
+        lineEnding := #13#10;  
       inc(valid);
     end;    
   end;

generator/Lazarus/src/generator.lpr

@@ -148,8 +148,8 @@ procedure TOneBRCGenerator.DoRun;
       Terminate;
       Exit;
     end
-    else if UpperCase(tmpLineEnd) = 'LF' then
-      lineEnding := #10;
+    else if UpperCase(tmpLineEnd) = 'CRLF' then
+      lineEnding := #13#10;
   end;
 
   inputFilename:= ExpandFileName(inputFilename);