comparison src/cmdloop.c @ 272:c5d627a313b1 r21-0b34

Import from CVS: tag r21-0b34
author cvs
date Mon, 13 Aug 2007 10:28:48 +0200
parents 262b8bb4a523
children 7df0dd720c89
comparison
equal deleted inserted replaced
271:c7b7086b0a39 272:c5d627a313b1
61 Lisp_Object Qreally_early_error_handler; 61 Lisp_Object Qreally_early_error_handler;
62 62
63 /* Variable defined in Lisp. */ 63 /* Variable defined in Lisp. */
64 Lisp_Object Qerrors_deactivate_region; 64 Lisp_Object Qerrors_deactivate_region;
65 65
66 Lisp_Object Qtop_level;
67
66 static Lisp_Object command_loop_1 (Lisp_Object dummy); 68 static Lisp_Object command_loop_1 (Lisp_Object dummy);
69 EXFUN (Fcommand_loop_1, 0);
67 70
68 /* There are two possible command loops -- one written entirely in 71 /* There are two possible command loops -- one written entirely in
69 C and one written mostly in Lisp, except stuff written in C for 72 C and one written mostly in Lisp, except stuff written in C for
70 speed. The advantage of the Lisp command loop is that the user 73 speed. The advantage of the Lisp command loop is that the user
71 can specify their own command loop to use by changing the variable 74 can specify their own command loop to use by changing the variable