aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorPaul Eggert2016-11-04 15:02:03 -0700
committerPaul Eggert2016-11-04 15:02:03 -0700
commitae0a1a890ec7b885e85cd945a21ca42fed80df3d (patch)
tree495f1d851cb3a43a0e677bff9c09d4211a35fbde /src
parent66b5222c3cd72839bf72e0b2a03912719c930451 (diff)
parentacae275b2752357497a2411876b83240ce7c8aec (diff)
downloademacs-ae0a1a890ec7b885e85cd945a21ca42fed80df3d.tar.gz
emacs-ae0a1a890ec7b885e85cd945a21ca42fed80df3d.zip
Merge from origin/emacs-25
acae275 ; Spelling fixes d8fac73 Update README for precompiled windows Emacs. 23570fd Clarify documentation of 'vc-responsible-backend' wrt symlinks f708cb2 Clarify doc string of 'transpose-sexps' cd05b1d Fix docstring of 'browse-url-firefox-new-window-is-tab' bdc89eb Improve documentation of 'font-lock-remove-keywords' 4a0c590 Fix documentation of the command summary key 0221b7a Mark relocation workarounds with REL_ALLOC
Diffstat (limited to 'src')
-rw-r--r--src/emacs.c2
-rw-r--r--src/lread.c8
-rw-r--r--src/search.c9
3 files changed, 13 insertions, 6 deletions
diff --git a/src/emacs.c b/src/emacs.c
index 13378c4c3b0..b74df21196a 100644
--- a/src/emacs.c
+++ b/src/emacs.c
@@ -1193,7 +1193,7 @@ Using an Emacs configured with --with-x-toolkit=lucid does not have this problem
1193 1193
1194 /* Called before syms_of_fileio, because it sets up Qerror_condition. */ 1194 /* Called before syms_of_fileio, because it sets up Qerror_condition. */
1195 syms_of_data (); 1195 syms_of_data ();
1196 syms_of_fns (); /* Before syms_of_charset which uses hashtables. */ 1196 syms_of_fns (); /* Before syms_of_charset which uses hash tables. */
1197 syms_of_fileio (); 1197 syms_of_fileio ();
1198 /* Before syms_of_coding to initialize Vgc_cons_threshold. */ 1198 /* Before syms_of_coding to initialize Vgc_cons_threshold. */
1199 syms_of_alloc (); 1199 syms_of_alloc ();
diff --git a/src/lread.c b/src/lread.c
index 58d518ce40b..eab9b8bea08 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -2574,7 +2574,7 @@ read1 (Lisp_Object readcharfun, int *pch, bool first_in_list)
2574 c = READCHAR; 2574 c = READCHAR;
2575 if (c == '(') 2575 if (c == '(')
2576 { 2576 {
2577 /* Accept extended format for hashtables (extensible to 2577 /* Accept extended format for hash tables (extensible to
2578 other types), e.g. 2578 other types), e.g.
2579 #s(hash-table size 2 test equal data (k1 v1 k2 v2)) */ 2579 #s(hash-table size 2 test equal data (k1 v1 k2 v2)) */
2580 Lisp_Object tmp = read_list (0, readcharfun); 2580 Lisp_Object tmp = read_list (0, readcharfun);
@@ -2620,10 +2620,10 @@ read1 (Lisp_Object readcharfun, int *pch, bool first_in_list)
2620 if (!NILP (params[param_count + 1])) 2620 if (!NILP (params[param_count + 1]))
2621 param_count += 2; 2621 param_count += 2;
2622 2622
2623 /* This is the hashtable data. */ 2623 /* This is the hash table data. */
2624 data = Fplist_get (tmp, Qdata); 2624 data = Fplist_get (tmp, Qdata);
2625 2625
2626 /* Now use params to make a new hashtable and fill it. */ 2626 /* Now use params to make a new hash table and fill it. */
2627 ht = Fmake_hash_table (param_count, params); 2627 ht = Fmake_hash_table (param_count, params);
2628 2628
2629 while (CONSP (data)) 2629 while (CONSP (data))
@@ -2631,7 +2631,7 @@ read1 (Lisp_Object readcharfun, int *pch, bool first_in_list)
2631 key = XCAR (data); 2631 key = XCAR (data);
2632 data = XCDR (data); 2632 data = XCDR (data);
2633 if (!CONSP (data)) 2633 if (!CONSP (data))
2634 error ("Odd number of elements in hashtable data"); 2634 error ("Odd number of elements in hash table data");
2635 val = XCAR (data); 2635 val = XCAR (data);
2636 data = XCDR (data); 2636 data = XCDR (data);
2637 Fputhash (key, val, ht); 2637 Fputhash (key, val, ht);
diff --git a/src/search.c b/src/search.c
index 25d81f2baf6..e597c33a0fb 100644
--- a/src/search.c
+++ b/src/search.c
@@ -2022,20 +2022,27 @@ boyer_moore (EMACS_INT n, unsigned char *base_pat,
2022 cursor += dirlen - i - direction; /* fix cursor */ 2022 cursor += dirlen - i - direction; /* fix cursor */
2023 if (i + direction == 0) 2023 if (i + direction == 0)
2024 { 2024 {
2025 ptrdiff_t position, start, end, cursor_off; 2025 ptrdiff_t position, start, end;
2026#ifdef REL_ALLOC
2027 ptrdiff_t cursor_off;
2028#endif
2026 2029
2027 cursor -= direction; 2030 cursor -= direction;
2028 2031
2029 position = pos_byte + cursor - p2 + ((direction > 0) 2032 position = pos_byte + cursor - p2 + ((direction > 0)
2030 ? 1 - len_byte : 0); 2033 ? 1 - len_byte : 0);
2034#ifdef REL_ALLOC
2031 /* set_search_regs might call malloc, which could 2035 /* set_search_regs might call malloc, which could
2032 cause ralloc.c relocate buffer text. We need to 2036 cause ralloc.c relocate buffer text. We need to
2033 update pointers into buffer text due to that. */ 2037 update pointers into buffer text due to that. */
2034 cursor_off = cursor - p2; 2038 cursor_off = cursor - p2;
2039#endif
2035 set_search_regs (position, len_byte); 2040 set_search_regs (position, len_byte);
2041#ifdef REL_ALLOC
2036 p_limit = BYTE_POS_ADDR (limit); 2042 p_limit = BYTE_POS_ADDR (limit);
2037 p2 = BYTE_POS_ADDR (pos_byte); 2043 p2 = BYTE_POS_ADDR (pos_byte);
2038 cursor = p2 + cursor_off; 2044 cursor = p2 + cursor_off;
2045#endif
2039 2046
2040 if (NILP (Vinhibit_changing_match_data)) 2047 if (NILP (Vinhibit_changing_match_data))
2041 { 2048 {