diff --git a/core/io/encodings/encodings.factor b/core/io/encodings/encodings.factor index 83ab576faf..5bc679cd27 100755 --- a/core/io/encodings/encodings.factor +++ b/core/io/encodings/encodings.factor @@ -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 0 begin ] keep r> each