slavapestov/factor — Issue #463: Some ascii words
Author: mrjbq7
Created: 2011-12-26 20:35:38+00:00
State: open

If we fix #462, then we can implement some useful words in the `ascii` vocab (to match `unicode.breaks` and `unicode.case`):

```factor
: >words ( str -- words ) [ [ blank? ] bi@ = ] slice monotonic-slice ;
: capitalize ( str -- title ) unclip [ >lower ] [ ch>upper ] bi* prefix ;
: >title ( str -- title ) >words [ capitalize ] map concat ;
```