aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love2002-07-03 22:47:00 +0000
committerDave Love2002-07-03 22:47:00 +0000
commitf65c6d9453c3d7ef38f8a183fddcace3c5020c34 (patch)
tree15556bebc4d00882a54094346abd7585ed5571bc
parent256d0feff9ae8c9e3f561186a3ef7d84c53a50b5 (diff)
downloademacs-f65c6d9453c3d7ef38f8a183fddcace3c5020c34.tar.gz
emacs-f65c6d9453c3d7ef38f8a183fddcace3c5020c34.zip
Comment.
-rw-r--r--lisp/isearch.el1
-rw-r--r--lisp/simple.el1
-rw-r--r--src/character.h2
-rw-r--r--src/sysdep.c2
4 files changed, 5 insertions, 1 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el
index a3d85dd636a..446675c7b8d 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -235,6 +235,7 @@ Default value, nil, means edit the string instead."
235 (char-table-p (nth 1 map)) 235 (char-table-p (nth 1 map))
236 (error "The initialization of isearch-mode-map must be updated")) 236 (error "The initialization of isearch-mode-map must be updated"))
237 ;; Make all multibyte characters search for themselves. 237 ;; Make all multibyte characters search for themselves.
238 ;; Fixme: is this range right?
238 (set-char-table-range (nth 1 map) (cons #x100 #x2FFFFF) 239 (set-char-table-range (nth 1 map) (cons #x100 #x2FFFFF)
239 'isearch-printing-char) 240 'isearch-printing-char)
240 ;; Make function keys, etc, exit the search. 241 ;; Make function keys, etc, exit the search.
diff --git a/lisp/simple.el b/lisp/simple.el
index e1d0ad7007e..36d1ce52c5e 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -532,6 +532,7 @@ in *Help* buffer. See also the command `describe-char-after'."
532 (if (or (not coding) 532 (if (or (not coding)
533 (eq (coding-system-type coding) t)) 533 (eq (coding-system-type coding) t))
534 (setq coding default-buffer-file-coding-system)) 534 (setq coding default-buffer-file-coding-system))
535 ;; Fixme: can we actually have invalid chars now?
535 (if (not (char-valid-p char)) 536 (if (not (char-valid-p char))
536 (setq encoding-msg 537 (setq encoding-msg
537 (format "(0%o, %d, 0x%x, invalid)" char char char)) 538 (format "(0%o, %d, 0x%x, invalid)" char char char))
diff --git a/src/character.h b/src/character.h
index 35e46e2ff90..969a3e801db 100644
--- a/src/character.h
+++ b/src/character.h
@@ -77,7 +77,7 @@ Boston, MA 02111-1307, USA. */
77/* Nonzero iff X is a character. */ 77/* Nonzero iff X is a character. */
78#define CHARACTERP(x) (NATNUMP (x) && XFASTINT (x) <= MAX_CHAR) 78#define CHARACTERP(x) (NATNUMP (x) && XFASTINT (x) <= MAX_CHAR)
79 79
80/* Nozero iff C is valid as a charater code. GENERICP is not used 80/* Nonzero iff C is valid as a character code. GENERICP is not used
81 now. */ 81 now. */
82#define CHAR_VALID_P(c, genericp) ((unsigned) (c) <= MAX_CHAR) 82#define CHAR_VALID_P(c, genericp) ((unsigned) (c) <= MAX_CHAR)
83 83
diff --git a/src/sysdep.c b/src/sysdep.c
index f560e9d7cf2..ab9398938a8 100644
--- a/src/sysdep.c
+++ b/src/sysdep.c
@@ -3082,6 +3082,8 @@ seed_random (arg)
3082 long arg; 3082 long arg;
3083{ 3083{
3084#ifdef HAVE_RANDOM 3084#ifdef HAVE_RANDOM
3085 /* Fixme: needs __USE_XOPEN_EXTENDED defined to be picked up from
3086 GNU stdlib.h. */
3085 srandom ((unsigned int)arg); 3087 srandom ((unsigned int)arg);
3086#else 3088#else
3087# ifdef HAVE_LRAND48 3089# ifdef HAVE_LRAND48