Lines Matching defs:separate
122 ;;; `speedbar': Provides a separate file browser, and the capability for each
301 (defcustom ada-indent-is-separate t
302 "*Non-nil means indent 'is separate' or 'is abstract' if on a single line."
394 "*Number of columns to indent the end of a statement on a separate line.
484 "reverse" "select" "separate" "subtype" "task" "terminate" "then"
547 (defconst ada-align-region-separate
567 "See the variable `align-region-separate' for more information.")
647 "^[ \t]*separate[ \t]*(\\(\\sw\\|[_.]\\)+)" "\\|"
671 '("is" "separate" "end" "declare" "if" "new" "begin" "generic" "when") t)
1163 (set (make-local-variable 'paragraph-separate) "[ \t\n\f]*$")
1262 ;; A "separate" clause.
1263 (cons "^separate[ \t\n]*(\\(\\(\\sw\\|[_.]\\)+\\))"
1293 (set (make-local-variable 'align-region-separate) ada-align-region-separate)
2030 ;; does paramlist already start on a separate line ?
2386 ;; if 'loop' is not on a separate line
2534 (if (and ada-indent-is-separate
2539 (looking-at "\\<abstract\\>\\|\\<separate\\>")))
2680 ;; new/abstract/separate
2683 ((looking-at "\\(new\\|abstract\\|separate\\)\\>")
2785 ((looking-at "separate\\>")
2979 ;; 'then' first in separate line ?
3063 ;; is abstract/separate/new ...
3070 "\\<\\(separate\\|new\\|abstract\\)\\>"
3433 '("separate" "access" "array"
3802 ;; or package Foo is separate;
3805 (if (and (not (looking-at "\\<\\(new\\|separate\\|begin\\)\\>"))
3902 ;; found 'if' => skip to 'then', if it's on a separate line
5269 "select" "separate" "synchronized" "tagged" "task" "terminate"