changeset 13189:104d1e97803c

(command_loop_1): Access display tables as char-tables.
author Richard M. Stallman <rms@gnu.org>
date Wed, 11 Oct 1995 17:18:51 +0000
parents dc0909e788bd
children 1e174c7e3a00
files src/keyboard.c
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/keyboard.c	Wed Oct 11 17:17:32 1995 +0000
+++ b/src/keyboard.c	Wed Oct 11 17:18:51 1995 +0000
@@ -1256,7 +1256,7 @@
 		 do them directly.  */
 	      if (EQ (this_command, Qforward_char) && PT < ZV)
 		{
-                  struct Lisp_Vector *dp
+                  struct Lisp_Char_Table *dp
 		    = window_display_table (XWINDOW (selected_window));
 		  lose = FETCH_CHAR (PT);
 		  SET_PT (PT + 1);
@@ -1279,7 +1279,7 @@
 		}
 	      else if (EQ (this_command, Qbackward_char) && PT > BEGV)
 		{
-                  struct Lisp_Vector *dp
+                  struct Lisp_Char_Table *dp
 		    = window_display_table (XWINDOW (selected_window));
 		  SET_PT (PT - 1);
 		  lose = FETCH_CHAR (PT);
@@ -1335,7 +1335,7 @@
 		  if (!lose
 		      && (PT == ZV || FETCH_CHAR (PT) == '\n'))
 		    {
-		      struct Lisp_Vector *dp
+		      struct Lisp_Char_Table *dp
 			= window_display_table (XWINDOW (selected_window));
 		      int lose = c;