HCoop
/
bpt
/
emacs.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(EMACS_TIME_NEG_P): Cast to signed.
[bpt/emacs.git]
/
src
/
casetab.c
diff --git
a/src/casetab.c
b/src/casetab.c
index
7ad648c
..
5b99d44
100644
(file)
--- a/
src/casetab.c
+++ b/
src/casetab.c
@@
-1,5
+1,5
@@
/* GNU Emacs routines to deal with case tables.
/* GNU Emacs routines to deal with case tables.
- Copyright (C) 19
87
Free Software Foundation, Inc.
+ Copyright (C) 19
93
Free Software Foundation, Inc.
This file is part of GNU Emacs.
This file is part of GNU Emacs.
@@
-19,7
+19,7
@@
the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
/* Written by Howard Gayle. See chartab.c for details. */
/* Written by Howard Gayle. See chartab.c for details. */
-#include
"config.h"
+#include
<config.h>
#include "lisp.h"
#include "buffer.h"
#include "lisp.h"
#include "buffer.h"
@@
-76,8
+76,7
@@
DEFUN ("current-case-table", Fcurrent_case_table, Scurrent_case_table, 0, 0, 0,
return Fcons (down, Fcons (up, Fcons (canon, Fcons (eqv, Qnil))));
}
return Fcons (down, Fcons (up, Fcons (canon, Fcons (eqv, Qnil))));
}
-DEFUN ("standard-case-table", Fstandard_case_table,
- Sstandard_case_table, 0, 0, 0,
+DEFUN ("standard-case-table", Fstandard_case_table, Sstandard_case_table, 0, 0, 0,
"Return the standard case table.\n\
This is the one used for new buffers.")
()
"Return the standard case table.\n\
This is the one used for new buffers.")
()
@@
-111,8
+110,7
@@
Both CANONICALIZE and EQUIVALENCES may be nil, in which case\n\
return set_case_table (table, 0);
}
return set_case_table (table, 0);
}
-DEFUN ("set-standard-case-table",
- Fset_standard_case_table, Sset_standard_case_table, 1, 1, 0,
+DEFUN ("set-standard-case-table", Fset_standard_case_table, Sset_standard_case_table, 1, 1, 0,
"Select a new standard case table for new buffers.\n\
See `set-case-table' for more info on case tables.")
(table)
"Select a new standard case table for new buffers.\n\
See `set-case-table' for more info on case tables.")
(table)