diff --git a/basis/suffix-arrays/suffix-arrays.factor b/basis/suffix-arrays/suffix-arrays.factor index 8f728c1eda..9e111ed2e2 100644 --- a/basis/suffix-arrays/suffix-arrays.factor +++ b/basis/suffix-arrays/suffix-arrays.factor @@ -29,6 +29,7 @@ IN: suffix-arrays PRIVATE> : >suffix-array ( seq -- array ) + members [ suffixes ] map concat natural-sort ; SYNTAX: SA{ \ } [ >suffix-array ] parse-literal ;