Function: sqlind-maybe-exception-statement

sqlind-maybe-exception-statement is a natively compiled function defined in sql-indent.el.

Signature

(sqlind-maybe-exception-statement)

Documentation

If (point) is on an exception keyword, report its syntax.

See also sqlind-beginning-of-block

Source Code

;; Defined in /nix/store/jxjf2h9nnkdqnn1w1mr0ag8bqng2rlrs-emacs-packages-deps/share/emacs/site-lisp/elpa/sql-indent-1.7/sql-indent.el
(defun sqlind-maybe-exception-statement ()
  "If (point) is on an exception keyword, report its syntax.
See also `sqlind-beginning-of-block'"
  (when (and (looking-at "exception")
             (null sqlind-end-stmt-stack))
    ;; Exception is both a keyword and a type.  We need to only stop on the
    ;; keyword.  We detect that if the previous token is either ";" or
    ;; "BEGIN".
    (save-excursion
      (forward-char -1)
      (sqlind-backward-syntactic-ws)
      (when (or (looking-at ";")
                (progn (forward-word -1) (looking-at "\\<_begin\\_>")))
        (throw 'finished (list 'in-block 'exception))))))