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. */