             [ drop ] [ nip V{ } clone pick push ] if
             1 +
         ] keep pick last push
-    ] each ;
+    ] each ; inline
 
 PRIVATE>
 

        [ accum swap 1 + t ] bi
    ] [
        f -1 f
    ] if* ;

PRIVATE>


    dupd fuzzy score max ;

: completion ( short candidate -- result )
    [ second swap complete ] keep 2array ; inline

: completion, ( short candidate -- )
    completion dup first-unsafe 0 > [ , ] [ drop ] if ;

: completions ( short candidates -- seq )
    [ ] [
