Faster to cons than concat 1 element list.

We might want to switch to Resize array as suggested on #12
hypelib · Jun 20, 2019 · 366daa7 · 366daa7
1 parent 28fc14d
commit 366daa7
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/Hype/Optimize.fs b/src/Hype/Optimize.fs
@@ -677,8 +677,8 @@ type Optimize =
                     earlystop <- true
                     diverged <- true
 
-                whist <- [w] @ whist
-                lhist <- [l] @ lhist
+                whist <- w :: whist
+                lhist <- l :: lhist
 
                 if (l' < par.ImprovementThreshold * lbest) && (not diverged) then
                     wbest <- w