Searched +refs:cl +refs:block +refs:throw (Results 1 - 4 of 4) sorted by relevance

/macosx-10.9.5/emacs-92/emacs/lisp/progmodes/
H A Didlwave.el127 ;; point backward, e.g., "\cl" expanded with a space becomes
139 ;; Muti-statement lines (using "&") on block begin and end lines can
141 ;; line: endif & endif. Using "&" outside of block begin/end lines
158 (eval-when-compile (require 'cl))
205 (defcustom idlwave-main-block-indent 2
206 "*Extra indentation for the main block of code.
207 That is the block between the FUNCTION/PRO statement and the END
212 (defcustom idlwave-block-indent 3
213 "*Extra indentation applied to block lines.
219 "*Extra indentation applied to block EN
[all...]
/macosx-10.9.5/emacs-92/emacs/lisp/emacs-lisp/
H A Dcl.el0 ;;; cl.el --- Common Lisp extensions for Emacs -*-byte-compile-dynamic: t;-*-
34 ;; rewrite of Cesar Quiroz's original cl.el package of December 1986.
52 ;; * Added "cl-compat.el" file, extra compatibility with old package.
81 ;; * Moved most sequence functions to a new file, cl-seq.el.
82 ;; * Moved `eval-when' into cl-macs.el.
83 ;; * Moved `pushnew' and `adjoin' to cl.el for most common cases.
97 (defvar cl-optimize-speed 1)
98 (defvar cl-optimize-safety 1)
112 (add-hook 'cl-unload-hook 'cl
[all...]
H A Dcl-extra.el0 ;;; cl-extra.el --- Common Lisp features, part 2 -*-byte-compile-dynamic: t;-*-
33 ;; rewrite of Cesar Quiroz's original cl.el package of December 1986.
42 (require 'cl)
90 (defun cl-mapcar-many (cl-func cl-seqs)
91 (if (cdr (cdr cl-seqs))
92 (let* ((cl-res nil)
93 (cl-n (apply 'min (mapcar 'length cl
[all...]
/macosx-10.9.5/emacs-92/emacs/lisp/textmodes/
H A Dorg.el70 (require 'cl)
4205 (if (bobp) (throw 'exit nil))))))
4341 (throw 'exit nil))
4351 (throw 'exit nil))
4363 (throw 'exit nil))
4370 (throw 'exit nil))
4882 (throw 'exit nil)))
5107 (throw 'exit t))
5219 If the cursor is not in an item, throw an error."
5233 (if (< (point) limit) (throw 'exi
[all...]

Completed in 115 milliseconds