q3aql/nanorc
q3aql/nanorc
1
0
Fork 0
mirror of https://github.com/scopatz/nanorc synced 2025-06-20 13:40:07 +02:00
Code Issues Packages Projects Releases Wiki Activity

Better haskell highlighting

Browse Source 
More generic highlighting for user defined types, strings with escape characters, extensions, operators, infix operators, and hex/oct/dec numbers with scientific notation.
This commit is contained in:
lopho 2019-02-28 05:32:08 +01:00 committed by GitHub
parent 7ae6f6edbb
commit d0481c50e1
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 35 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

56
haskell.nanorc
View File

@ -1,34 +1,48 @@
syntax "Haskell" "\.hs$" syntax "Haskell" "\.hs$"
comment "-- "
## Numbers (hex, oct, dec)
color magenta "((0[xX][0-9a-fA-F]+)|(0[oO][0-7]+)|([0-9]+(\.[0-9]+)?(e[0-9]+(\.[0-9]+)?)?))"
## Operators
color cyan "[^(a-z)^(A-Z)^(0-9)^ ]*"
## Chars
color green "'([^']|\\')'"
## Types, constructors, modules
color yellow "([ ]|^)+([A-Z][a-zA-Z0-9']*)"
## Names
color normal "([ ]|^)+[a-z][a-zA-Z0-9'_]*"
## Infix backticked names
color cyan "`[a-z][a-zA-Z0-9'_]*`"
## Strings
color green "\"([^\"\\]|\\.)*\""
## Commas, brac(k)e(t)s
color normal "(,|\[|\]|\{|\}|\(|\))"
## Special sugar
color magenta "\([ ]*\)"
color magenta "\[[ ]*\]"
## Keywords ## Keywords
color red "[ ](as|case|of|class|data|default|deriving|do|forall|foreign|hiding|if|then|else|import|infix|infixl|infixr|instance|let|in|mdo|module|newtype|qualified|type|where)[ ]" color red "[ ](as|case|of|class|data|default|deriving|do|forall|foreign|hiding|if|then|else|import|infix|infixl|infixr|instance|let|in|mdo|module|newtype|qualified|type|where)[ ]"
color red "(^data|^foreign|^import|^infix|^infixl|^infixr|^instance|^module|^newtype|^type)[ ]" color red "(^data|^foreign|^import|^infix|^infixl|^infixr|^instance|^module|^newtype|^type)[ ]"
color red "[ ](as$|case$|of$|class$|data$|default$|deriving$|do$|forall$|foreign$|hiding$|if$|then$|else$|import$|infix$|infixl$|infixr$|instance$|let$|in$|mdo$|module$|newtype$|qualified$|type$|where$)" color red "[ ](as$|case$|of$|class$|data$|default$|deriving$|do$|forall$|foreign$|hiding$|if$|then$|else$|import$|infix$|infixl$|infixr$|instance$|let$|in$|mdo$|module$|newtype$|qualified$|type$|where$)"
## Various symbols ## undefined
color cyan "(\||@|!|:|_|~|=|\\|;|\(\)|,|\[|\]|\{|\})" color brightred "undefined"
## Operators
color magenta "(==|/=|&&|\|\||<|>|<=|>=)"
## Various symbols
color cyan "(->|<-)"
color magenta "\.|\$"
## Data constructors
color magenta "(True|False|Nothing|Just|Left|Right|LT|EQ|GT)"
## Data classes
color magenta "[ ](Read|Show|Enum|Eq|Ord|Data|Bounded|Typeable|Num|Real|Fractional|Integral|RealFrac|Floating|RealFloat|Monad|MonadPlus|Functor)"
## Strings
color yellow ""[^\"]*""
## Comments ## Comments
color green "--.*" color brightblue "-- .*"
color green start="\{-" end="-\}" color brightblue start="\{-" end="-\}"
color brightred "undefined" ## Extensions
color brightred start="\{-#" end="#-\}"
## Trailing spaces ## Trailing spaces
color ,green "[[:space:]]+$" color ,green "[[:space:]]+$"