comparison src/cmdloop.c @ 189:489f57a838ef r20-3b21

Import from CVS: tag r20-3b21
author cvs
date Mon, 13 Aug 2007 09:57:07 +0200
parents 3d6bfa290dbd
children 262b8bb4a523
comparison
equal deleted inserted replaced
188:e29a8e7498d9 189:489f57a838ef
495 Don't call this unless you know what you're doing. 495 Don't call this unless you know what you're doing.
496 */ 496 */
497 ()) 497 ())
498 { 498 {
499 /* This function can GC */ 499 /* This function can GC */
500 Lisp_Object event = Fmake_event (); 500 Lisp_Object event = Fmake_event (Qnil, Qnil);
501 Lisp_Object old_loop = Qnil; 501 Lisp_Object old_loop = Qnil;
502 struct gcpro gcpro1, gcpro2; 502 struct gcpro gcpro1, gcpro2;
503 int was_locked = in_single_console_state (); 503 int was_locked = in_single_console_state ();
504 GCPRO2 (event, old_loop); 504 GCPRO2 (event, old_loop);
505 505