From: Joakim Verona <joakim@verona.se>
Date: Mon, 10 Sep 2012 14:03:53 +0000 (+0200)
Subject: upstream
X-Git-Tag: emacs-25.0.90~3282
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b035a30e5cd2f34fedc04c253eeb5a11afed8145;p=emacs.git

upstream
---

b035a30e5cd2f34fedc04c253eeb5a11afed8145
diff --cc lisp/emacs-lisp/cl-loaddefs.el
index d4da1f59a85,c12e8ccacb1..f2bc7cc9d3c
--- a/lisp/emacs-lisp/cl-loaddefs.el
+++ b/lisp/emacs-lisp/cl-loaddefs.el
@@@ -260,9 -259,20 +259,20 @@@ Remove from SYMBOL's plist the propert
  ;;;;;;  cl-do cl-loop cl-return-from cl-return cl-block cl-etypecase
  ;;;;;;  cl-typecase cl-ecase cl-case cl-load-time-value cl-eval-when
  ;;;;;;  cl-destructuring-bind cl-function cl-defmacro cl-defun cl-gentemp
- ;;;;;;  cl-gensym) "cl-macs" "cl-macs.el" "a1ca04b3f2acc7c9b06f45ef5486d443")
+ ;;;;;;  cl-gensym cl--compiler-macro-cXXr cl--compiler-macro-list*)
 -;;;;;;  "cl-macs" "cl-macs.el" "6d0676869af66e5b5a671f95ee069461")
++;;;;;;  "cl-macs" "cl-macs.el" "00526d56a1062b9c308cf37b59374f2b")
  ;;; Generated autoloads from cl-macs.el
  
+ (autoload 'cl--compiler-macro-list* "cl-macs" "\
+ 
+ 
+ \(fn FORM ARG &rest OTHERS)" nil nil)
+ 
+ (autoload 'cl--compiler-macro-cXXr "cl-macs" "\
+ 
+ 
+ \(fn FORM X)" nil nil)
+ 
  (autoload 'cl-gensym "cl-macs" "\
  Generate a new uninterned symbol.
  The name is made by appending a number to PREFIX, default \"G\".
diff --cc src/xdisp.c
index fcd76c94681,bec9ec91d2f..df402cd106e
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@@ -7344,10 -7304,10 +7345,10 @@@ set_iterator_to_next (struct it *it, in
        if (it->method == GET_FROM_STRING)
  	goto consider_string_end;
        break;
 -
 +#endif
      default:
        /* There are no other methods defined, so this should be a bug.  */
-       abort ();
+       emacs_abort ();
      }
  
    eassert (it->method != GET_FROM_STRING