aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorDmitry Antipov2012-08-10 13:37:43 +0400
committerDmitry Antipov2012-08-10 13:37:43 +0400
commit42b3a444365f6fdafb128971496bd2b48249f635 (patch)
treedb92762a5774b35c457b6904bed9702a95519184 /src
parent9fb0c957319ac71aca7b668bd3ee781590f59b19 (diff)
downloademacs-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/ChangeLog6
-rw-r--r--src/intervals.h15
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 @@
12012-08-10 Dmitry Antipov <dmantipov@yandex.ru> 12012-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
72012-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
21INLINE_HEADER_BEGIN 21INLINE_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
136LISP_INLINE void 139INTERVALS_INLINE void
137interval_set_parent (INTERVAL i, INTERVAL parent) 140interval_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
143LISP_INLINE void 146INTERVALS_INLINE void
144interval_set_object (INTERVAL i, Lisp_Object obj) 147interval_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
151LISP_INLINE void 154INTERVALS_INLINE void
152interval_set_left (INTERVAL i, INTERVAL left) 155interval_set_left (INTERVAL i, INTERVAL left)
153{ 156{
154 i->left = left; 157 i->left = left;
155} 158}
156 159
157LISP_INLINE void 160INTERVALS_INLINE void
158interval_set_right (INTERVAL i, INTERVAL right) 161interval_set_right (INTERVAL i, INTERVAL right)
159{ 162{
160 i->right = right; 163 i->right = right;
161} 164}
162 165
163LISP_INLINE Lisp_Object 166INTERVALS_INLINE Lisp_Object
164interval_set_plist (INTERVAL i, Lisp_Object plist) 167interval_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
173LISP_INLINE void 176INTERVALS_INLINE void
174interval_copy_parent (INTERVAL d, INTERVAL s) 177interval_copy_parent (INTERVAL d, INTERVAL s)
175{ 178{
176 d->up = s->up; 179 d->up = s->up;