comparison src/alloc.c @ 16051:ccf489f8596e

Removed support for !MULTI_FRAME.
author Karl Heuer <kwzh@gnu.org>
date Sun, 01 Sep 1996 21:04:32 +0000
parents 36d2c4a8e064
children ccd19852de65
comparison
equal deleted inserted replaced
16050:c2805a244171 16051:ccf489f8596e
1800 /* This cast should be unnecessary, but some Mips compiler complains 1800 /* This cast should be unnecessary, but some Mips compiler complains
1801 (MIPS-ABI + SysVR4, DC/OSx, etc). */ 1801 (MIPS-ABI + SysVR4, DC/OSx, etc). */
1802 objptr = (Lisp_Object *) &ptr1->contents[COMPILED_CONSTANTS]; 1802 objptr = (Lisp_Object *) &ptr1->contents[COMPILED_CONSTANTS];
1803 goto loop; 1803 goto loop;
1804 } 1804 }
1805 #ifdef MULTI_FRAME
1806 else if (GC_FRAMEP (obj)) 1805 else if (GC_FRAMEP (obj))
1807 { 1806 {
1808 /* See comment above under Lisp_Vector for why this is volatile. */ 1807 /* See comment above under Lisp_Vector for why this is volatile. */
1809 register struct frame *volatile ptr = XFRAME (obj); 1808 register struct frame *volatile ptr = XFRAME (obj);
1810 register EMACS_INT size = ptr->size; 1809 register EMACS_INT size = ptr->size;
1824 mark_object (&ptr->menu_bar_items); 1823 mark_object (&ptr->menu_bar_items);
1825 mark_object (&ptr->face_alist); 1824 mark_object (&ptr->face_alist);
1826 mark_object (&ptr->menu_bar_vector); 1825 mark_object (&ptr->menu_bar_vector);
1827 mark_object (&ptr->buffer_predicate); 1826 mark_object (&ptr->buffer_predicate);
1828 } 1827 }
1829 #endif /* MULTI_FRAME */
1830 else if (GC_BOOL_VECTOR_P (obj)) 1828 else if (GC_BOOL_VECTOR_P (obj))
1831 { 1829 {
1832 register struct Lisp_Vector *ptr = XVECTOR (obj); 1830 register struct Lisp_Vector *ptr = XVECTOR (obj);
1833 1831
1834 if (ptr->size & ARRAY_MARK_FLAG) 1832 if (ptr->size & ARRAY_MARK_FLAG)