mirror of
git://git.sv.gnu.org/nano.git
synced 2024-11-23 05:11:35 +03:00
fe9da9425e
git-svn-id: svn://svn.savannah.gnu.org/nano/trunk/nano@4899 35c25a1d-7b9e-4130-9fde-d3aeb78583b8
29 lines
802 B
Plaintext
29 lines
802 B
Plaintext
## Syntax highlighting for OCaml.
|
|
|
|
syntax "ocaml" "\.mli?$"
|
|
|
|
#uid
|
|
color red "\<[A-Z][0-9a-z_]{2,}\>"
|
|
#declarations
|
|
color green "\<(let|val|method|in|and|rec|private|virtual|constraint)\>"
|
|
#structure items
|
|
color red "\<(type|open|class|module|exception|external)\>"
|
|
#patterns
|
|
color blue "\<(fun|function|functor|match|try|with)\>"
|
|
#patterns-modifiers
|
|
color yellow "\<(as|when|of)\>"
|
|
#conditions
|
|
color cyan "\<(if|then|else)\>"
|
|
#blocs
|
|
color magenta "\<(begin|end|object|struct|sig|for|while|do|done|to|downto)\>"
|
|
#constantes
|
|
color green "\<(true|false)\>"
|
|
#modules/classes
|
|
color green "\<(include|inherit|initializer)\>"
|
|
#expr modifiers
|
|
color yellow "\<(new|ref|mutable|lazy|assert|raise)\>"
|
|
#comments
|
|
color white start="\(\*" end="\*\)"
|
|
#strings (no multiline handling yet)
|
|
color brightblack ""[^\"]*""
|