The PersistentVector switch for 64Bit is not right

fsprojects · May 29, 2012 · 3d19e93 · 3d19e93
1 parent 53b7121
commit 3d19e93
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/FSharpx.Core/DataStructures/Vector.fs b/src/FSharpx.Core/DataStructures/Vector.fs
@@ -5,7 +5,7 @@ open FSharpx
 open System.Threading
 
 let is64BitProcess = System.IntPtr.Size = 8
-let blockSizeShift = if is64BitProcess then 6 else 5
+let blockSizeShift = 5 // TODO: what can we do in 64Bit case?
 let blockSize = 1 <<< blockSizeShift
 let blockIndexMask = blockSize - 1