Lines Matching defs:lisp
30 ;; $XFree86: xc/programs/xedit/lisp/modules/progmodes/lisp.lsp,v 1.9 2003/01/30 02:46:26 paulo Exp $
62 (defsynoptions *lisp-DEFAULT-style*
81 (defvar *lisp-mode-options* *lisp-DEFAULT-style*)
83 (defindent *lisp-mode-indent* :main
226 (defun lisp-offset-indent (&aux char (point (scan (point) :eol :left)))
232 (defun lisp-should-indent (options &aux char point start)
240 (return-from lisp-should-indent))
249 (return-from lisp-should-indent (gethash :newline-indent options)))
252 (and (= point (1+ start)) (return-from lisp-should-indent t))
260 (return-from lisp-should-indent (<= point start)))
265 (defun lisp-indent (syntax syntable)
270 (or (lisp-should-indent options) (return-from lisp-indent))
275 *lisp-mode-indent*
276 (lisp-offset-indent)
279 (compile 'lisp-indent)
281 (defsyntax *lisp-mode* :main nil #'lisp-indent *lisp-mode-options*
304 ;; since lisp is very liberal in what can be a symbol, this pattern