aboutsummaryrefslogtreecommitdiffstats
path: root/src/dispnew.c
diff options
context:
space:
mode:
authorKen Raeburn1999-10-25 04:58:18 +0000
committerKen Raeburn1999-10-25 04:58:18 +0000
commit7539e11fca07e5837010aaae18eaaefc7e51cf52 (patch)
tree679815b93c740067026d3a86165a2433f71fbad6 /src/dispnew.c
parent3a7093d84fa090b8f2458cef0376b81de4bd77ff (diff)
downloademacs-7539e11fca07e5837010aaae18eaaefc7e51cf52.tar.gz
emacs-7539e11fca07e5837010aaae18eaaefc7e51cf52.zip
more XCAR/XCDR/XFLOAT_DATA uses, to help isolete lisp engine
Diffstat (limited to 'src/dispnew.c')
-rw-r--r--src/dispnew.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/dispnew.c b/src/dispnew.c
index a92ee9159d1..952429dc6ce 100644
--- a/src/dispnew.c
+++ b/src/dispnew.c
@@ -5693,9 +5693,9 @@ the current state.\n")
5693 No need to test for the end of the vector 5693 No need to test for the end of the vector
5694 because the last element of the vector is lambda 5694 because the last element of the vector is lambda
5695 and that will always cause a mismatch. */ 5695 and that will always cause a mismatch. */
5696 for (tail = Vbuffer_alist; CONSP (tail); tail = XCONS (tail)->cdr) 5696 for (tail = Vbuffer_alist; CONSP (tail); tail = XCDR (tail))
5697 { 5697 {
5698 buf = XCONS (XCONS (tail)->car)->cdr; 5698 buf = XCDR (XCAR (tail));
5699 /* Ignore buffers that aren't included in buffer lists. */ 5699 /* Ignore buffers that aren't included in buffer lists. */
5700 if (XSTRING (XBUFFER (buf)->name)->data[0] == ' ') 5700 if (XSTRING (XBUFFER (buf)->name)->data[0] == ' ')
5701 continue; 5701 continue;
@@ -5714,7 +5714,7 @@ the current state.\n")
5714 n = 1; 5714 n = 1;
5715 FOR_EACH_FRAME (tail, frame) 5715 FOR_EACH_FRAME (tail, frame)
5716 n += 2; 5716 n += 2;
5717 for (tail = Vbuffer_alist; CONSP (tail); tail = XCONS (tail)->cdr) 5717 for (tail = Vbuffer_alist; CONSP (tail); tail = XCDR (tail))
5718 n += 3; 5718 n += 3;
5719 /* Reallocate the vector if it's grown, or if it's shrunk a lot. */ 5719 /* Reallocate the vector if it's grown, or if it's shrunk a lot. */
5720 if (n > XVECTOR (frame_and_buffer_state)->size 5720 if (n > XVECTOR (frame_and_buffer_state)->size
@@ -5727,9 +5727,9 @@ the current state.\n")
5727 *vecp++ = frame; 5727 *vecp++ = frame;
5728 *vecp++ = XFRAME (frame)->name; 5728 *vecp++ = XFRAME (frame)->name;
5729 } 5729 }
5730 for (tail = Vbuffer_alist; CONSP (tail); tail = XCONS (tail)->cdr) 5730 for (tail = Vbuffer_alist; CONSP (tail); tail = XCDR (tail))
5731 { 5731 {
5732 buf = XCONS (XCONS (tail)->car)->cdr; 5732 buf = XCDR (XCAR (tail));
5733 /* Ignore buffers that aren't included in buffer lists. */ 5733 /* Ignore buffers that aren't included in buffer lists. */
5734 if (XSTRING (XBUFFER (buf)->name)->data[0] == ' ') 5734 if (XSTRING (XBUFFER (buf)->name)->data[0] == ' ')
5735 continue; 5735 continue;