Function: opascal-on-first-comment-line

opascal-on-first-comment-line is a byte-compiled function defined in opascal.el.gz.

Signature

(opascal-on-first-comment-line COMMENT)

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/opascal.el.gz
(defun opascal-on-first-comment-line (comment)
  ;; Returns true if the current point is on the first line of the comment.
  (save-excursion
    (let ((comment-start (opascal-token-start comment))
          (current-point (point)))
      (goto-char comment-start)
      (end-of-line)
      (and (<= comment-start current-point) (<= current-point (point))))))