aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog22
-rw-r--r--src/alloc.c4
-rw-r--r--src/coding.c2
-rw-r--r--src/fns.c4
-rw-r--r--src/font.c2
-rw-r--r--src/nsterm.m6
-rw-r--r--src/puresize.h2
7 files changed, 32 insertions, 10 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 65f1c086260..f61c2ccdb00 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,25 @@
12012-10-19 Kazuhiro Ito <kzhr@d1.dion.ne.jp> (tiny change)
2
3 * font.c (Ffont_at): Fix previous change.
4
52012-10-19 Eli Zaretskii <eliz@gnu.org>
6
7 * puresize.h (BASE_PURESIZE): Bump the base value to 1700000. See
8 http://lists.gnu.org/archive/html/emacs-devel/2012-10/msg00593.html
9 for the reasons.
10
11 * alloc.c (NSTATICS): Decrease to 0x800.
12
132012-10-19 Stefan Monnier <monnier@iro.umontreal.ca>
14
15 * fns.c (Fnreverse): Include the problem element when signalling an
16 error (bug#12677).
17
182012-10-18 Jan Djärv <jan.h.d@swipnet.se>
19
20 * nsterm.m (ns_select): Check writefds before call to
21 FD_ISSET (Bug#12668).
22
12012-10-18 Daniel Colascione <dancol@dancol.org> 232012-10-18 Daniel Colascione <dancol@dancol.org>
2 24
3 * alloc.c (NSTATICS): Increase from 0x650 to 0x1000 25 * alloc.c (NSTATICS): Increase from 0x650 to 0x1000
diff --git a/src/alloc.c b/src/alloc.c
index 08dc26784cc..5bb528c64ab 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -376,7 +376,7 @@ struct gcpro *gcprolist;
376/* Addresses of staticpro'd variables. Initialize it to a nonzero 376/* Addresses of staticpro'd variables. Initialize it to a nonzero
377 value; otherwise some compilers put it into BSS. */ 377 value; otherwise some compilers put it into BSS. */
378 378
379#define NSTATICS 0x1000 379#define NSTATICS 0x800
380static Lisp_Object *staticvec[NSTATICS] = {&Vpurify_flag}; 380static Lisp_Object *staticvec[NSTATICS] = {&Vpurify_flag};
381 381
382/* Index of next unused slot in staticvec. */ 382/* Index of next unused slot in staticvec. */
@@ -5030,7 +5030,7 @@ staticpro (Lisp_Object *varaddress)
5030{ 5030{
5031 staticvec[staticidx++] = varaddress; 5031 staticvec[staticidx++] = varaddress;
5032 if (staticidx >= NSTATICS) 5032 if (staticidx >= NSTATICS)
5033 fatal ("NSTATICS too small. Try increasing and recompiling Emacs."); 5033 fatal ("NSTATICS too small; try increasing and recompiling Emacs.");
5034} 5034}
5035 5035
5036 5036
diff --git a/src/coding.c b/src/coding.c
index 412d7245223..7628a9fbf2e 100644
--- a/src/coding.c
+++ b/src/coding.c
@@ -415,7 +415,7 @@ enum iso_code_class_type
415 ISO_shift_out, /* ISO_CODE_SO (0x0E) */ 415 ISO_shift_out, /* ISO_CODE_SO (0x0E) */
416 ISO_shift_in, /* ISO_CODE_SI (0x0F) */ 416 ISO_shift_in, /* ISO_CODE_SI (0x0F) */
417 ISO_single_shift_2_7, /* ISO_CODE_SS2_7 (0x19) */ 417 ISO_single_shift_2_7, /* ISO_CODE_SS2_7 (0x19) */
418 ISO_escape, /* ISO_CODE_SO (0x1B) */ 418 ISO_escape, /* ISO_CODE_ESC (0x1B) */
419 ISO_control_1, /* Control codes in the range 419 ISO_control_1, /* Control codes in the range
420 0x80..0x9F, except for the 420 0x80..0x9F, except for the
421 following 3 codes. */ 421 following 3 codes. */
diff --git a/src/fns.c b/src/fns.c
index c999b5b08b9..b1ba5ce9509 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -1689,7 +1689,7 @@ changing the value of a sequence `foo'. */)
1689 1689
1690DEFUN ("nreverse", Fnreverse, Snreverse, 1, 1, 0, 1690DEFUN ("nreverse", Fnreverse, Snreverse, 1, 1, 0,
1691 doc: /* Reverse LIST by modifying cdr pointers. 1691 doc: /* Reverse LIST by modifying cdr pointers.
1692Return the reversed list. */) 1692Return the reversed list. Expects a properly nil-terminated list. */)
1693 (Lisp_Object list) 1693 (Lisp_Object list)
1694{ 1694{
1695 register Lisp_Object prev, tail, next; 1695 register Lisp_Object prev, tail, next;
@@ -1700,7 +1700,7 @@ Return the reversed list. */)
1700 while (!NILP (tail)) 1700 while (!NILP (tail))
1701 { 1701 {
1702 QUIT; 1702 QUIT;
1703 CHECK_LIST_CONS (tail, list); 1703 CHECK_LIST_CONS (tail, tail);
1704 next = XCDR (tail); 1704 next = XCDR (tail);
1705 Fsetcdr (tail, prev); 1705 Fsetcdr (tail, prev);
1706 prev = tail; 1706 prev = tail;
diff --git a/src/font.c b/src/font.c
index 629e8bb977a..7cb4149ac4e 100644
--- a/src/font.c
+++ b/src/font.c
@@ -4775,7 +4775,7 @@ the current buffer. It defaults to the currently selected window. */)
4775 { 4775 {
4776 CHECK_NUMBER (position); 4776 CHECK_NUMBER (position);
4777 CHECK_STRING (string); 4777 CHECK_STRING (string);
4778 if (! (0 < XINT (position) && XINT (position) < SCHARS (string))) 4778 if (! (0 <= XINT (position) && XINT (position) < SCHARS (string)))
4779 args_out_of_range (string, position); 4779 args_out_of_range (string, position);
4780 pos = XINT (position); 4780 pos = XINT (position);
4781 } 4781 }
diff --git a/src/nsterm.m b/src/nsterm.m
index dfc84db50f7..a4eaad47ac1 100644
--- a/src/nsterm.m
+++ b/src/nsterm.m
@@ -3443,10 +3443,10 @@ ns_select (int nfds, fd_set *readfds, fd_set *writefds,
3443 3443
3444/* NSTRACE (ns_select); */ 3444/* NSTRACE (ns_select); */
3445 3445
3446 for (k = 0; readfds && k < nfds+1; k++) 3446 for (k = 0; k < nfds+1; k++)
3447 { 3447 {
3448 if (FD_ISSET(k, readfds)) ++nr; 3448 if (readfds && FD_ISSET(k, readfds)) ++nr;
3449 if (FD_ISSET(k, writefds)) ++nr; 3449 if (writefds && FD_ISSET(k, writefds)) ++nr;
3450 } 3450 }
3451 3451
3452 if (NSApp == nil 3452 if (NSApp == nil
diff --git a/src/puresize.h b/src/puresize.h
index 2f024345d61..26395a5729d 100644
--- a/src/puresize.h
+++ b/src/puresize.h
@@ -40,7 +40,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
40#endif 40#endif
41 41
42#ifndef BASE_PURESIZE 42#ifndef BASE_PURESIZE
43#define BASE_PURESIZE (1620000 + SYSTEM_PURESIZE_EXTRA + SITELOAD_PURESIZE_EXTRA) 43#define BASE_PURESIZE (1700000 + SYSTEM_PURESIZE_EXTRA + SITELOAD_PURESIZE_EXTRA)
44#endif 44#endif
45 45
46/* Increase BASE_PURESIZE by a ratio depending on the machine's word size. */ 46/* Increase BASE_PURESIZE by a ratio depending on the machine's word size. */