aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorAndrea Corallo2020-05-06 20:11:59 +0100
committerAndrea Corallo2020-05-06 20:11:59 +0100
commit92cf4bb8cc3da81f4877a734b9e9089ac4b89e85 (patch)
tree4e301ead55e89ad965205abf8cee0d136ff543ed /src
parentf8df3320b1ceffca8d5ee7cbc566ba3cdf761e21 (diff)
parent02f5a419fdcfb3fb6c8a3e4debe7224010b40227 (diff)
downloademacs-92cf4bb8cc3da81f4877a734b9e9089ac4b89e85.tar.gz
emacs-92cf4bb8cc3da81f4877a734b9e9089ac4b89e85.zip
Merge remote-tracking branch 'savannah/master' into HEAD
Diffstat (limited to 'src')
-rw-r--r--src/bignum.h3
-rw-r--r--src/conf_post.h9
-rw-r--r--src/data.c20
-rw-r--r--src/editfns.c2
-rw-r--r--src/emacs-module.c2
5 files changed, 25 insertions, 11 deletions
diff --git a/src/bignum.h b/src/bignum.h
index ad9021f15fd..4a906c3c0eb 100644
--- a/src/bignum.h
+++ b/src/bignum.h
@@ -108,7 +108,8 @@ bignum_integer (mpz_t *tmp, Lisp_Object i)
108 if (FIXNUMP (i)) 108 if (FIXNUMP (i))
109 { 109 {
110 mpz_set_intmax (*tmp, XFIXNUM (i)); 110 mpz_set_intmax (*tmp, XFIXNUM (i));
111 return tmp; 111 /* The unnecessary cast pacifies a buggy GCC 4.8.5. */
112 return (mpz_t const *) tmp;
112 } 113 }
113 return xbignum_val (i); 114 return xbignum_val (i);
114} 115}
diff --git a/src/conf_post.h b/src/conf_post.h
index 953b783ebea..1ef4ff33428 100644
--- a/src/conf_post.h
+++ b/src/conf_post.h
@@ -77,6 +77,7 @@ typedef bool bool_bf;
77# define HAS_ATTRIBUTE(a) HAS_ATTR_##a 77# define HAS_ATTRIBUTE(a) HAS_ATTR_##a
78# define HAS_ATTR_cleanup GNUC_PREREQ (3, 4, 0) 78# define HAS_ATTR_cleanup GNUC_PREREQ (3, 4, 0)
79# define HAS_ATTR_no_address_safety_analysis false 79# define HAS_ATTR_no_address_safety_analysis false
80# define HAS_ATTR_no_sanitize false
80# define HAS_ATTR_no_sanitize_address GNUC_PREREQ (4, 8, 0) 81# define HAS_ATTR_no_sanitize_address GNUC_PREREQ (4, 8, 0)
81# define HAS_ATTR_no_sanitize_undefined GNUC_PREREQ (4, 9, 0) 82# define HAS_ATTR_no_sanitize_undefined GNUC_PREREQ (4, 9, 0)
82#endif 83#endif
@@ -294,10 +295,10 @@ extern int emacs_setenv_TZ (char const *);
294/* Attribute of functions whose code should not have addresses 295/* Attribute of functions whose code should not have addresses
295 sanitized. */ 296 sanitized. */
296 297
297#if __has_attribute (no_sanitize_address) 298#if HAS_ATTRIBUTE (no_sanitize_address)
298# define ATTRIBUTE_NO_SANITIZE_ADDRESS \ 299# define ATTRIBUTE_NO_SANITIZE_ADDRESS \
299 __attribute__ ((no_sanitize_address)) ADDRESS_SANITIZER_WORKAROUND 300 __attribute__ ((no_sanitize_address)) ADDRESS_SANITIZER_WORKAROUND
300#elif __has_attribute (no_address_safety_analysis) 301#elif HAS_ATTRIBUTE (no_address_safety_analysis)
301# define ATTRIBUTE_NO_SANITIZE_ADDRESS \ 302# define ATTRIBUTE_NO_SANITIZE_ADDRESS \
302 __attribute__ ((no_address_safety_analysis)) ADDRESS_SANITIZER_WORKAROUND 303 __attribute__ ((no_address_safety_analysis)) ADDRESS_SANITIZER_WORKAROUND
303#else 304#else
@@ -306,9 +307,9 @@ extern int emacs_setenv_TZ (char const *);
306 307
307/* Attribute of functions whose undefined behavior should not be sanitized. */ 308/* Attribute of functions whose undefined behavior should not be sanitized. */
308 309
309#if __has_attribute (no_sanitize_undefined) 310#if HAS_ATTRIBUTE (no_sanitize_undefined)
310# define ATTRIBUTE_NO_SANITIZE_UNDEFINED __attribute__ ((no_sanitize_undefined)) 311# define ATTRIBUTE_NO_SANITIZE_UNDEFINED __attribute__ ((no_sanitize_undefined))
311#elif __has_attribute (no_sanitize) 312#elif HAS_ATTRIBUTE (no_sanitize)
312# define ATTRIBUTE_NO_SANITIZE_UNDEFINED \ 313# define ATTRIBUTE_NO_SANITIZE_UNDEFINED \
313 __attribute__ ((no_sanitize ("undefined"))) 314 __attribute__ ((no_sanitize ("undefined")))
314#else 315#else
diff --git a/src/data.c b/src/data.c
index 56ea7aabb04..3088487c60c 100644
--- a/src/data.c
+++ b/src/data.c
@@ -697,8 +697,14 @@ DEFUN ("fboundp", Ffboundp, Sfboundp, 1, 1, 0,
697} 697}
698 698
699DEFUN ("makunbound", Fmakunbound, Smakunbound, 1, 1, 0, 699DEFUN ("makunbound", Fmakunbound, Smakunbound, 1, 1, 0,
700 doc: /* Make SYMBOL's value be void. 700 doc: /* Empty out the value cell of SYMBOL, making it void as a variable.
701Return SYMBOL. */) 701Return SYMBOL.
702
703If a variable is void, trying to evaluate the variable signals a
704`void-variable' error, instead of returning a value. For more
705details, see Info node `(elisp) Void Variables'.
706
707See also `fmakunbound'. */)
702 (register Lisp_Object symbol) 708 (register Lisp_Object symbol)
703{ 709{
704 CHECK_SYMBOL (symbol); 710 CHECK_SYMBOL (symbol);
@@ -709,8 +715,14 @@ Return SYMBOL. */)
709} 715}
710 716
711DEFUN ("fmakunbound", Ffmakunbound, Sfmakunbound, 1, 1, 0, 717DEFUN ("fmakunbound", Ffmakunbound, Sfmakunbound, 1, 1, 0,
712 doc: /* Make SYMBOL's function definition be nil. 718 doc: /* Make SYMBOL's function definition be void.
713Return SYMBOL. */) 719Return SYMBOL.
720
721If a function definition is void, trying to call a function by that
722name will cause a `void-function' error. For more details, see Info
723node `(elisp) Function Cells'.
724
725See also `makunbound'. */)
714 (register Lisp_Object symbol) 726 (register Lisp_Object symbol)
715{ 727{
716 CHECK_SYMBOL (symbol); 728 CHECK_SYMBOL (symbol);
diff --git a/src/editfns.c b/src/editfns.c
index c32488e271f..763d95bb8fa 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -3019,7 +3019,7 @@ printed representation. The padding, if any, normally goes on the
3019left, but it goes on the right if the - flag is present. The padding 3019left, but it goes on the right if the - flag is present. The padding
3020character is normally a space, but it is 0 if the 0 flag is present. 3020character is normally a space, but it is 0 if the 0 flag is present.
3021The 0 flag is ignored if the - flag is present, or the format sequence 3021The 0 flag is ignored if the - flag is present, or the format sequence
3022is something other than %d, %e, %f, and %g. 3022is something other than %d, %o, %x, %e, %f, and %g.
3023 3023
3024For %e and %f sequences, the number after the "." in the precision 3024For %e and %f sequences, the number after the "." in the precision
3025specifier says how many decimal places to show; if zero, the decimal 3025specifier says how many decimal places to show; if zero, the decimal
diff --git a/src/emacs-module.c b/src/emacs-module.c
index e43e4907d2e..3d1827c7dad 100644
--- a/src/emacs-module.c
+++ b/src/emacs-module.c
@@ -248,7 +248,7 @@ module_decode_utf_8 (const char *str, ptrdiff_t len)
248 of `internal_condition_case' etc., and to avoid worrying about 248 of `internal_condition_case' etc., and to avoid worrying about
249 passing information to the handler functions. */ 249 passing information to the handler functions. */
250 250
251#if !__has_attribute (cleanup) 251#if !HAS_ATTRIBUTE (cleanup)
252 #error "__attribute__ ((cleanup)) not supported by this compiler; try GCC" 252 #error "__attribute__ ((cleanup)) not supported by this compiler; try GCC"
253#endif 253#endif
254 254