diff options
| author | Dmitry Antipov | 2012-08-10 13:37:43 +0400 |
|---|---|---|
| committer | Dmitry Antipov | 2012-08-10 13:37:43 +0400 |
| commit | 42b3a444365f6fdafb128971496bd2b48249f635 (patch) | |
| tree | db92762a5774b35c457b6904bed9702a95519184 /src | |
| parent | 9fb0c957319ac71aca7b668bd3ee781590f59b19 (diff) | |
| download | emacs-42b3a444365f6fdafb128971496bd2b48249f635.tar.gz emacs-42b3a444365f6fdafb128971496bd2b48249f635.zip | |
Use common inline syntax in intervals.h.
* intervals.h (INTERVALS_INLINE): New macro.
Change all users from LISP_INLINE.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 6 | ||||
| -rw-r--r-- | src/intervals.h | 15 |
2 files changed, 15 insertions, 6 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index ec53ff2a264..f6874ff9c19 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,5 +1,11 @@ | |||
| 1 | 2012-08-10 Dmitry Antipov <dmantipov@yandex.ru> | 1 | 2012-08-10 Dmitry Antipov <dmantipov@yandex.ru> |
| 2 | 2 | ||
| 3 | Use common inline syntax in intervals.h. | ||
| 4 | * intervals.h (INTERVALS_INLINE): New macro. | ||
| 5 | Change all users from LISP_INLINE. | ||
| 6 | |||
| 7 | 2012-08-10 Dmitry Antipov <dmantipov@yandex.ru> | ||
| 8 | |||
| 3 | Define Qnone once for all platforms. | 9 | Define Qnone once for all platforms. |
| 4 | * frame.c (Qnone): Define here. | 10 | * frame.c (Qnone): Define here. |
| 5 | (syms_of_frame): DEFSYM it. | 11 | (syms_of_frame): DEFSYM it. |
diff --git a/src/intervals.h b/src/intervals.h index 754b33f2ab9..a5166c6376f 100644 --- a/src/intervals.h +++ b/src/intervals.h | |||
| @@ -19,6 +19,9 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ | |||
| 19 | #include "dispextern.h" | 19 | #include "dispextern.h" |
| 20 | 20 | ||
| 21 | INLINE_HEADER_BEGIN | 21 | INLINE_HEADER_BEGIN |
| 22 | #ifndef INTERVALS_INLINE | ||
| 23 | # define INTERVALS_INLINE INLINE | ||
| 24 | #endif | ||
| 22 | 25 | ||
| 23 | /* Basic data type for use of intervals. */ | 26 | /* Basic data type for use of intervals. */ |
| 24 | 27 | ||
| @@ -133,14 +136,14 @@ struct interval | |||
| 133 | /* Use these functions to set Lisp_Object | 136 | /* Use these functions to set Lisp_Object |
| 134 | or pointer slots of struct interval. */ | 137 | or pointer slots of struct interval. */ |
| 135 | 138 | ||
| 136 | LISP_INLINE void | 139 | INTERVALS_INLINE void |
| 137 | interval_set_parent (INTERVAL i, INTERVAL parent) | 140 | interval_set_parent (INTERVAL i, INTERVAL parent) |
| 138 | { | 141 | { |
| 139 | i->up_obj = 0; | 142 | i->up_obj = 0; |
| 140 | i->up.interval = parent; | 143 | i->up.interval = parent; |
| 141 | } | 144 | } |
| 142 | 145 | ||
| 143 | LISP_INLINE void | 146 | INTERVALS_INLINE void |
| 144 | interval_set_object (INTERVAL i, Lisp_Object obj) | 147 | interval_set_object (INTERVAL i, Lisp_Object obj) |
| 145 | { | 148 | { |
| 146 | eassert (BUFFERP (obj) || STRINGP (obj)); | 149 | eassert (BUFFERP (obj) || STRINGP (obj)); |
| @@ -148,19 +151,19 @@ interval_set_object (INTERVAL i, Lisp_Object obj) | |||
| 148 | i->up.obj = obj; | 151 | i->up.obj = obj; |
| 149 | } | 152 | } |
| 150 | 153 | ||
| 151 | LISP_INLINE void | 154 | INTERVALS_INLINE void |
| 152 | interval_set_left (INTERVAL i, INTERVAL left) | 155 | interval_set_left (INTERVAL i, INTERVAL left) |
| 153 | { | 156 | { |
| 154 | i->left = left; | 157 | i->left = left; |
| 155 | } | 158 | } |
| 156 | 159 | ||
| 157 | LISP_INLINE void | 160 | INTERVALS_INLINE void |
| 158 | interval_set_right (INTERVAL i, INTERVAL right) | 161 | interval_set_right (INTERVAL i, INTERVAL right) |
| 159 | { | 162 | { |
| 160 | i->right = right; | 163 | i->right = right; |
| 161 | } | 164 | } |
| 162 | 165 | ||
| 163 | LISP_INLINE Lisp_Object | 166 | INTERVALS_INLINE Lisp_Object |
| 164 | interval_set_plist (INTERVAL i, Lisp_Object plist) | 167 | interval_set_plist (INTERVAL i, Lisp_Object plist) |
| 165 | { | 168 | { |
| 166 | i->plist = plist; | 169 | i->plist = plist; |
| @@ -170,7 +173,7 @@ interval_set_plist (INTERVAL i, Lisp_Object plist) | |||
| 170 | /* Make the parent of D be whatever the parent of S is, regardless | 173 | /* Make the parent of D be whatever the parent of S is, regardless |
| 171 | of the type. This is used when balancing an interval tree. */ | 174 | of the type. This is used when balancing an interval tree. */ |
| 172 | 175 | ||
| 173 | LISP_INLINE void | 176 | INTERVALS_INLINE void |
| 174 | interval_copy_parent (INTERVAL d, INTERVAL s) | 177 | interval_copy_parent (INTERVAL d, INTERVAL s) |
| 175 | { | 178 | { |
| 176 | d->up = s->up; | 179 | d->up = s->up; |