diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/lisp.h | 15 |
1 files changed, 10 insertions, 5 deletions
diff --git a/src/lisp.h b/src/lisp.h index 734b80c6f05..89d292dd7f2 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -1814,11 +1814,16 @@ struct gcpro | |||
| 1814 | 1814 | ||
| 1815 | #if GC_MARK_STACK == GC_MAKE_GCPROS_NOOPS | 1815 | #if GC_MARK_STACK == GC_MAKE_GCPROS_NOOPS |
| 1816 | 1816 | ||
| 1817 | #define GCPRO1(varname) ((void) 0) | 1817 | /* Do something silly with gcproN vars just so gcc shuts up. */ |
| 1818 | #define GCPRO2(varname1, varname2)((void) 0) | 1818 | |
| 1819 | #define GCPRO3(varname1, varname2, varname3) ((void) 0) | 1819 | #define GCPRO1(varname) ((void) gcpro1) |
| 1820 | #define GCPRO4(varname1, varname2, varname3, varname4) ((void) 0) | 1820 | #define GCPRO2(varname1, varname2)(((void) gcpro2, (void) gcpro1)) |
| 1821 | #define GCPRO5(varname1, varname2, varname3, varname4, varname5) ((void) 0) | 1821 | #define GCPRO3(varname1, varname2, varname3) \ |
| 1822 | (((void) gcpro3, (void) gcpro2, (void) gcpro1)) | ||
| 1823 | #define GCPRO4(varname1, varname2, varname3, varname4) \ | ||
| 1824 | (((void) gcpro4, (void) gcpro3, (void) gcpro2, (void) gcpro1)) | ||
| 1825 | #define GCPRO5(varname1, varname2, varname3, varname4, varname5) \ | ||
| 1826 | (((void) gcpro5, (void) gcpro4, (void) gcpro3, (void) gcpro2, (void) gcpro1)) | ||
| 1822 | #define UNGCPRO ((void) 0) | 1827 | #define UNGCPRO ((void) 0) |
| 1823 | 1828 | ||
| 1824 | #else /* GC_MARK_STACK != GC_MAKE_GCPROS_NOOPS */ | 1829 | #else /* GC_MARK_STACK != GC_MAKE_GCPROS_NOOPS */ |