Move gflags to eval.

This commit is contained in:
Renaud 2013-10-08 15:53:27 +08:00
parent 4da4c2f4de
commit 31b1cc84fb
5 changed files with 8 additions and 6 deletions

1
edef.h
View File

@ -29,7 +29,6 @@ extern int eolexist; /* does clear to EOL exist? */
extern int revexist; /* does reverse video exist? */
extern int flickcode; /* do flicker supression? */
extern int gmode; /* global editor mode */
extern int gflags; /* global control flag */
extern int gfcolor; /* global forgrnd color (white) */
extern int gbcolor; /* global backgrnd color (black) */
extern int gasave; /* global ASAVE size */

View File

@ -224,10 +224,6 @@
#define ENVFUNC 0
#endif
/* Emacs global flag bit definitions (for gflags). */
#define GFREAD 1
/* Internal constants. */
#define NBINDS 256 /* max # of bound keys */

2
eval.c
View File

@ -37,6 +37,8 @@
char outline[ NSTRING] ; /* global string to hold debug line text */
#endif
int gflags = GFREAD ; /* global control flag */
/* Max #chars in a var name. */
#define NVSIZE 10

6
eval.h
View File

@ -11,6 +11,12 @@ extern char outline[] ; /* Global string to hold debug line text. */
#endif
/* Emacs global flag bit definitions (for gflags). */
#define GFREAD 1
extern int gflags ; /* global control flag */
/* Macro argument token types */
#define TKNUL 0 /* end-of-string */

View File

@ -14,7 +14,6 @@ int eolexist = TRUE; /* does clear to EOL exist */
int revexist = FALSE; /* does reverse video exist? */
int flickcode = FALSE; /* do flicker supression? */
int gmode = 0; /* global editor mode */
int gflags = GFREAD; /* global control flag */
int gasave = 256; /* global ASAVE size */
int gacount = 256; /* count until next ASAVE */
int sgarbf = TRUE; /* TRUE if screen is garbage */