Function: smie-indent--bolp-1

smie-indent--bolp-1 is a byte-compiled function defined in smie.el.gz.

Signature

(smie-indent--bolp-1)

Documentation

Return non-nil if the current token is the first on the line.

Comments are treated as spaces.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/smie.el.gz
(defun smie-indent--bolp-1 ()
  ;; Like smie-indent--bolp but also returns non-nil if it's the first
  ;; non-comment token.  Maybe we should simply always use this?
  "Return non-nil if the current token is the first on the line.
Comments are treated as spaces."
  (let ((bol (line-beginning-position)))
    (save-excursion
      (forward-comment (- (point)))
      (<= (point) bol))))