diff src/console-stream.c @ 412:697ef44129c6 r21-2-14

Import from CVS: tag r21-2-14
author cvs
date Mon, 13 Aug 2007 11:20:41 +0200
parents de805c49cfc1
children 11054d720c21
line wrap: on
line diff
--- a/src/console-stream.c	Mon Aug 13 11:19:22 2007 +0200
+++ b/src/console-stream.c	Mon Aug 13 11:20:41 2007 +0200
@@ -69,9 +69,7 @@
     {
       CHECK_STRING (tty);
       stream_con->in = stream_con->out = stream_con->err =
-	/* #### We don't currently do coding-system translation on
-	   this descriptor. */
-	fopen ((char *) XSTRING_DATA (tty), READ_PLUS_TEXT);
+	fopen ((char *) XSTRING_DATA (tty), "r+");
       if (!stream_con->in)
 	error ("Unable to open tty %s", XSTRING_DATA (tty));
     }
@@ -173,7 +171,7 @@
 
 static int
 stream_text_width (struct frame *f, struct face_cachel *cachel,
-		   const Emchar *str, Charcount len)
+		   CONST Emchar *str, Charcount len)
 {
   return len;
 }
@@ -203,6 +201,16 @@
 }
 
 static void
+stream_output_begin (struct device *d)
+{
+}
+
+static void
+stream_output_end (struct device *d)
+{
+}
+
+static void
 stream_output_display_block (struct window *w, struct display_line *dl,
 			     int block, int start, int end,
 			     int start_pixpos, int cursor_start,
@@ -211,6 +219,16 @@
 }
 
 static void
+stream_output_vertical_divider (struct window *w, int clear)
+{
+}
+
+static void
+stream_clear_to_window_end (struct window *w, int ypos1, int ypos2)
+{
+}
+
+static void
 stream_clear_region (Lisp_Object window, struct device* d, struct frame * f,
 		  face_index findex, int x, int y,
 		  int width, int height, Lisp_Object fcolor, Lisp_Object bcolor,
@@ -218,6 +236,11 @@
 {
 }
 
+static void
+stream_clear_frame (struct frame *f)
+{
+}
+
 static int
 stream_flash (struct device *d)
 {
@@ -262,20 +285,19 @@
   CONSOLE_HAS_METHOD (stream, right_margin_width);
   CONSOLE_HAS_METHOD (stream, text_width);
   CONSOLE_HAS_METHOD (stream, output_display_block);
+  CONSOLE_HAS_METHOD (stream, output_vertical_divider);
   CONSOLE_HAS_METHOD (stream, divider_height);
   CONSOLE_HAS_METHOD (stream, eol_cursor_width);
+  CONSOLE_HAS_METHOD (stream, clear_to_window_end);
   CONSOLE_HAS_METHOD (stream, clear_region);
+  CONSOLE_HAS_METHOD (stream, clear_frame);
+  CONSOLE_HAS_METHOD (stream, output_begin);
+  CONSOLE_HAS_METHOD (stream, output_end);
   CONSOLE_HAS_METHOD (stream, flash);
   CONSOLE_HAS_METHOD (stream, ring_bell);
 }
 
 void
-reinit_console_type_create_stream (void)
-{
-  REINITIALIZE_CONSOLE_TYPE (stream);
-}
-
-void
 vars_of_console_stream (void)
 {
   DEFVAR_LISP ("terminal-console", &Vterminal_console /*
@@ -298,9 +320,8 @@
   staticpro (&Vstdio_str);
 }
 
-#ifndef PDUMP
 void
-init_console_stream (int reinit)
+init_console_stream (void)
 {
   /* This function can GC */
   if (!initialized)
@@ -318,25 +339,3 @@
         event_stream_select_console (XCONSOLE (Vterminal_console));
     }
 }
-
-#else
-
-void
-init_console_stream (int reinit)
-{
-  /* This function can GC */
-  if (!reinit)
-    {
-      Vterminal_device = Fmake_device (Qstream, Qnil, Qnil);
-      Vterminal_console = Fdevice_console (Vterminal_device);
-      Vterminal_frame = Fmake_frame (Qnil, Vterminal_device);
-      minibuf_window = XFRAME (Vterminal_frame)->minibuffer_window;
-    }
-  if (initialized)
-    {
-      stream_init_console (XCONSOLE (Vterminal_console), Qnil);
-      if (noninteractive)
-	event_stream_select_console (XCONSOLE (Vterminal_console));
-    }
-}
-#endif