fix: Using the correct stream to write to file

Author: gcarreno

.gitignore

@@ -1,6 +1,7 @@
 # 1BRC project specific
 /bin
 /data/measurements*.txt
+/profiling
 
 # Compiled l10n files: .mo should be ignored
 *.mo

generator/Common/generate.common.pas

@@ -58,6 +58,9 @@ constructor TGenerator.Create(
   FLineCount:= ALineCount;
 
   FStationNames:= TStringList.Create;
+  FStationNames.Capacity:= 50000;
+  //FStationNames.CaseSensitive:= False;
+  FStationNames.UseLocale:= False;
   FStationNames.Duplicates:= dupIgnore;
   FStationNames.Sorted:= True;
 end;
@@ -75,7 +78,7 @@ procedure TGenerator.BuildStationNames;
   entry: String;
   count: Int64 = 0;
 begin
-  //WriteLn('Reading "',FInputFile,'"');
+  WriteLn('Building Weather Stations...');
   // Load the Weather Station names
   if FileExists(FInputFile) then
   begin
@@ -105,6 +108,8 @@ procedure TGenerator.BuildStationNames;
   begin
     raise Exception.Create(Format('File "%s" not found.', [ FInputFile ]));
   end;
+  WriteLn('Done.');
+  WriteLn;
 end;
 
 function TGenerator.GenerateProgressBar(APosition, AMax, ALength: Int64
@@ -155,7 +160,7 @@ procedure TGenerator.Generate;
           FormatFloat('#0.0', randomTemp)
         ]);
         //Write(line);
-        outputFileStream.WriteBuffer(line[1], Length(line));
+        outputBufWriter.WriteBuffer(line[1], Length(line));
         Dec(progressBatch);
         if progressBatch = 0 then
         begin

generator/Lazarus/src/generator.lpi

@@ -14,7 +14,7 @@
       <UseAppBundle Value="False"/>
       <ResourceType Value="res"/>
     </General>
-    <BuildModes Count="3">
+    <BuildModes Count="4">
       <Item1 Name="Default" Default="True"/>
       <Item2 Name="Debug">
         <CompilerOptions>
@@ -77,6 +77,25 @@
           </Linking>
         </CompilerOptions>
       </Item3>
+      <Item4 Name="Valgrind">
+        <CompilerOptions>
+          <Version Value="11"/>
+          <Target>
+            <Filename Value="../../../bin/generator"/>
+          </Target>
+          <SearchPaths>
+            <IncludeFiles Value="$(ProjOutDir);../../Common"/>
+            <OtherUnitFiles Value="../../Common"/>
+            <UnitOutputDirectory Value="../../../bin/lib/$(TargetCPU)-$(TargetOS)"/>
+          </SearchPaths>
+          <Linking>
+            <Debugging>
+              <DebugInfoType Value="dsDwarf3"/>
+              <UseValgrind Value="True"/>
+            </Debugging>
+          </Linking>
+        </CompilerOptions>
+      </Item4>
     </BuildModes>
     <PublishOptions>
       <Version Value="2"/>