mirror of
https://github.com/anoma/juvix.git
synced 2024-12-15 10:03:22 +03:00
53 lines
1.4 KiB
EmacsLisp
53 lines
1.4 KiB
EmacsLisp
(require 'font-lock)
|
|
|
|
(defgroup minijuvix-highlight nil
|
|
"Syntax highlighting for MiniJuvix."
|
|
:group 'minijuvix)
|
|
|
|
(defgroup agda2-highlight-faces nil
|
|
"Faces used to highlight MiniJuvix code."
|
|
:group 'minijuvix-highlight)
|
|
|
|
(defface minijuvix-highlight-keyword-face
|
|
'((((background light))
|
|
(:foreground "#399ee6"))
|
|
(((background dark))
|
|
(:foreground "#81a1c1")))
|
|
"The face used for keywords."
|
|
:group 'minijuvix-highlight-faces)
|
|
|
|
(defface minijuvix-highlight-function-face
|
|
'((((background light))
|
|
(:foreground "#f2ae49"))
|
|
(((background dark))
|
|
(:foreground "#ebcb8b")))
|
|
"The face used for functions."
|
|
:group 'minijuvix-highlight-faces)
|
|
|
|
(defface minijuvix-highlight-inductive-face
|
|
'((((background light))
|
|
(:foreground "#86b300"))
|
|
(((background dark))
|
|
(:foreground "#a3be8c")))
|
|
"The face used for inductive types."
|
|
:group 'minijuvix-highlight-faces)
|
|
|
|
(defface minijuvix-highlight-constructor-face
|
|
'((((background light))
|
|
(:foreground "#a37acc"))
|
|
(((background dark))
|
|
(:foreground "#b48ead")))
|
|
"The face used for constructors."
|
|
:group 'minijuvix-highlight-faces)
|
|
|
|
(defface minijuvix-highlight-axiom-face
|
|
'((((background light))
|
|
(:foreground "#f07171"))
|
|
(((background dark))
|
|
(:foreground "#bf616a")))
|
|
"The face used for axioms."
|
|
:group 'minijuvix-highlight-faces)
|
|
|
|
|
|
(provide 'minijuvix-highlight)
|