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 ;
 
-<PRIVATE
-
 : completion, ( short candidate -- )
     completion dup first 0 > [ , ] [ drop ] if ;
 
-PRIVATE>
-
 : completions ( short candidates -- seq )
     [ ] [
         [ [ completion, ] with each ] { } make