Function: haskell-font-lock--put-face-on-type-or-constructor
haskell-font-lock--put-face-on-type-or-constructor is a natively
compiled function defined in haskell-font-lock.el.
Signature
(haskell-font-lock--put-face-on-type-or-constructor)
Documentation
Private function used to put either type or constructor face on an uppercase identifier.
Source Code
;; Defined in /nix/store/9lz2mhw95f9fqxr9mnq46k3f6qz3aq83-emacs-packages-deps/share/emacs/site-lisp/elpa/haskell-mode-20260904.1042/haskell-font-lock.el
(defun haskell-font-lock--put-face-on-type-or-constructor ()
"Private function used to put either type or constructor face
on an uppercase identifier."
(let ((face (haskell-font-lock--select-face-on-type-or-constructor)))
(when (and face
(not (text-property-not-all (match-beginning 0) (match-end 0) 'face nil)))
(put-text-property (match-beginning 0) (match-end 0) 'face face))))