Mercurial > emacs
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) |
