summaryrefslogtreecommitdiff
path: root/src/character.h
diff options
context:
space:
mode:
authorYAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>2015-12-31 10:59:40 +0900
committerYAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>2015-12-31 10:59:40 +0900
commit47580e0d72f53c2fff23cb8edf1487da76e87744 (patch)
treee81c698d019e12a680aed3c0867a7c04d49cc4af /src/character.h
parent0588be7ca658faf79bbff7ffcb7eb9f0e3fb8190 (diff)
downloademacs-47580e0d72f53c2fff23cb8edf1487da76e87744.tar.gz
Avoid writing to purespace
* src/alloc.c (Fmake_string): Don't write to empty string contents. (allocate_vector): Don't write to empty vector size. * src/character.h (CHECK_CHARACTER_CAR, CHECK_CHARACTER_CDR): Don't call unnecessary XSETCAR or XSETCDR. * src/lisp.h (STRING_SET_UNIBYTE, STRING_SET_MULTIBYTE): Don't write to empty string size_byte.
Diffstat (limited to 'src/character.h')
-rw-r--r--src/character.h2
1 files changed, 0 insertions, 2 deletions
diff --git a/src/character.h b/src/character.h
index 871c1c3de95..440e78147d1 100644
--- a/src/character.h
+++ b/src/character.h
@@ -135,14 +135,12 @@ enum
do { \
Lisp_Object tmp = XCAR (x); \
CHECK_CHARACTER (tmp); \
- XSETCAR ((x), tmp); \
} while (false)
#define CHECK_CHARACTER_CDR(x) \
do { \
Lisp_Object tmp = XCDR (x); \
CHECK_CHARACTER (tmp); \
- XSETCDR ((x), tmp); \
} while (false)
/* Nonzero iff C is a character of code less than 0x100. */