Mercurial > emacs
diff src/lisp.h @ 41659:e37febff5532
(GCPRO1, GCPRO2, GCPRO3, GCPRO4, GCPRO5):
Add dummy uses of gcproN variables.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Thu, 29 Nov 2001 02:31:59 +0000 |
| parents | 6486180ed9ef |
| children | 7a360dc26b8a |
line wrap: on
line diff
--- a/src/lisp.h Thu Nov 29 02:28:17 2001 +0000 +++ b/src/lisp.h Thu Nov 29 02:31:59 2001 +0000 @@ -1814,11 +1814,16 @@ #if GC_MARK_STACK == GC_MAKE_GCPROS_NOOPS -#define GCPRO1(varname) ((void) 0) -#define GCPRO2(varname1, varname2)((void) 0) -#define GCPRO3(varname1, varname2, varname3) ((void) 0) -#define GCPRO4(varname1, varname2, varname3, varname4) ((void) 0) -#define GCPRO5(varname1, varname2, varname3, varname4, varname5) ((void) 0) +/* Do something silly with gcproN vars just so gcc shuts up. */ + +#define GCPRO1(varname) ((void) gcpro1) +#define GCPRO2(varname1, varname2)(((void) gcpro2, (void) gcpro1)) +#define GCPRO3(varname1, varname2, varname3) \ + (((void) gcpro3, (void) gcpro2, (void) gcpro1)) +#define GCPRO4(varname1, varname2, varname3, varname4) \ + (((void) gcpro4, (void) gcpro3, (void) gcpro2, (void) gcpro1)) +#define GCPRO5(varname1, varname2, varname3, varname4, varname5) \ + (((void) gcpro5, (void) gcpro4, (void) gcpro3, (void) gcpro2, (void) gcpro1)) #define UNGCPRO ((void) 0) #else /* GC_MARK_STACK != GC_MAKE_GCPROS_NOOPS */