From 0c22382c9812d0e5d3605e11248445abc30e8907 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Thu, 23 Jun 2016 23:41:00 -0700 Subject: [PATCH] splitting: oh array literals... --- core/splitting/splitting.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/core/splitting/splitting.factor b/core/splitting/splitting.factor index 706db45600..e412c5edcb 100644 --- a/core/splitting/splitting.factor +++ b/core/splitting/splitting.factor @@ -102,7 +102,7 @@ PRIVATE> split dup length 1 = [ first ] [ [ >array ] map ] if ; inline : split-dashes ( seq -- seq/seq' ) - { \ -- } ?split ; inline + \ -- 1array ?split ; inline : split-slice ( seq separators -- pieces ) [ member? ] curry split-when-slice ; inline