mirror of
git://git.sv.gnu.org/nano.git
synced 2024-11-22 21:01:24 +03:00
c70e6919c2
The names of the authors were retrieved from: git log -p --follow syntax/<name>.nanorc and from: git log -p --follow --all -- doc/nanorc.sample For some files the original author is unclear, or the file is/was too small to mention an author for.
26 lines
596 B
Plaintext
26 lines
596 B
Plaintext
## Syntax highlighting for Guile Scheme.
|
|
|
|
## Original author: Mark Oteiza
|
|
|
|
syntax guile "\.scm$"
|
|
header "^#!.*guile"
|
|
comment ";"
|
|
|
|
# Basic scheme functions
|
|
color green "\<(do|if|lambda|let(rec)?|map|unless|when)\>"
|
|
# Defining things
|
|
color brightcyan "\<define(-macro|-module|-public|-syntax)?\>"
|
|
# Quoted symbols
|
|
color brightyellow "'\<(\w|-)+\>"
|
|
# Chars
|
|
color brightmagenta "#\\(.|\w+)"
|
|
# Booleans
|
|
color brightred "(#t|#f)\>"
|
|
# Keywords
|
|
color blue "#?:(\w|[?-])+"
|
|
# Strings
|
|
color yellow start="^[[:blank:]]+"" end="[^\]""
|
|
color yellow ""([^"\]|\\.)*""
|
|
# Comments
|
|
color cyan "(^|[[:blank:]]);.*"
|