From 21950646c84e747b0cb611cc38f90ce77b6d43b1 Mon Sep 17 00:00:00 2001
From: Georges Hatem <georges@hatem.ws>
Date: Tue, 7 May 2024 20:05:59 +0300
Subject: [PATCH] this list was too big by mistake

---
 entries/ghatem-fpc/src/OneBRC.lpr | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/entries/ghatem-fpc/src/OneBRC.lpr b/entries/ghatem-fpc/src/OneBRC.lpr
index 72bbcf4..4f4111c 100644
--- a/entries/ghatem-fpc/src/OneBRC.lpr
+++ b/entries/ghatem-fpc/src/OneBRC.lpr
@@ -569,7 +569,7 @@ procedure TOneBRC.GenerateOutput;
 begin
   vStream := TStringStream.Create;
   vStations := TStringList.Create;
-  vStations.Capacity := cDictSize;
+  vStations.Capacity := cNumStations;
   vStations.UseLocale := False;
   try
     vStations.BeginUpdate;