diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-03-05 23:55:20 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-03-05 23:55:20 +0000 |
| commit | 88dbfee5902f8d134566b5e8c0ef1a79c7154dc7 (patch) | |
| tree | 3ad79aebb810b2ac9e5f62c501c742332d6bc92d /src/lisp.h | |
| parent | 736471d10e986e80535d7be347d63d84a995bcf1 (diff) | |
| download | emacs-88dbfee5902f8d134566b5e8c0ef1a79c7154dc7.tar.gz | |
(CHAR_META, CHAR_SHIFT, CHAR_CTL): New macros.
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/src/lisp.h b/src/lisp.h index 371a7afde86..3a94a38b1b3 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -568,6 +568,12 @@ typedef unsigned char UCHAR; #define COMPILED_STACK_DEPTH 3 #define COMPILED_DOC_STRING 4 #define COMPILED_INTERACTIVE 5 + +/* Flag bits in a character. */ + +#define CHAR_META 0x800000 +#define CHAR_CTL 0x400000 +#define CHAR_SHIFT 0x200000 /* Data type checking */ @@ -995,7 +1001,7 @@ extern Lisp_Object Vpurify_flag; extern Lisp_Object Fcons (), Flist(), Fmake_list (); extern Lisp_Object Fmake_vector (), Fvector (), Fmake_symbol (), Fmake_marker (); extern Lisp_Object Fmake_string (), build_string (), make_string (); -extern Lisp_Object make_array (), make_uninit_string (); +extern Lisp_Object make_event_array (), make_uninit_string (); extern Lisp_Object Fpurecopy (), make_pure_string (); extern Lisp_Object pure_cons (), make_pure_vector (); extern Lisp_Object Fgarbage_collect (); |