steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

ascii: remove ch-lower? and ch-upper? words, since they're the same as letter? and LETTER?

Slava Pestov 2010-10-08 18:55:37 -07:00
parent f446e408de
commit 1dc9a88b4d
1 changed files with 0 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
basis/ascii/ascii.factor
View File

@ -18,9 +18,6 @@ IN: ascii
: >lower ( str -- lower ) [ ch>lower ] map ;
: ch>upper ( ch -- upper ) dup letter? [ HEX: 20 - ] when ; inline
: >upper ( str -- upper ) [ ch>upper ] map ;
: ch-lower? ( ch -- ? ) dup ch>lower = ;
: ch-upper? ( ch -- ? ) dup ch>upper = ;
HINTS: >lower string ;
HINTS: >upper string ;