Merge branch 'master' of git://factorcode.org/git/factor

db4
John Benediktsson 2009-04-12 12:14:31 -07:00
commit ae1c129c51
1 changed files with 3 additions and 1 deletions

View File

@ -102,8 +102,10 @@ MEMO: simple-category-table ( -- table )
{ CHAR: s dotall } { CHAR: s dotall }
} ; } ;
ERROR: nonexistent-option name ;
: ch>option ( ch -- singleton ) : ch>option ( ch -- singleton )
options-assoc at ; dup options-assoc at [ ] [ nonexistent-option ] ?if ;
: option>ch ( option -- string ) : option>ch ( option -- string )
options-assoc value-at ; options-assoc value-at ;