# HG changeset patch
# User Ken Raeburn <raeburn@raeburn.org>
# Date 1026690845 0
# Node ID dd1d3b1d0053ba54094ccf64958b57897e7d76a5
# Parent  0b55cf135919fd785c2964be475c8c3e655ad093
(SMBP): Deleted.  All uses changed to STRING_MULTIBYTE.
(STRING_SET_UNIBYTE): New macro.
(SET_STRING_BYTES): Deleted.  Callers (all of which supplied a length of -1)
changed to use STRING_SET_UNIBYTE.

diff -r 0b55cf135919 -r dd1d3b1d0053 src/lisp.h
--- a/src/lisp.h	Sun Jul 14 22:52:48 2002 +0000
+++ b/src/lisp.h	Sun Jul 14 23:54:05 2002 +0000
@@ -545,7 +545,6 @@
 #define SDATA(string)		XSTRING (string)->data
 #define SCHARS(string)		XSTRING (string)->size
 #define SBYTES(string)		STRING_BYTES (XSTRING (string))
-#define SMBP(string)		STRING_MULTIBYTE (string)
 
 
 /* Basic data type for use of intervals.  See the macros in intervals.h.  */
@@ -681,8 +680,11 @@
 
 #endif /* not GC_CHECK_STRING_BYTES */
 
-/* Set the length in bytes of STR.  */
-#define SET_STRING_BYTES(STR, SIZE)  ((STR)->size_byte = (SIZE))
+/* Mark STR as a unibyte string.  */
+#define STRING_SET_UNIBYTE(STR)      (XSTRING (STR)->size_byte = -1)
+
+/* Get text properties.  */
+#define STRING_INTERVALS(STR)  (XSTRING (STR)->intervals)
 
 /* In a string or vector, the sign bit of the `size' is the gc mark bit */