Mercurial > emacs
comparison src/lisp.h @ 46377:d50779ef2a76
* lisp.h (STRING_INTERVALS): Produce rvalue.
(STRING_SET_INTERVALS): New macro.
| author | Ken Raeburn <raeburn@raeburn.org> |
|---|---|
| date | Mon, 15 Jul 2002 06:54:23 +0000 |
| parents | e7289ef367d8 |
| children | de62156bec9a |
comparison
equal
deleted
inserted
replaced
| 46376:3eb5331c5798 | 46377:d50779ef2a76 |
|---|---|
| 685 | 685 |
| 686 /* Mark STR as a unibyte string. */ | 686 /* Mark STR as a unibyte string. */ |
| 687 #define STRING_SET_UNIBYTE(STR) (XSTRING (STR)->size_byte = -1) | 687 #define STRING_SET_UNIBYTE(STR) (XSTRING (STR)->size_byte = -1) |
| 688 | 688 |
| 689 /* Get text properties. */ | 689 /* Get text properties. */ |
| 690 #define STRING_INTERVALS(STR) (XSTRING (STR)->intervals) | 690 #define STRING_INTERVALS(STR) (XSTRING (STR)->intervals + 0) |
| 691 | |
| 692 /* Set text properties. */ | |
| 693 #define STRING_SET_INTERVALS(STR, INT) (XSTRING (STR)->intervals = (INT)) | |
| 691 | 694 |
| 692 /* In a string or vector, the sign bit of the `size' is the gc mark bit */ | 695 /* In a string or vector, the sign bit of the `size' is the gc mark bit */ |
| 693 | 696 |
| 694 struct Lisp_String | 697 struct Lisp_String |
| 695 { | 698 { |