Mercurial > hg > xemacs-beta
diff src/lisp.h @ 3304:73051095a712
[xemacs-hg @ 2006-03-26 14:33:37 by crestani]
2006-03-26 Marcus Crestani <crestani@xemacs.org>
* alloc.c (make_uninit_string): Use set_lispstringp_direct.
* lisp.h (set_lispstringp_direct): New.
author | crestani |
---|---|
date | Sun, 26 Mar 2006 14:33:39 +0000 |
parents | 168191f9515f |
children | 2f13ae1532db |
line wrap: on
line diff
--- a/src/lisp.h Sun Mar 26 14:05:30 2006 +0000 +++ b/src/lisp.h Sun Mar 26 14:33:39 2006 +0000 @@ -2475,6 +2475,7 @@ /* Operations on Lisp_String *'s; only ones left */ #ifdef NEW_GC +#define set_lispstringp_direct(s) ((s)->indirect = 0) #define set_lispstringp_indirect(s) ((s)->indirect = 1) #define set_lispstringp_length(s, len) XSET_STRING_DATA_SIZE (s, len) #define set_lispstringp_data(s, ptr) XSET_STRING_DATA_DATA (s, ptr)