Index: regular-expressions/interface.dylan =================================================================== --- regular-expressions/interface.dylan (revision 11607) +++ regular-expressions/interface.dylan (working copy) @@ -238,7 +238,7 @@ define function split (pattern :: , input :: , #key count = #f, remove-empty-items = #t, start = 0, end: input-end = #f) - => (#rest whole-bunch-of-strings :: ); + => (strings :: ); let positioner = make-regex-positioner(pattern); split-string(positioner, input, start, input-end | size(input), count, remove-empty-items); @@ -261,7 +261,7 @@ (positioner :: , input :: , start :: , input-end :: , count :: false-or(), remove-empty-items :: ) - => (#rest whole-bunch-of-strings :: ); + => (strings :: ); let strings = make(); block (done) let end-of-last-match = 0; @@ -292,9 +292,9 @@ end while; end block; if (remove-empty-items) - apply(values, remove!(strings, #f, test: method (a, b) a.empty? end)); + remove!(strings, #f, test: method (a, b) a.empty? end); else - apply(values, strings); + strings end if; end function split-string;