Mercurial > hg > xemacs-beta
diff src/gc.c @ 3486:4cc26ec3f0de
[xemacs-hg @ 2006-07-02 07:32:19 by stephent]
Quiet GCC4 whining about unused values.
<8764ig79bx.fsf_-_@tleepslib.sk.tsukuba.ac.jp>
| author | stephent |
|---|---|
| date | Sun, 02 Jul 2006 07:32:20 +0000 |
| parents | 509d2981ffea |
| children | 896a34d28b71 |
line wrap: on
line diff
--- a/src/gc.c Sat Jul 01 21:51:05 2006 +0000 +++ b/src/gc.c Sun Jul 02 07:32:20 2006 +0000 @@ -1623,29 +1623,25 @@ { /* staticpro() */ Lisp_Object **p = Dynarr_begin (staticpros); Elemcount count; - for (count = Dynarr_length (staticpros); count; count--) + for (count = Dynarr_length (staticpros); count; count--, p++) /* Need to check if the pointer in the staticpro array is not NULL. A gc can occur after variable is added to the staticpro array and _before_ it is correctly initialized. In this case its value is NULL, which we have to catch here. */ if (*p) - mark_object (**p++); - else - **p++; + mark_object (**p); } { /* staticpro_nodump() */ Lisp_Object **p = Dynarr_begin (staticpros_nodump); Elemcount count; - for (count = Dynarr_length (staticpros_nodump); count; count--) + for (count = Dynarr_length (staticpros_nodump); count; count--, p++) /* Need to check if the pointer in the staticpro array is not NULL. A gc can occur after variable is added to the staticpro array and _before_ it is correctly initialized. In this case its value is NULL, which we have to catch here. */ if (*p) - mark_object (**p++); - else - **p++; + mark_object (**p); } #ifdef NEW_GC