From 1718c69e563135d828da9cb516bddc64c3f83c40 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Sun, 31 Mar 2013 16:04:11 -0700
Subject: [PATCH] io.files: use split instead of split*.
---
basis/io/files/info/windows/windows.factor | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/basis/io/files/info/windows/windows.factor b/basis/io/files/info/windows/windows.factor
index c0356af54e..fc651c366b 100755
--- a/basis/io/files/info/windows/windows.factor
+++ b/basis/io/files/info/windows/windows.factor
@@ -203,8 +203,8 @@ CONSTANT: names-buf-length 16384
0 uint <ref>
[ GetVolumePathNamesForVolumeName win32-error=0/f ] 3keep nip
uint deref head but-last-slice
- { 0 } split*
- [ { } ] [ [ alien>native-string ] map ] if-empty
+ { 0 } split-slice harvest
+ [ { } ] [ [ { 0 } append alien>native-string ] map ] if-empty
] with-destructors ;
! Can error with T{ windows-error f 21 "The device is not ready." }