Mercurial > hg > xemacs-beta
comparison src/event-stream.c @ 707:a307f9a2021d
[xemacs-hg @ 2001-12-20 05:49:28 by andyp]
sync with 21-4-6-windows
author | andyp |
---|---|
date | Thu, 20 Dec 2001 05:49:48 +0000 |
parents | fdefd0186b75 |
children | b1f74adcc1ff |
comparison
equal
deleted
inserted
replaced
706:c9bf82d465b5 | 707:a307f9a2021d |
---|---|
4288 Lisp_Object event = Fmake_event (Qnil, Qnil); | 4288 Lisp_Object event = Fmake_event (Qnil, Qnil); |
4289 int speccount = specpdl_depth (); | 4289 int speccount = specpdl_depth (); |
4290 struct gcpro gcpro1; | 4290 struct gcpro gcpro1; |
4291 GCPRO1 (event); | 4291 GCPRO1 (event); |
4292 | 4292 |
4293 record_unwind_protect (Fset_buffer, Fcurrent_buffer ()); | |
4293 if (!NILP (prompt)) | 4294 if (!NILP (prompt)) |
4294 CHECK_STRING (prompt); | 4295 CHECK_STRING (prompt); |
4295 /* else prompt = Fkeymap_prompt (current_buffer->keymap); may GC */ | 4296 /* else prompt = Fkeymap_prompt (current_buffer->keymap); may GC */ |
4296 QUIT; | 4297 QUIT; |
4297 | 4298 |