diff options
author | Ken Raeburn <[email protected]> | 2002-07-15 02:13:38 +0000 |
---|---|---|
committer | Ken Raeburn <[email protected]> | 2002-07-15 02:13:38 +0000 |
commit | 7412b6fdd2a74fe49a4aa8fca84e4ef9afb5d548 (patch) | |
tree | ba71891acebddab9c6e32930a45fd96a18865110 | |
parent | d5db40779d7505244d37476b4f046641f07eea2b (diff) |
* lisp.h (STRING_SET_CHARS): New macro.
(SCHARS, SBYTES): Produce rvalues.
-rw-r--r-- | src/lisp.h | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/lisp.h b/src/lisp.h index 8c01d9c74d..ca8cd9835e 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -543,8 +543,11 @@ extern Lisp_Object make_number (); #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. */ |