From 4103c982c33445bd628f2442587f815238b291bc Mon Sep 17 00:00:00 2001
From: Daniel Ehrenberg <ehrenbed@carleton.edu>
Date: Wed, 13 Feb 2008 19:54:35 -0600
Subject: [PATCH] encodings fix

---
 core/io/encodings/encodings.factor   | 5 +++--
 core/io/encodings/utf16/utf16.factor | 4 ++--
 core/io/encodings/utf8/utf8.factor   | 2 +-
 3 files changed, 6 insertions(+), 5 deletions(-)

diff --git a/core/io/encodings/encodings.factor b/core/io/encodings/encodings.factor
index 1f261dea52..27c74fc4bd 100755
--- a/core/io/encodings/encodings.factor
+++ b/core/io/encodings/encodings.factor
@@ -1,7 +1,8 @@
 ! Copyright (C) 2006, 2007 Daniel Ehrenberg.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: math kernel sequences sbufs vectors
-namespaces unicode.syntax growable strings io ;
+USING: math kernel sequences sbufs vectors io.streams.lines io.streams.plain
+namespaces unicode.syntax growable strings io classes io.streams.c
+continuations ;
 IN: io.encodings
 
 TUPLE: encode-error ;
diff --git a/core/io/encodings/utf16/utf16.factor b/core/io/encodings/utf16/utf16.factor
index 2095283890..99e98cd98c 100755
--- a/core/io/encodings/utf16/utf16.factor
+++ b/core/io/encodings/utf16/utf16.factor
@@ -117,14 +117,14 @@ SYMBOL: ignore
 
 TUPLE: utf16le ;
 : <utf16le> utf16le construct-delegate ;
-INSTANCE: encoding-stream utf16le
+INSTANCE: utf16le encoding-stream 
 
 M: utf16le encode-string drop encode-utf16le ;
 M: utf16le decode-step drop decode-utf16le-step ;
 
 TUPLE: utf16be ;
 : <utf16be> utf16be construct-delegate ;
-INSTANCE: encoding-stream utf16be
+INSTANCE: utf16be encoding-stream 
 
 M: utf16be encode-string drop encode-utf16be ;
 M: utf16le decode-step drop decode-utf16be-step ;
diff --git a/core/io/encodings/utf8/utf8.factor b/core/io/encodings/utf8/utf8.factor
index e9c23610b5..f681b18142 100644
--- a/core/io/encodings/utf8/utf8.factor
+++ b/core/io/encodings/utf8/utf8.factor
@@ -79,7 +79,7 @@ SYMBOL: quad3
 
 TUPLE: utf8 ;
 : <utf8> utf8 construct-delegate ;
-INSTANCE: encoding-stream utf8
+INSTANCE: utf8 encoding-stream 
 
 M: utf8 encode-string drop encode-utf8 ;
 M: utf8 decode-step drop decode-utf8-step ;