projects
/
chise
/
xemacs-chise.git-
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add some Adobe-Japan1-5 code points.
[chise/xemacs-chise.git-]
/
src
/
specifier.c
diff --git
a/src/specifier.c
b/src/specifier.c
index
18ba86d
..
017663d
100644
(file)
--- a/
src/specifier.c
+++ b/
src/specifier.c
@@
-447,7
+447,7
@@
valid_specifier_type_p (Lisp_Object type)
DEFUN ("valid-specifier-type-p", Fvalid_specifier_type_p, 1, 1, 0, /*
Given a SPECIFIER-TYPE, return non-nil if it is valid.
DEFUN ("valid-specifier-type-p", Fvalid_specifier_type_p, 1, 1, 0, /*
Given a SPECIFIER-TYPE, return non-nil if it is valid.
-Valid types are 'generic, 'integer, boolean, 'color, 'font, 'image,
+Valid types are 'generic, 'integer, 'boolean, 'color, 'font, 'image,
'face-boolean, and 'toolbar.
*/
(specifier_type))
'face-boolean, and 'toolbar.
*/
(specifier_type))
@@
-1787,7
+1787,7
@@
specifier_add_spec (Lisp_Object specifier, Lisp_Object locale,
tem = nconc2 (*orig_inst_list, list_to_build_up);
else
{
tem = nconc2 (*orig_inst_list, list_to_build_up);
else
{
- abort ();
+ ABORT ();
tem = Qnil;
}
tem = Qnil;
}
@@
-2494,7
+2494,7
@@
specifier_instance_from_inst_list (Lisp_Object specifier,
/* The instantiate method is allowed to call eval. Since it
is quite common for this function to get called from somewhere in
redisplay we need to make sure that quits are ignored. Otherwise
/* The instantiate method is allowed to call eval. Since it
is quite common for this function to get called from somewhere in
redisplay we need to make sure that quits are ignored. Otherwise
- Fsignal will abort. */
+ Fsignal will ABORT. */
specbind (Qinhibit_quit, Qt);
LIST_LOOP (rest, inst_list)
specbind (Qinhibit_quit, Qt);
LIST_LOOP (rest, inst_list)
@@
-2580,7
+2580,7
@@
specifier_instance (Lisp_Object specifier, Lisp_Object matchspec,
No. Errors are handled in Lisp primitives implementation.
Invalid domain is a design error here - kkm. */
No. Errors are handled in Lisp primitives implementation.
Invalid domain is a design error here - kkm. */
- abort ();
+ ABORT ();
if (NILP (buffer) && !NILP (window))
buffer = WINDOW_BUFFER (XWINDOW (window));
if (NILP (buffer) && !NILP (window))
buffer = WINDOW_BUFFER (XWINDOW (window));
@@
-2591,7
+2591,7
@@
specifier_instance (Lisp_Object specifier, Lisp_Object matchspec,
really went wrong. */
device = FRAME_DEVICE (XFRAME (frame));
really went wrong. */
device = FRAME_DEVICE (XFRAME (frame));
- /* device had better be determined by now; abort if not. */
+ /* device had better be determined by now; ABORT if not. */
tag = DEVICE_CLASS (XDEVICE (device));
depth = make_int (1 + XINT (depth));
tag = DEVICE_CLASS (XDEVICE (device));
depth = make_int (1 + XINT (depth));