aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/bidi.c14
-rw-r--r--src/data.c7
2 files changed, 12 insertions, 9 deletions
diff --git a/src/bidi.c b/src/bidi.c
index 6ea84d9c0c4..5824de54ad8 100644
--- a/src/bidi.c
+++ b/src/bidi.c
@@ -2971,15 +2971,13 @@ bidi_resolve_neutral (struct bidi_it *bidi_it)
2971 /* N1-N2/Retaining */ 2971 /* N1-N2/Retaining */
2972 || type == WEAK_BN) 2972 || type == WEAK_BN)
2973 { 2973 {
2974 if (bidi_it->next_for_neutral.type != UNKNOWN_BT) 2974 if (bidi_it->next_for_neutral.type != UNKNOWN_BT
2975 && (bidi_it->next_for_neutral.charpos > bidi_it->charpos
2976 /* PDI defines an eos, so it's OK for it to serve as its
2977 own next_for_neutral. */
2978 || (bidi_it->next_for_neutral.charpos == bidi_it->charpos
2979 && bidi_it->type == PDI)))
2975 { 2980 {
2976 /* Make sure the data for resolving neutrals we are
2977 about to use is valid. */
2978 eassert (bidi_it->next_for_neutral.charpos > bidi_it->charpos
2979 /* PDI defines an eos, so it's OK for it to
2980 serve as its own next_for_neutral. */
2981 || (bidi_it->next_for_neutral.charpos == bidi_it->charpos
2982 && bidi_it->type == PDI));
2983 type = bidi_resolve_neutral_1 (bidi_it->prev_for_neutral.type, 2981 type = bidi_resolve_neutral_1 (bidi_it->prev_for_neutral.type,
2984 bidi_it->next_for_neutral.type, 2982 bidi_it->next_for_neutral.type,
2985 current_level); 2983 current_level);
diff --git a/src/data.c b/src/data.c
index 71da916ae74..5af590abed9 100644
--- a/src/data.c
+++ b/src/data.c
@@ -629,7 +629,12 @@ global value outside of any lexical scope. */)
629 return (EQ (valcontents, Qunbound) ? Qnil : Qt); 629 return (EQ (valcontents, Qunbound) ? Qnil : Qt);
630} 630}
631 631
632/* FIXME: Make it an alias for function-symbol! */ 632/* FIXME: It has been previously suggested to make this function an
633 alias for symbol-function, but upon discussion at Debbug#23957,
634 there is a risk breaking backward compatiblity, as some users of
635 fboundp may expect `t' in particular, rather than any true
636 value. An alias is still welcome so long as the compatibility
637 issues are addressed. */
633DEFUN ("fboundp", Ffboundp, Sfboundp, 1, 1, 0, 638DEFUN ("fboundp", Ffboundp, Sfboundp, 1, 1, 0,
634 doc: /* Return t if SYMBOL's function definition is not void. */) 639 doc: /* Return t if SYMBOL's function definition is not void. */)
635 (register Lisp_Object symbol) 640 (register Lisp_Object symbol)