Merge branch 'master' of git://factorcode.org/git/factor
commit
36bed1faab
|
@ -18,7 +18,7 @@ SYMBOL: begin
|
|||
over push 0 begin ;
|
||||
|
||||
: finish-decoding ( buf ch state -- str )
|
||||
begin eq? [ decode-error ] unless drop { } like ;
|
||||
begin eq? [ decode-error ] unless drop "" like ;
|
||||
|
||||
: decode ( seq quot -- str )
|
||||
>r [ length <sbuf> 0 begin ] keep r> each
|
||||
|
|
Loading…
Reference in New Issue