Mercurial > emacs

changeset 49204:0feef1a06875

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Freverse): Use QUIT.
author Dave Love <fx@gnu.org>
date Mon, 13 Jan 2003 13:33:42 +0000
parents e4102c010ef4
children 5980231f9faa
files src/fns.c
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/fns.c	Mon Jan 13 13:26:21 2003 +0000
+++ b/src/fns.c	Mon Jan 13 13:33:42 2003 +0000
@@ -1815,7 +1815,10 @@
   Lisp_Object new;
 
   for (new = Qnil; CONSP (list); list = XCDR (list))
-    new = Fcons (XCAR (list), new);
+    {
+      QUIT;
+      new = Fcons (XCAR (list), new);
+    }
   if (!NILP (list))
     wrong_type_argument (Qconsp, list);
   return new;