Eliminate MLKStream, introduce MLKBinaryStream and MLKCharacterStream.

1 files changed, 13 insertions, 0 deletions

diff --git a/special-symbols.h b/special-symbols.h
index d0f93b0..752e1e9 100644
--- a/special-symbols.h
+++ b/special-symbols.h
@@ -61,6 +61,12 @@ static MLKSymbol *INLINE;
 static MLKSymbol *NOTINLINE;
 static MLKSymbol *SPECIAL;
 static MLKSymbol *LEXICAL;
+static MLKSymbol *QUERY_IO;
+static MLKSymbol *ERROR_OUTPUT;
+static MLKSymbol *STANDARD_OUTPUT;
+static MLKSymbol *TERMINAL_IO;
+static MLKSymbol *TRACE_OUTPUT;
+static MLKSymbol *DEBUG_IO;
 
 
 static void
@@ -106,6 +112,13 @@ ensure_symbols ()
   SPECIAL = [cl intern:@"INLINE"];
   LEXICAL = [sys intern:@"NOTINLINE"];
 
+  QUERY_IO = [cl intern:@"*QUERY-IO*"];
+  ERROR_OUTPUT = [cl intern:@"*ERROR-OUTPUT*"];
+  STANDARD_OUTPUT = [cl intern:@"*STANDARD-OUTPUT*"];
+  TERMINAL_IO = [cl intern:@"*TERMINAL-IO*"];
+  TRACE_OUTPUT = [cl intern:@"*TRACE-OUTPUT*"];
+  DEBUG_IO = [cl intern:@"*DEBUG-IO*"];
+
   COMPILE_TOPLEVEL = [keyword intern:@"COMPILE-TOPLEVEL"];
   COMPILE = [cl intern:@"COMPILE"];
   LOAD_TOPLEVEL = [keyword intern:@"LOAD-TOPLEVEL"];