| /macosx-10.9.5/ruby-104/ruby/lib/ |
| H A D | prettyprint.rb | 41 def PrettyPrint.format(output='', maxwidth=79, newline="\n", genspace=lambda {|n| ' ' * n})
82 @genspace = genspace || lambda {|n| ' ' * n}
|
| /macosx-10.9.5/swig-10/Lib/python/ |
| H A D | pythonkw.swg | 33 PYTHONKW(lambda);
|
| /macosx-10.9.5/emacs-92/emacs/lisp/ |
| H A D | dired-aux.el | 157 (lambda ()
162 (lambda ()
202 (lambda (file-name)
534 (function (lambda (&rest files)
562 (lambda (x)
568 (lambda (x) (concat command dired-mark-separator x)))))
1348 (lambda (from)
1503 (lambda (from)
1505 (function (lambda (from) target)))
1664 (lambda (fro
[all...] |
| H A D | dabbrev.el | 63 ;; (lambda (buffer)
408 (mapc (function (lambda (string)
412 (mapc (function (lambda (string)
417 (mapc (function (lambda (string)
421 (mapc (function (lambda (string)
818 (walk-windows (lambda (w)
|
| H A D | printing.el | 2803 (lambda (s) (if (stringp s) (intern s) s))))
2827 #'(lambda (text) (list :help text))))) ; GNU Emacs
4984 #'(lambda (elt)
5282 (mapcar #'(lambda (option)
5293 (mapcar #'(lambda (option)
5325 #'(lambda (option)
5330 #'(lambda (option)
5337 #'(lambda (option)
5502 (let ((collection (mapcar #'(lambda (elt)
5848 (mapcar #'(lambda (fil
[all...] |
| H A D | help.el | 339 (lambda (file)
351 (sort (delete-dups res) (lambda (a b) (string< b a)))))
436 (princ (mapconcat (lambda (key)
503 (mapatoms (lambda (symbol)
807 (lambda (a b) (string-lessp (cadr a) (cadr b)))))
890 (mapcar (lambda (x)
941 (defcustom temp-buffer-max-height (lambda (buffer) (/ (- (frame-height) 2) 2))
|
| H A D | vc-rcs.el | 676 (lambda (rda w)
678 (lambda (rda w)
1119 (lambda () t)
1132 (lambda ()
1133 (mapcar (lambda (together)
1157 (lambda ()
1170 (lambda ()
|
| H A D | ffap.el | 496 (function (lambda (sym) (and (fboundp sym) (setq found sym))))
717 (lambda (d)
737 (lambda (dir)
1302 ;; action == lambda, documented where? Tests whether string is a
1521 (mapcar (function (lambda (i) (cons (car i) i)))
1573 (lambda (a b) (string-lessp (car a) (car b))))))
1582 (lambda (a b) (< (cdr a) (cdr b)))))))
1678 (mapc (lambda (b) (with-current-buffer b (toggle-read-only 1)))
1687 (mapc (lambda (b) (with-current-buffer b (toggle-read-only 1)))
1696 (mapc (lambda (
[all...] |
| /macosx-10.9.5/emacs-92/emacs/lisp/calendar/ |
| H A D | cal-china.el | 434 '(lambda (x) (> x 44))
438 '(lambda (x) (and (<= 1 x) (<= x 60)))
456 '(lambda (x) (and (<= 1 x) (<= x last))))))
465 (mapcar '(lambda (x)
471 (mapcar '(lambda (x)
|
| /macosx-10.9.5/emacs-92/emacs/lisp/emacs-lisp/ |
| H A D | byte-opt.el | 42 ;; (apply (lambda (x &rest y) ...) 1 (foo))
69 ;; referring to the bindings that the lambda arglist established.)
153 ;; (disassemble (lambda (x) (+ (+ (foo) 1) (+ (bar) 2))))
156 ;; (disassemble (lambda (x) (cons (+ x 1) (- x 1))))
160 ;; (disassemble (lambda (x) (and (point) (foo))))
169 ;; (disassemble (lambda (x) (eq (if (point) 'a 'b) 'c)))
170 ;; (disassemble (lambda (x) (if (point) (eq 'a 'c) (eq 'b 'c))))
173 ;; (disassemble (lambda (x) (car (cons (foo) 42))))
176 ;; (disassemble (lambda (x) (cdr (cons 42 (foo)))))
179 ;; (disassemble (lambda (
[all...] |
| H A D | edebug.el | 290 (defun edebug-lambda-list-keywordp (object)
291 "Return t if OBJECT is a lambda list keyword.
292 A lambda list keyword is a symbol that starts with `&'."
312 (walk-windows (lambda (w) (push w window-list)))
339 (lambda (e1 e2)
403 (walk-windows (lambda (w)
414 (mapcar (lambda (buf-point)
423 (mapcar (function (lambda (window)
437 (lambda (one-window-info)
440 (lambda (windo
2033 (def-edebug-spec lambda (&define lambda-list function
[all...] |
| /macosx-10.9.5/emacs-92/emacs/lisp/mh-e/ |
| H A D | mh-alias.el | 83 (lambda (file)
104 (lambda (file)
437 (let ((autolist (delq nil (mapcar (lambda (file)
467 (lambda (alias)
639 '(lambda (elem)
|
| H A D | mh-e.el | 914 (mapcar (lambda (x) (list (car x))) (mh-variants))
916 (let ((valid-list (mapcar (lambda (x) (car x)) (mh-variants))))
935 (mapconcat '(lambda (x) (format "%s" (car x)))
959 ,@(mapcar (lambda (x) `(const ,(car x))) (mh-variants)))
960 :set (lambda (symbol value)
1483 :set (lambda (symbol value)
1536 (function (lambda (arg) `(const ,arg)))
1563 (mapcar (function (lambda (arg) `(const ,arg)))
1660 :set (lambda (symbol value)
2620 :set (lambda (symbo
[all...] |
| H A D | mh-utils.el | 282 (lambda ()
420 (sort cache-entry (lambda (x y) (string< (car x) (car y)))))
560 (mapcar #'(lambda (x)
616 (setq results (mapcar (lambda (f)
703 `all-completions', or the symbol lambda for `test-completion'.
720 (mapcar (lambda (x)
730 (mapcar (lambda (x)
734 ((eq flag 'lambda)
|
| /macosx-10.9.5/emacs-92/emacs/lisp/gnus/ |
| H A D | mml.el | 934 (lambda () (interactive) (setq mml-secure-method "pgpmime"))
940 (lambda () (interactive) (setq mml-secure-method "smime"))
946 (lambda () (interactive) (setq mml-secure-method "pgp"))
976 ["Emacs MIME manual" (lambda () (interactive) (message-info 4))
979 ["PGG manual" (lambda () (interactive) (message-info 16))
1284 (lambda ()
1287 (local-set-key "q" (lambda () (interactive) (kill-buffer nil)))
1288 (local-set-key "=" (lambda () (interactive) (delete-other-windows)))
1290 (lambda ()
1294 (lambda (even
[all...] |
| H A D | gnus-agent.el | 671 (function (lambda () (funcall message-send-mail-function))))
680 (lambda (server-or-method)
797 (mapcar (lambda (cat) (list (symbol-name (car cat))))
804 (lambda (group)
818 (lambda (group)
993 (mapcar (lambda (server-or-method)
1008 (mapcar (lambda (method)
1091 (headers (sort (mapcar (lambda (h)
2033 (lambda (comp-list)
2038 (mapcar (lambda (articl
[all...] |
| H A D | imap.el | 901 (lambda (user passwd)
906 (lambda (challenge)
924 (lambda (user passwd)
950 (lambda (user passwd)
955 (lambda (challenge)
1184 (lambda (s)
1275 `(lambda (tag status)
1329 (imap-mailbox-map-1 (lambda (mailbox)
1337 (imap-mailbox-map-1 (lambda (mailbox)
1353 (imap-mailbox-map-1 (lambda (mailbo
[all...] |
| H A D | nnimap.el | 510 (imap-message-map (lambda (uid Uid)
596 (mapcar (lambda (msgid)
824 (mapcar (lambda (server) (nnimap-close-server (car server)))
847 `(lambda ()
980 (mapcar (lambda (p)
1146 (mapcar (lambda (pred)
1211 (mapcar (lambda (mark)
1562 (mapcar (lambda (old-acl)
1568 (mapcar (lambda (new-acl)
1596 (lambda (pai
[all...] |
| /macosx-10.9.5/emacs-92/emacs/lisp/international/ |
| H A D | mule-cmds.el | 438 (let* ((from-categories (mapcar #'(lambda (x) (symbol-value x))
444 (lambda (x)
490 (sort codings (function (lambda (x y)
663 (mapcar #'(lambda (coding)
666 (mapcar #'(lambda (pos)
671 (mapcar #'(lambda (pos)
714 (goto-char (apply 'min (mapcar #'(lambda (x) (car (cadr x)))
754 #'(lambda (bufname pos)
759 #'(lambda (bufname pos coding)
899 (mapcar (function (lambda (
[all...] |
| /macosx-10.9.5/emacs-92/emacs/lisp/calc/ |
| H A D | calc-store.el | 176 (lambda (x)
181 (lambda (x)
194 (mapcar (lambda (x) (substring x 4))
197 (lambda (x) (boundp (intern (concat "var-" x)))))
327 (lambda (v)
599 (lambda (x)
640 (lambda (x)
|
| /macosx-10.9.5/emacs-92/emacs/lisp/net/ |
| H A D | browse-url.el | 166 ;; (lambda ()
170 ;; (add-hook 'rmail-mode-hook (lambda () ; rmail-mode startup
190 ;; (lambda ()
192 ;; (lambda ()
772 ;; and apply the function (which might be a lambda).
879 (lambda (&ignore args) (error "No usable browser found"))))
925 `(lambda (process change)
996 `(lambda (process change)
1061 `(lambda (process change)
1111 `(lambda (proces
[all...] |
| /macosx-10.9.5/emacs-92/emacs/lisp/play/ |
| H A D | zone.el | 125 (mapcar (lambda (elem)
167 (setq restore `(lambda () ,@restore (setq restore nil)))
401 (mapcar (lambda (ent)
435 (zone-pgm-rotate (lambda () 1)))
438 (zone-pgm-rotate (lambda () -1)))
441 (zone-pgm-rotate (lambda () (1+ (random 3)))))
444 (zone-pgm-rotate (lambda () (1- (- (random 3))))))
|
| /macosx-10.9.5/ruby-104/ruby/test/ruby/ |
| H A D | test_object.rb | 662 obj = lambda {
674 lambda {
683 lambda {
692 lambda {
701 lambda {
716 b = lambda {
723 b = lambda {
|
| /macosx-10.9.5/emacs-92/emacs/lisp/erc/ |
| H A D | erc-dcc.el | 229 (lambda (str)
379 (chat (mapcar (lambda (elt) (plist-get elt :nick))
381 #'(lambda (elt)
385 (mapcar (lambda (elt) (symbol-name (plist-get elt :type)))
389 #'(lambda (elt)
395 (get (mapcar (lambda (elt) (plist-get elt :file))
397 #'(lambda (elt)
405 #'(lambda (elt)
749 '((lambda (proc)
|
| /macosx-10.9.5/emacs-92/emacs/lisp/progmodes/ |
| H A D | etags.el | 766 (lambda (sym) (intern (symbol-name sym) combined-table))
1205 (mapc (lambda (elt) (set (make-local-variable (car elt)) (cdr elt)))
1392 'action (lambda (button)
1421 (ins-symb (lambda (sy)
1427 'action (lambda (button) (funcall
1481 'action (lambda (button)
1493 'action (lambda (button)
1539 (mapc (lambda (sym) (set (make-local-variable sym) 'ignore))
1547 (lambda () (zerop (buffer-size))))))
|