Fix #1296 String chunkBySize fails

fable-compiler · Dec 18, 2017 · 58b2a3f · 58b2a3f · vasily-kirichenko · Dec 18, 2017
1 parent 5333b3d
commit 58b2a3f
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/src/js/fable-core/Seq.ts b/src/js/fable-core/Seq.ts
@@ -464,7 +464,7 @@ export function map3<T1, T2, T3, U>(
 
 export function chunkBySize<T>(size: number, xs: Iterable<T>): Iterable<Iterable<T>> {
   const result = arrayChunkBySize(size, Array.from(xs));
-  return ofArray(result.map(ofArray));
+  return ofArray(result);
 }
 
 export function mapFold<T, ST, R>(

diff --git a/tests/Main/StringTests.fs b/tests/Main/StringTests.fs
@@ -15,6 +15,11 @@ let ``String literal addition is optimized``() =
       "bar" + aLiteral |> equal "barfoo"
       "bar" + notALiteral |> equal "barfoo"
 
+[<Test>]
+let ``String chunkBySize works``() = // See #1296
+    "fffff" |> Seq.chunkBySize 3 |> Seq.map String |> Seq.toList
+    |> equal ["fff"; "ff"]
+
 // Format
 
 [<Test>]