Mercurial > emacs

changeset 46372:e7289ef367d8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* lisp.h (STRING_SET_CHARS): New macro. (SCHARS, SBYTES): Produce rvalues.
author Ken Raeburn <raeburn@raeburn.org>
date Mon, 15 Jul 2002 02:13:38 +0000
parents 3388738bcc9c
children d101e617707c
files src/lisp.h
diffstat 1 files changed, 5 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/lisp.h	Mon Jul 15 00:01:34 2002 +0000
+++ b/src/lisp.h	Mon Jul 15 02:13:38 2002 +0000
@@ -543,8 +543,11 @@
 
 #define SREF(string, index)	XSTRING (string)->data[index]
 #define SDATA(string)		XSTRING (string)->data
-#define SCHARS(string)		XSTRING (string)->size
-#define SBYTES(string)		STRING_BYTES (XSTRING (string))
+#define SCHARS(string)		(XSTRING (string)->size + 0)
+#define SBYTES(string)		(STRING_BYTES (XSTRING (string)) + 0)
+
+#define STRING_SET_CHARS(string, newsize) \
+    (XSTRING (string)->size = (newsize))
 
 
 /* Basic data type for use of intervals.  See the macros in intervals.h.  */