* SPECPDL_INDEX
@ 2009-01-06 13:01 A. Soare
0 siblings, 0 replies; 2+ messages in thread
From: A. Soare @ 2009-01-06 13:01 UTC (permalink / raw
To: Emacs Help [help-gnu-emacs]
Can someone illuminate me what is the purpose of the `count' variable in the function `redisplay', please?
Thanks in advance.
____________________________________________________Des photos de vacances ou des vidéos de réveillons à partager ? Voila vous offre 1 Go d’espace de stockage sur http://www.voila.fr/Macle/
^ permalink raw reply [flat|nested] 2+ messages in thread
* Re: SPECPDL_INDEX
[not found] <mailman.4114.1231246917.26697.help-gnu-emacs@gnu.org>
@ 2009-01-06 15:03 ` Andreas Politz
0 siblings, 0 replies; 2+ messages in thread
From: Andreas Politz @ 2009-01-06 15:03 UTC (permalink / raw
To: help-gnu-emacs
A. Soare wrote:
> Can someone illuminate me what is the purpose of the `count' variable in the function `redisplay', please?
>
>
> Thanks in advance.
DEFUN ("redisplay", Fredisplay, Sredisplay, 0, 1, 0,
doc: /* Perform redisplay if no input is available.
If optional arg FORCE is non-nil or `redisplay-dont-pause' is non-nil,
perform a full redisplay even if input is available.
Return t if redisplay was performed, nil otherwise. */)
(force)
Lisp_Object force;
{
int count;
swallow_events (1);
if ((detect_input_pending_run_timers (1)
&& NILP (force) && !redisplay_dont_pause)
|| !NILP (Vexecuting_kbd_macro))
return Qnil;
count = SPECPDL_INDEX ();
if (!NILP (force) && !redisplay_dont_pause)
specbind (Qredisplay_dont_pause, Qt);
redisplay_preserve_echo_area (2);
unbind_to (count, Qnil);
return Qt;
}
I think it's an index into the variable binding stack to which the
c-function unwind_to later restores state.
Maybe take a look at the definition of the let form in eval.c .
-ap
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2009-01-06 15:03 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2009-01-06 13:01 SPECPDL_INDEX A. Soare
[not found] <mailman.4114.1231246917.26697.help-gnu-emacs@gnu.org>
2009-01-06 15:03 ` SPECPDL_INDEX Andreas Politz
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.