From b5d0ccf2003972c743f1136135d8f54e92aaf9e5 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Tue, 25 Sep 2012 10:34:32 -0700 Subject: [PATCH] tool.completion: ... --- basis/tools/completion/completion.factor | 4 ---- 1 file changed, 4 deletions(-) diff --git a/basis/tools/completion/completion.factor b/basis/tools/completion/completion.factor index 9102c668a7..8c61da927b 100644 --- a/basis/tools/completion/completion.factor +++ b/basis/tools/completion/completion.factor @@ -83,13 +83,9 @@ PRIVATE> : completion ( short candidate -- result ) [ second swap complete ] keep 2array ; - [ , ] [ drop ] if ; -PRIVATE> - : completions ( short candidates -- seq ) [ ] [ [ [ completion, ] with each ] { } make