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

Fix string buffer implementation bug

release
Slava Pestov 2007-10-06 13:36:24 -04:00
parent 1c1e6a7af0
commit 5bc73cc5af
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
core/sbufs/sbufs.factor
View File

@ -9,7 +9,7 @@ IN: sbufs
M: sbuf set-nth-unsafe M: sbuf set-nth-unsafe
underlying >r >r >fixnum r> >fixnum r> set-char-slot ; underlying >r >r >fixnum r> >fixnum r> set-char-slot ;
M: sbuf new drop [ 0 <string> ] keep string>sbuf ; M: sbuf new drop [ 0 <string> ] keep >fixnum string>sbuf ;
: >sbuf ( seq -- sbuf ) SBUF" " clone-like ; inline : >sbuf ( seq -- sbuf ) SBUF" " clone-like ; inline