Mercurial > emacs
comparison src/lisp.h @ 50918:d1b8ac33a632
(struct specbinding): Declare elements volatile.
(specpdl_ptr): Declare volatile.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 09 May 2003 13:58:38 +0000 |
| parents | 3afa0d82e92e |
| children | 9c6d139afc0f |
comparison
equal
deleted
inserted
replaced
| 50917:30a3c60d6de9 | 50918:d1b8ac33a632 |
|---|---|
| 1706 means we saw a buffer-local or frame-local value. Other values of | 1706 means we saw a buffer-local or frame-local value. Other values of |
| 1707 WHERE mean an internal error. */ | 1707 WHERE mean an internal error. */ |
| 1708 | 1708 |
| 1709 struct specbinding | 1709 struct specbinding |
| 1710 { | 1710 { |
| 1711 Lisp_Object symbol, old_value; | 1711 volatile Lisp_Object symbol, old_value; |
| 1712 Lisp_Object (*func) P_ ((Lisp_Object)); | 1712 volatile Lisp_Object (*func) P_ ((Lisp_Object)); |
| 1713 Lisp_Object unused; /* Dividing by 16 is faster than by 12 */ | 1713 Lisp_Object unused; /* Dividing by 16 is faster than by 12 */ |
| 1714 }; | 1714 }; |
| 1715 | 1715 |
| 1716 extern struct specbinding *specpdl; | 1716 extern struct specbinding *specpdl; |
| 1717 extern struct specbinding *specpdl_ptr; | 1717 extern volatile struct specbinding *specpdl_ptr; |
| 1718 extern int specpdl_size; | 1718 extern int specpdl_size; |
| 1719 | 1719 |
| 1720 extern EMACS_INT max_specpdl_size; | 1720 extern EMACS_INT max_specpdl_size; |
| 1721 | 1721 |
| 1722 #define SPECPDL_INDEX() (specpdl_ptr - specpdl) | 1722 #define SPECPDL_INDEX() (specpdl_ptr - specpdl) |