Mercurial > hg > xemacs-beta
comparison src/backtrace.h @ 388:aabb7f5b1c81 r21-2-9
Import from CVS: tag r21-2-9
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:09:42 +0200 |
parents | 8626e4521993 |
children | 74fd4e045ea6 |
comparison
equal
deleted
inserted
replaced
387:f892a9d0bb8d | 388:aabb7f5b1c81 |
---|---|
275 #define CHECK_SPECBIND_VARIABLE assert (specpdl_ptr->func == 0) | 275 #define CHECK_SPECBIND_VARIABLE assert (specpdl_ptr->func == 0) |
276 #else | 276 #else |
277 #define CHECK_SPECBIND_VARIABLE DO_NOTHING | 277 #define CHECK_SPECBIND_VARIABLE DO_NOTHING |
278 #endif | 278 #endif |
279 | 279 |
280 #if 0 | |
281 /* Unused. It's too hard to guarantee that the current bindings | |
282 contain only variables. */ | |
280 /* Another inline version of unbind_to(). VALUE is GC-protected. | 283 /* Another inline version of unbind_to(). VALUE is GC-protected. |
281 Caller guarantees that: | 284 Caller guarantees that: |
282 - all of the elements on the binding stack are variable bindings. | 285 - all of the elements on the binding stack are variable bindings. |
283 Else we crash. */ | 286 Else we crash. */ |
284 #define UNBIND_TO_GCPRO_VARIABLES_ONLY(count, value) do { \ | 287 #define UNBIND_TO_GCPRO_VARIABLES_ONLY(count, value) do { \ |
301 UNGCPRO; \ | 304 UNGCPRO; \ |
302 break; \ | 305 break; \ |
303 } \ | 306 } \ |
304 } \ | 307 } \ |
305 } while (0) | 308 } while (0) |
309 #endif /* unused */ | |
306 | 310 |
307 /* A faster, but less safe inline version of Fset(). | 311 /* A faster, but less safe inline version of Fset(). |
308 Caller guarantees that: | 312 Caller guarantees that: |
309 - SYMBOL is a non-constant symbol (i.e. not Qnil, Qt, or keyword). | 313 - SYMBOL is a non-constant symbol (i.e. not Qnil, Qt, or keyword). |
310 Else we crash. */ | 314 Else we crash. */ |