buffer-extend -> extend-buffer

2006-03-01 19:12:34 +00:00 · 2006-03-01 19:12:34 +00:00 · 2691f48493
parent 1f5a2b0d75
commit 2691f48493
1 changed files with 1 additions and 1 deletions
--- a/library/win32/win32-stream.factor
+++ b/library/win32/win32-stream.factor
@ -80,7 +80,7 @@ M: string do-write ( str -- )
        out-buffer get >buffer
    ] [
        dup length out-buffer get buffer-size > [
-            dup length out-buffer get buffer-extend do-write
+            dup length out-buffer get extend-buffer do-write
        ] [ flush-output do-write ] if
    ] if ;