-;; cl-specs.el - Edebug specs for cl.el
+;; cl-specs.el -- Edebug specs for cl.el
;; Copyright (C) 1993 Free Software Foundation, Inc.
-;; Author: Daniel LaLiberte <liberte@
+;; Author: Daniel LaLiberte <liberte@>
;; Keywords: lisp, tools, maint
;; This file is part of XEmacs.
;; Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
-;;; Synched up with:
Not in FSF
+;;; Synched up with:
(def-edebug-spec incf (place &optional form))
(def-edebug-spec decf incf)
-(def-edebug-spec push (form place))
+(def-edebug-spec push (form place))
&or [[&or ":test" ":test-not" ":key"] function-form]
-(def-edebug-spec pop (place))
+(def-edebug-spec pop (place))
(def-edebug-spec shiftf (&rest place)) ;; really [&rest place] form
(def-edebug-spec rotatef (&rest place))
;; form at the end could also handle "function",
;; but recognize it specially to avoid wrapping function forms.
(&or ([&or "quote" "function"] &or symbolp lambda-expr)
+ ("function*" )
- ;; [&optional &or "do" "doing"] ;; CLtL2 doesnt allow this.
+ ;; [&optional &or "do" "doing"] ;; CLtL2 doesnt allow this.
[[&optional &or "do" "doing"] &rest loop-non-atomic-expr]
(&or (loop-d-type-spec . [&or nil loop-d-type-spec]) cl-type-spec))
-;; cl-specs.el ends here
+;; cl-specs.el ends here