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

Add set-elt-string

db4
Slava Pestov 2009-01-11 23:51:41 -06:00
parent 2b2f95e711
commit 78fe3effa5
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
basis/documents/documents.factor
View File

@ -150,6 +150,9 @@ GENERIC: next-elt ( loc document elt -- newloc )
: elt-string ( loc document elt -- string ) : elt-string ( loc document elt -- string )
[ prev/next-elt ] [ drop ] 2bi doc-range ; [ prev/next-elt ] [ drop ] 2bi doc-range ;
: set-elt-string ( string loc document elt -- )
[ prev/next-elt ] [ drop ] 2bi set-doc-range ;
SINGLETON: char-elt SINGLETON: char-elt
: (prev-char) ( loc document quot -- loc ) : (prev-char) ( loc document quot -- loc )