Mercurial > hg > Members > kono > nitros9-code

comparison 3rdparty/packages/uemacs/uemain1.c @ 1869:a51439f6b206

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Massive checkin
author boisy
date Sat, 30 Jul 2005 03:36:05 +0000
parents 48c646212b1c
children
comparison
equal deleted inserted replaced
1868:cba8a54bc509 1869:a51439f6b206
23 * ?.? Robert Larson 23 * ?.? Robert Larson
24 * - Os9/68000 version (OSK) 24 * - Os9/68000 version (OSK)
25 * - Fixes to ^X= command 25 * - Fixes to ^X= command
26 */ 26 */
27 27
28 /* #include <stdio.h> */ 28 #include <stdio.h>
29 #include "ueed.h" 29 #include "ueed.h"
30 #ifdef VMS 30 #ifdef VMS
31 #include <ssdef.h> 31 #include <ssdef.h>
32 #define GOOD (SS$_NORMAL) 32 #define GOOD (SS$_NORMAL)
33 #endif 33 #endif
111 } 111 }
112 } 112 }
113 if (c == (CTRL|'X')) /* ^X is a prefix */ 113 if (c == (CTRL|'X')) /* ^X is a prefix */
114 c = CTLX | getctl(); 114 c = CTLX | getctl();
115 if (kbdmip != NULL) { /* Save macro strokes. */ 115 if (kbdmip != NULL) { /* Save macro strokes. */
116 if (c!=(CTLX|')') && kbdmip>&kbdm[NKBDM-6]) { 116 if (kbdmip == kbdm[NKBDM-6])
117 /* if (c != ( CTLX | ')' ) && kbdmip > &kbdm[NKBDM-6]) */
118 {
117 ctrlg(FALSE, 0); 119 ctrlg(FALSE, 0);
118 goto loop; 120 goto loop;
119 } 121 }
120 if (f != FALSE) { 122 if (f != FALSE) {
121 *kbdmip++ = (CTRL|'U'); 123 *kbdmip++ = (CTRL|'U');