![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to emacs_cmds.h CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv9 / cmd / emacs|
Return to emacs_cmds.h CVS log | Up to [Research Unix] / researchv9 / cmd / emacs |
1.1 root 1: /* word and sentence stuff */
2:
3: /* EMACS_MODES: c !fill */
4:
5: #define WRDSEP 01 /* separates words */
6: #define WRDCHR 02 /* makes words */
7: #define WHITE 04 /* white space */
8: #define SENTE 010 /* ends sentences */
9:
10: char bits[128] = {
11: 05, 01, 01, 01, 01, 01, 01, 01,
12: 01, 05, 05, 01, 01, 05, 01, 01,
13: 01, 01, 01, 01, 01, 01, 01, 01,
14: 01, 01, 01, 01, 01, 01, 01, 01,
15: 05, 011, 01, 01, 01, 01, 01, 03,
16: 01, 01, 01, 01, 01, 01, 011, 01,
17: 02, 02, 02, 02, 02, 02, 02, 02,
18: 02, 02, 011, 01, 01, 01, 01, 011,
19: 03, 02, 02, 02, 02, 02, 02, 02,
20: 02, 02, 02, 02, 02, 02, 02, 02,
21: 02, 02, 02, 02, 02, 02, 02, 02,
22: 02, 02, 02, 01, 01, 01, 01, 01,
23: 02, 02, 02, 02, 02, 02, 02, 02,
24: 02, 02, 02, 02, 02, 02, 02, 02,
25: 02, 02, 02, 02, 02, 02, 02, 02,
26: 02, 02, 02, 01, 01, 01, 01, 01,
27: };
28:
29: char casem[128];
30:
31:
32: /* mark stuff */
33:
34: #define MARK struct markst
35:
36: struct markst {
37: int markl;
38: int markc;
39: };
40:
41: #define NMARKS 16
42: struct markst marks[NMARKS];
43:
44: /* command execution status */
45:
46: int cstatus; /* status from command */
47:
48: /* modes */
49:
50: int FILLMD = 1;
51: int FILLCOL = 72;
52: int SAVEMD = 0;
53: int SAVECHAR = 256;
54: int NSCHAR = 0;
55: int NLINS = 0;
56: int NOCASE = 0; /* caseless search */
57: int CKMAIL = 100; /* check mail interval */
58: int NLRUN = 0;
59: int USILENT = 0; /* invisible unix commands */
60: int NOECHO = 0; /* don't echo unix commands */
61: int srch_nl = 0; /* Terminate search on newline */
62:
63: /* C mode stuff */
64:
65: int comcol = 40;
66: int comln = 0;
67: int TABMD = 0;
68: int BACKP = 0;
69: int AUTOLOAD = 1;
70:
71: /* mode edit data */
72:
73: struct mdata {
74: char *modename;
75: int *modeloc;
76: char modetype;
77: char moderset;
78: };
79:
80: #define ONOFF 1
81: #define INT 2
82:
83: /* parameters that describe what should be reset following mode display */
84:
85: #define DISPLAY 1 /* re-display */
86: #define DSIZE 2 /* re-format display */
87: #define CSE 4 /* re-compute case map */
88: #define CTYPE 8 /* Need to recompute display types */
89:
90: extern int BINMODE;
91: extern int LNOWID;
92: extern int LNOMOD;
93: extern int TABSTOP;
94: extern int NOBEL;
95: extern int keepg;
96: extern int kbapp;
97: extern int ttywarp;
98: extern int NOTABS;
99: extern int ctlify;
100: extern int CONCHAR;
101: extern int PMODE;
102: extern int FLOWMIN;
103: extern int EOFNL;
104: extern int ttcnt;
105: #ifdef PC
106: extern int NORMATB;
107: #endif
108: int savelink = 0;
109: int timemd = 0;
110: int VERBOSE = 1;
111: int OVERW = 0;
112: int READONLY = 0;
113: extern int bit8;
114: extern int hcol;
115:
116: struct mdata mdata[] = {
117: "save",&SAVEMD,ONOFF,0,
118: "savetype",&SAVECHAR,INT,0,
119: "fill",&FILLMD,ONOFF,0,
120: "lnumb",&LNOMOD,ONOFF,DISPLAY,
121: "c",&TABMD,ONOFF,0,
122: "tabstop",&TABSTOP,INT,DISPLAY,
123: "comcol",&comcol,INT,0,
124: "fillcol",&FILLCOL,INT,0,
125: "height",&SCRLINES,INT,DISPLAY+DSIZE,
126: "width", &SCRWID,INT,DISPLAY+DSIZE,
127: "backspace",&BACKP,ONOFF,DISPLAY|CTYPE,
128: "time",&timemd,ONOFF,0,
129: "verbose",&VERBOSE,ONOFF,0,
130: "overwrite",&OVERW,ONOFF,0,
131: "nobell", &NOBEL, ONOFF,0,
132: "lnowid", &LNOWID, INT,DISPLAY,
133: "keepscroll", &keepg, INT,DISPLAY,
134: "rigid_newline", &NLINS, ONOFF, 0,
135: "caseless", &NOCASE, ONOFF, CSE,
136: "mailtype",&CKMAIL, INT, 0,
137: "end_newline",&NLRUN, ONOFF, 0,
138: #ifdef PC
139: "binary",&BINMODE, ONOFF, 0,
140: "attrib",&NORMATB, INT, DISPLAY,
141: #else
142: "tspeed",&ttywarp, INT, 0,
143: #endif PC
144: "usilent",&USILENT, ONOFF, 0,
145: "noecho",&NOECHO, ONOFF, 0,
146: "readonly",&READONLY, ONOFF, 0,
147: "notabs",&NOTABS, ONOFF, DISPLAY|CTYPE,
148: "controlify",&ctlify,ONOFF,0,
149: "ctl_char",&CONCHAR, INT, 0,
150: "display_percent",&PMODE,ONOFF,0,
151: "picture",&PICMODE,ONOFF,DISPLAY,
152: "nodelete",&NODEL,ONOFF,0,
153: "flow_lim",&FLOWMIN,INT,0,
154: "eofnl",&EOFNL,ONOFF,0,
155: "savelink",&savelink,ONOFF,0,
156: "search_newline",&srch_nl,ONOFF,0,
157: "autoload",&AUTOLOAD,ONOFF,0,
158: "7bit_ascii",&bit8,ONOFF,DISPLAY|CTYPE,
159: "leftmargin",&hcol,INT,DISPLAY,
160: };
161: #define NMODES (sizeof(mdata) / sizeof(struct mdata))
162:
163:
164:
165: #define NMAC 31 /* Macro hash table size */
166:
167: int machash[NMAC];
168:
169: #define MACEXIT if (infrn>=0) return(0)
170:
171: /* saved search and replace strings */
172:
173: char presst[128];
174: char rstring[128];
175:
176: /* function defns */
177:
178: MARK *markptr();
179: extern int junked;
180: extern int numarg;
181: char *mstrcpy();
182: char *expenv();
183: char *getenv();
184: extern FILE *fdopen();
185: extern int loc2;
186: extern char *endput;
187: extern int macptr;
188: extern int fbkno;
189: extern char *inget();
190: extern char *nscan();
191: extern char *hmap();
192: extern int curbf;
193: extern int nln;
194: extern int ncol;
195: extern int wbase;
196: extern int etrace;
197: extern char ctype[];
198: extern int metal;
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.