Lines Matching defs:defun
109 (defvar lisp-indent-defun-method '(4 &lambda &body))
112 (defun extended-loop-p (loop-start)
124 (defun common-lisp-loop-part-indentation (indent-point state)
140 (defun common-lisp-indent-function (indent-point state)
147 (defun common-lisp-indent-function-1 (indent-point state)
177 (let (tem function method tentative-defun)
220 (setq tentative-defun t))
229 ((eq method 'defun)
230 (setq method lisp-indent-defun-method)))
259 (if tentative-defun
262 function lisp-indent-defun-method
299 (defun common-lisp-indent-call-method (function method path state indent-point
309 (defun lisp-indent-report-bad-format (m)
316 (defun lisp-indent-259 (method path state indent-point
417 (defun lisp-indent-tagbody (path state indent-point sexp-column normal-indent)
443 (defun lisp-indent-do (path state indent-point sexp-column normal-indent)
457 (defun lisp-indent-defmethod (path state indent-point sexp-column
468 (get 'defun 'common-lisp-indent-function))
472 (defun lisp-indent-function-lambda-hack (path state indent-point
508 (defun (4 &lambda &body))
509 (define-setf-method . defun)
510 (define-setf-expander . defun)
511 (defmacro . defun) (defsubst . defun) (deftype . defun)
576 ;(defun foo (x)
617 ;(put 'defgeneric 'common-lisp-indent-function 'defun)