diff options
| author | Ken Raeburn | 1999-09-12 07:05:34 +0000 |
|---|---|---|
| committer | Ken Raeburn | 1999-09-12 07:05:34 +0000 |
| commit | 8e713be64cb396e4fa30d8a393987b77d6cd99f6 (patch) | |
| tree | 8ca8beed123bcd05a9849f9a575fbc73ca17edad /src/w32term.c | |
| parent | 70949dac51f3e975477e6b1a38cc78625efc4a40 (diff) | |
| download | emacs-8e713be64cb396e4fa30d8a393987b77d6cd99f6.tar.gz emacs-8e713be64cb396e4fa30d8a393987b77d6cd99f6.zip | |
Use XCAR and XCDR instead of explicit member references.
Diffstat (limited to 'src/w32term.c')
| -rw-r--r-- | src/w32term.c | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/src/w32term.c b/src/w32term.c index 8b426aeb2b6..ac7a173feb1 100644 --- a/src/w32term.c +++ b/src/w32term.c | |||
| @@ -2588,11 +2588,11 @@ x_window_to_scroll_bar (window_id) | |||
| 2588 | 2588 | ||
| 2589 | for (tail = Vframe_list; | 2589 | for (tail = Vframe_list; |
| 2590 | XGCTYPE (tail) == Lisp_Cons; | 2590 | XGCTYPE (tail) == Lisp_Cons; |
| 2591 | tail = XCONS (tail)->cdr) | 2591 | tail = XCDR (tail)) |
| 2592 | { | 2592 | { |
| 2593 | Lisp_Object frame, bar, condemned; | 2593 | Lisp_Object frame, bar, condemned; |
| 2594 | 2594 | ||
| 2595 | frame = XCONS (tail)->car; | 2595 | frame = XCAR (tail); |
| 2596 | /* All elements of Vframe_list should be frames. */ | 2596 | /* All elements of Vframe_list should be frames. */ |
| 2597 | if (! GC_FRAMEP (frame)) | 2597 | if (! GC_FRAMEP (frame)) |
| 2598 | abort (); | 2598 | abort (); |
| @@ -3473,7 +3473,7 @@ w32_read_socket (sd, bufp, numchars, expected) | |||
| 3473 | numchars--; | 3473 | numchars--; |
| 3474 | } | 3474 | } |
| 3475 | else if (! NILP(Vframe_list) | 3475 | else if (! NILP(Vframe_list) |
| 3476 | && ! NILP (XCONS (Vframe_list)->cdr)) | 3476 | && ! NILP (XCDR (Vframe_list))) |
| 3477 | /* Force a redisplay sooner or later to update the | 3477 | /* Force a redisplay sooner or later to update the |
| 3478 | frame titles in case this is the second frame. */ | 3478 | frame titles in case this is the second frame. */ |
| 3479 | record_asynch_buffer_change (); | 3479 | record_asynch_buffer_change (); |
| @@ -4981,7 +4981,7 @@ w32_term_init (display_name, xrm_option, resource_name) | |||
| 4981 | /* Put it on w32_display_name_list as well, to keep them parallel. */ | 4981 | /* Put it on w32_display_name_list as well, to keep them parallel. */ |
| 4982 | w32_display_name_list = Fcons (Fcons (display_name, Qnil), | 4982 | w32_display_name_list = Fcons (Fcons (display_name, Qnil), |
| 4983 | w32_display_name_list); | 4983 | w32_display_name_list); |
| 4984 | dpyinfo->name_list_element = XCONS (w32_display_name_list)->car; | 4984 | dpyinfo->name_list_element = XCAR (w32_display_name_list); |
| 4985 | 4985 | ||
| 4986 | dpyinfo->w32_id_name | 4986 | dpyinfo->w32_id_name |
| 4987 | = (char *) xmalloc (XSTRING (Vinvocation_name)->size | 4987 | = (char *) xmalloc (XSTRING (Vinvocation_name)->size |
| @@ -5071,22 +5071,22 @@ x_delete_display (dpyinfo) | |||
| 5071 | /* Discard this display from w32_display_name_list and w32_display_list. | 5071 | /* Discard this display from w32_display_name_list and w32_display_list. |
| 5072 | We can't use Fdelq because that can quit. */ | 5072 | We can't use Fdelq because that can quit. */ |
| 5073 | if (! NILP (w32_display_name_list) | 5073 | if (! NILP (w32_display_name_list) |
| 5074 | && EQ (XCONS (w32_display_name_list)->car, dpyinfo->name_list_element)) | 5074 | && EQ (XCAR (w32_display_name_list), dpyinfo->name_list_element)) |
| 5075 | w32_display_name_list = XCONS (w32_display_name_list)->cdr; | 5075 | w32_display_name_list = XCDR (w32_display_name_list); |
| 5076 | else | 5076 | else |
| 5077 | { | 5077 | { |
| 5078 | Lisp_Object tail; | 5078 | Lisp_Object tail; |
| 5079 | 5079 | ||
| 5080 | tail = w32_display_name_list; | 5080 | tail = w32_display_name_list; |
| 5081 | while (CONSP (tail) && CONSP (XCONS (tail)->cdr)) | 5081 | while (CONSP (tail) && CONSP (XCDR (tail))) |
| 5082 | { | 5082 | { |
| 5083 | if (EQ (XCONS (XCONS (tail)->cdr)->car, | 5083 | if (EQ (XCAR (XCDR (tail)), |
| 5084 | dpyinfo->name_list_element)) | 5084 | dpyinfo->name_list_element)) |
| 5085 | { | 5085 | { |
| 5086 | XCONS (tail)->cdr = XCONS (XCONS (tail)->cdr)->cdr; | 5086 | XCDR (tail) = XCDR (XCDR (tail)); |
| 5087 | break; | 5087 | break; |
| 5088 | } | 5088 | } |
| 5089 | tail = XCONS (tail)->cdr; | 5089 | tail = XCDR (tail); |
| 5090 | } | 5090 | } |
| 5091 | } | 5091 | } |
| 5092 | 5092 | ||