Function: semantic-java-doc-keyword-before-p

semantic-java-doc-keyword-before-p is a byte-compiled function defined in java.el.gz.

Signature

(semantic-java-doc-keyword-before-p K1 K2)

Documentation

Return non-nil if javadoc keyword K1 is before K2.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/java.el.gz
(defun semantic-java-doc-keyword-before-p (k1 k2)
  "Return non-nil if javadoc keyword K1 is before K2."
  (let* ((t1   (semantic-java-doc-tag k1))
         (t2   (semantic-java-doc-tag k2))
         (seq1 (and (semantic-lex-keyword-p t1)
                    (plist-get (semantic-lex-keyword-get t1 'javadoc)
                               'seq)))
         (seq2 (and (semantic-lex-keyword-p t2)
                    (plist-get (semantic-lex-keyword-get t2 'javadoc)
                               'seq))))
    (if (and (numberp seq1) (numberp seq2))
        (<= seq1 seq2)
      ;; Unknown tags (probably custom ones) are always after official
      ;; ones and are not themselves ordered.
      (or (numberp seq1)
          (and (not seq1) (not seq2))))))