Mercurial > hg > xemacs-beta

comparison src/redisplay-tty.c @ 384:bbff43aa5eb7 r21-2-7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-7
author cvs
date Mon, 13 Aug 2007 11:08:24 +0200
parents 8626e4521993
children 74fd4e045ea6
comparison
equal deleted inserted replaced
383:6a50c6a581a5 384:bbff43aa5eb7
389 break; 389 break;
390 390
391 case IMAGE_MONO_PIXMAP: 391 case IMAGE_MONO_PIXMAP:
392 case IMAGE_COLOR_PIXMAP: 392 case IMAGE_COLOR_PIXMAP:
393 case IMAGE_SUBWINDOW: 393 case IMAGE_SUBWINDOW:
394 case IMAGE_WIDGET:
394 /* just do nothing here */ 395 /* just do nothing here */
395 break; 396 break;
396 397
397 case IMAGE_POINTER: 398 case IMAGE_POINTER:
398 abort (); 399 abort ();
459 tty_clear_region 460 tty_clear_region
460 461
461 Clear the area in the box defined by the given parameters. 462 Clear the area in the box defined by the given parameters.
462 ****************************************************************************/ 463 ****************************************************************************/
463 static void 464 static void
464 tty_clear_region (Lisp_Object window, face_index findex, int x, int y, 465 tty_clear_region (Lisp_Object window, struct device* d, struct frame * f,
465 int width, int height) 466 face_index findex, int x, int y,
466 { 467 int width, int height, Lisp_Object fcolor, Lisp_Object bcolor,
467 struct window *w = XWINDOW (window); 468 Lisp_Object background_pixmap)
468 struct frame *f = XFRAME (w->frame); 469 {
469 struct console *c = XCONSOLE (FRAME_CONSOLE (f)); 470 struct console *c = XCONSOLE (FRAME_CONSOLE (f));
470 int line; 471 int line;
471 472 struct window* w = XWINDOW (window);
472 if (!width || !height)
473 return;
474 473
475 tty_turn_on_face (w, findex); 474 tty_turn_on_face (w, findex);
476 for (line = y; line < y + height; line++) 475 for (line = y; line < y + height; line++)
477 { 476 {
478 int col; 477 int col;
532 else 531 else
533 { 532 {
534 Lisp_Object window; 533 Lisp_Object window;
535 534
536 XSETWINDOW (window, w); 535 XSETWINDOW (window, w);
537 tty_clear_region (window, DEFAULT_INDEX, x, ypos1, width, ypos2 - ypos1); 536 redisplay_clear_region (window, DEFAULT_INDEX, x, ypos1, width, ypos2 - ypos1);
538 } 537 }
539 } 538 }
540 539
541 /**************************************************************************** 540 /****************************************************************************
542 tty_clear_frame 541 tty_clear_frame
957 if (!GC_NILP (frm)) 956 if (!GC_NILP (frm))
958 { 957 {
959 struct frame *f = XFRAME (frm); 958 struct frame *f = XFRAME (frm);
960 959
961 /* Clear the bottom line of the frame. */ 960 /* Clear the bottom line of the frame. */
962 tty_clear_region (FRAME_SELECTED_WINDOW (f), DEFAULT_INDEX, 0, 961 redisplay_clear_region (FRAME_SELECTED_WINDOW (f), DEFAULT_INDEX, 0,
963 f->height, f->width, 1); 962 f->height, f->width, 1);
964 963
965 /* And then stick the cursor there. */ 964 /* And then stick the cursor there. */
966 tty_set_final_cursor_coords (f, f->height, 0); 965 tty_set_final_cursor_coords (f, f->height, 0);
967 tty_output_end (XDEVICE (dev)); 966 tty_output_end (XDEVICE (dev));