Function: antlr-delphi-indent-action-line

antlr-delphi-indent-action-line is a byte-compiled function defined in antlr-mode.el.gz.

Signature

(antlr-delphi-indent-action-line BOA)

Documentation

Indent the current line in a Delphi (opascal) action.

Argument BOA is the start position of the action.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/antlr-mode.el.gz
(defun antlr-delphi-indent-action-line (boa)
  "Indent the current line in a Delphi (opascal) action.
Argument BOA is the start position of the action."
  (narrow-to-region (1+ boa) (line-end-position))
  ;; make Pascal mode only checks the code fragment after the opening brace,
  ;; otherwise its indentation gets confused as {...} are block comments
  (opascal-indent-line)
  ;; or use low-level `opascal-corrected-indentation' - but that does not have
  ;; a docstring, i.e. not really official ?
  (widen)
  (unless (memq (char-after (line-beginning-position)) '(?\ ?\t))
    ;; no indentation -> considered top-level -> indentation can also be
    ;; performed by c-mode
    (c-indent-line)))