Mercurial > hg > xemacs-beta
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 |