annotate src/s/cxux7.h @ 8076:3a35434b19d2

(safe_run_hooks): Take symbol as arg. Use Fsymbol_value and Fset. (command_loop_1): Pass symbol to safe_run_hooks. Look in the value cell to check for trivial case (no hooks). (read_key_sequence): Don't echo if echo_keystrokes is 0.
author Richard M. Stallman <rms@gnu.org>
date Tue, 28 Jun 1994 17:02:40 +0000
parents a5a7ee5afff7
children 695cf19ef79e
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
5574
a5a7ee5afff7 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
1 /* Define this symbol if you are running CX/UX 7.0 or later (7.0 introduced
a5a7ee5afff7 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
2 * support for ELF files, and while we still build emacs in COFF format, the
a5a7ee5afff7 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
3 * way it is linked is different for 7.0).
a5a7ee5afff7 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
4 */
a5a7ee5afff7 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
5 #define USING_CX_UX_7
a5a7ee5afff7 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
6
a5a7ee5afff7 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
7 #include "cxux.h"