Mercurial > emacs
comparison src/alloc.c @ 10855:fddf2b79ebcf
(mark_perdisplays): Update to reflect current Lisp_Objects.
(NSTATICS): Increase to 768.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Wed, 01 Mar 1995 03:43:05 +0000 |
| parents | 546e4ae436be |
| children | 7b2e18d65fed |
comparison
equal
deleted
inserted
replaced
| 10854:cd64b7e04e23 | 10855:fddf2b79ebcf |
|---|---|
| 1270 | 1270 |
| 1271 /* Recording what needs to be marked for gc. */ | 1271 /* Recording what needs to be marked for gc. */ |
| 1272 | 1272 |
| 1273 struct gcpro *gcprolist; | 1273 struct gcpro *gcprolist; |
| 1274 | 1274 |
| 1275 #define NSTATICS 512 | 1275 #define NSTATICS 768 |
| 1276 | 1276 |
| 1277 Lisp_Object *staticvec[NSTATICS] = {0}; | 1277 Lisp_Object *staticvec[NSTATICS] = {0}; |
| 1278 | 1278 |
| 1279 int staticidx = 0; | 1279 int staticidx = 0; |
| 1280 | 1280 |
| 1874 mark_perdisplays () | 1874 mark_perdisplays () |
| 1875 { | 1875 { |
| 1876 PERDISPLAY *perd; | 1876 PERDISPLAY *perd; |
| 1877 for (perd = all_perdisplays; perd; perd = perd->next_perdisplay) | 1877 for (perd = all_perdisplays; perd; perd = perd->next_perdisplay) |
| 1878 { | 1878 { |
| 1879 mark_object (&perd->Vprefix_arg); | 1879 mark_object (&perd->prefix_factor); |
| 1880 mark_object (&perd->Vcurrent_prefix_arg); | 1880 mark_object (&perd->prefix_value); |
| 1881 mark_object (&perd->kbd_queue); | 1881 mark_object (&perd->kbd_queue); |
| 1882 } | 1882 } |
| 1883 } | 1883 } |
| 1884 | 1884 |
| 1885 /* Sweep: find all structures not marked, and free them. */ | 1885 /* Sweep: find all structures not marked, and free them. */ |
