fastpastebin/vendor/github.com/alecthomas/chroma/lexers/s/snobol.go

49 lines
1.5 KiB
Go
Raw Normal View History

package s
import (
. "github.com/alecthomas/chroma" // nolint
"github.com/alecthomas/chroma/lexers/internal"
)
// Snobol lexer.
var Snobol = internal.Register(MustNewLexer(
&Config{
Name: "Snobol",
Aliases: []string{"snobol"},
Filenames: []string{"*.snobol"},
MimeTypes: []string{"text/x-snobol"},
},
Rules{
"root": {
{`\*.*\n`, Comment, nil},
{`[+.] `, Punctuation, Push("statement")},
{`-.*\n`, Comment, nil},
{`END\s*\n`, NameLabel, Push("heredoc")},
{`[A-Za-z$][\w$]*`, NameLabel, Push("statement")},
{`\s+`, Text, Push("statement")},
},
"statement": {
{`\s*\n`, Text, Pop(1)},
{`\s+`, Text, nil},
{`(?<=[^\w.])(LT|LE|EQ|NE|GE|GT|INTEGER|IDENT|DIFFER|LGT|SIZE|REPLACE|TRIM|DUPL|REMDR|DATE|TIME|EVAL|APPLY|OPSYN|LOAD|UNLOAD|LEN|SPAN|BREAK|ANY|NOTANY|TAB|RTAB|REM|POS|RPOS|FAIL|FENCE|ABORT|ARB|ARBNO|BAL|SUCCEED|INPUT|OUTPUT|TERMINAL)(?=[^\w.])`, NameBuiltin, nil},
{`[A-Za-z][\w.]*`, Name, nil},
{`\*\*|[?$.!%*/#+\-@|&\\=]`, Operator, nil},
{`"[^"]*"`, LiteralString, nil},
{`'[^']*'`, LiteralString, nil},
{`[0-9]+(?=[^.EeDd])`, LiteralNumberInteger, nil},
{`[0-9]+(\.[0-9]*)?([EDed][-+]?[0-9]+)?`, LiteralNumberFloat, nil},
{`:`, Punctuation, Push("goto")},
{`[()<>,;]`, Punctuation, nil},
},
"goto": {
{`\s*\n`, Text, Pop(2)},
{`\s+`, Text, nil},
{`F|S`, Keyword, nil},
{`(\()([A-Za-z][\w.]*)(\))`, ByGroups(Punctuation, NameLabel, Punctuation), nil},
},
"heredoc": {
{`.*\n`, LiteralStringHeredoc, nil},
},
},
))