Function: opascal-composite-type-start

opascal-composite-type-start is a byte-compiled function defined in opascal.el.gz.

Signature

(opascal-composite-type-start TOKEN LAST-TOKEN)

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/opascal.el.gz
(defun opascal-composite-type-start (token last-token)
  ;; Returns true (actually the last-token) if the pair equals (= class), (=
  ;; dispinterface), (= interface), (= object), or (= record), and nil
  ;; otherwise.
  (if (and (eq 'equals (opascal-token-kind token))
           (memq (opascal-token-kind last-token) opascal-composite-types))
      last-token))