cheat/vendor/github.com/alecthomas/chroma/lexers/s/smalltalk.go
Chris Lane 55b18b4897 Squashed commit of the following:
commit 95479c8ad744db48386a5c78e54ef8da80e9120b
Author: Chris Lane <chris@chris-allen-lane.com>
Date:   Wed Apr 28 12:26:32 2021 -0400

    chore(version): bump version to 4.2.1

commit 6956f51cae
Author: Chris Lane <chris@chris-allen-lane.com>
Date:   Wed Apr 28 12:24:21 2021 -0400

    fix(Makefile): `vendor-update`

    Update the `vendor-update` build target to run `go mod vendor` after
    updating dependencies.

commit 0aca411279
Author: Chris Lane <chris@chris-allen-lane.com>
Date:   Wed Apr 28 12:23:24 2021 -0400

    chore(deps): update dependencies

commit e847956b02
Author: Chris Lane <chris@chris-allen-lane.com>
Date:   Wed Apr 28 08:26:51 2021 -0400

    chore(deps): build updates

    - Upgrade `go` to `1.16.3`

    - Attempt to fix build errors regarding dependencies
2021-04-28 12:35:32 -04:00

104 lines
3.8 KiB
Go

package s
import (
. "github.com/alecthomas/chroma" // nolint
"github.com/alecthomas/chroma/lexers/internal"
)
// Smalltalk lexer.
var Smalltalk = internal.Register(MustNewLazyLexer(
&Config{
Name: "Smalltalk",
Aliases: []string{"smalltalk", "squeak", "st"},
Filenames: []string{"*.st"},
MimeTypes: []string{"text/x-smalltalk"},
},
smalltalkRules,
))
func smalltalkRules() Rules {
return Rules{
"root": {
{`(<)(\w+:)(.*?)(>)`, ByGroups(Text, Keyword, Text, Text), nil},
Include("squeak fileout"),
Include("whitespaces"),
Include("method definition"),
{`(\|)([\w\s]*)(\|)`, ByGroups(Operator, NameVariable, Operator), nil},
Include("objects"),
{`\^|:=|_`, Operator, nil},
{`[\]({}.;!]`, Text, nil},
},
"method definition": {
{`([a-zA-Z]+\w*:)(\s*)(\w+)`, ByGroups(NameFunction, Text, NameVariable), nil},
{`^(\b[a-zA-Z]+\w*\b)(\s*)$`, ByGroups(NameFunction, Text), nil},
{`^([-+*/\\~<>=|&!?,@%]+)(\s*)(\w+)(\s*)$`, ByGroups(NameFunction, Text, NameVariable, Text), nil},
},
"blockvariables": {
Include("whitespaces"),
{`(:)(\s*)(\w+)`, ByGroups(Operator, Text, NameVariable), nil},
{`\|`, Operator, Pop(1)},
Default(Pop(1)),
},
"literals": {
{`'(''|[^'])*'`, LiteralString, Push("afterobject")},
{`\$.`, LiteralStringChar, Push("afterobject")},
{`#\(`, LiteralStringSymbol, Push("parenth")},
{`\)`, Text, Push("afterobject")},
{`(\d+r)?-?\d+(\.\d+)?(e-?\d+)?`, LiteralNumber, Push("afterobject")},
},
"_parenth_helper": {
Include("whitespaces"),
{`(\d+r)?-?\d+(\.\d+)?(e-?\d+)?`, LiteralNumber, nil},
{`[-+*/\\~<>=|&#!?,@%\w:]+`, LiteralStringSymbol, nil},
{`'(''|[^'])*'`, LiteralString, nil},
{`\$.`, LiteralStringChar, nil},
{`#*\(`, LiteralStringSymbol, Push("inner_parenth")},
},
"parenth": {
{`\)`, LiteralStringSymbol, Push("root", "afterobject")},
Include("_parenth_helper"),
},
"inner_parenth": {
{`\)`, LiteralStringSymbol, Pop(1)},
Include("_parenth_helper"),
},
"whitespaces": {
{`\s+`, Text, nil},
{`"(""|[^"])*"`, Comment, nil},
},
"objects": {
{`\[`, Text, Push("blockvariables")},
{`\]`, Text, Push("afterobject")},
{`\b(self|super|true|false|nil|thisContext)\b`, NameBuiltinPseudo, Push("afterobject")},
{`\b[A-Z]\w*(?!:)\b`, NameClass, Push("afterobject")},
{`\b[a-z]\w*(?!:)\b`, NameVariable, Push("afterobject")},
{`#("(""|[^"])*"|[-+*/\\~<>=|&!?,@%]+|[\w:]+)`, LiteralStringSymbol, Push("afterobject")},
Include("literals"),
},
"afterobject": {
{`! !$`, Keyword, Pop(1)},
Include("whitespaces"),
{`\b(ifTrue:|ifFalse:|whileTrue:|whileFalse:|timesRepeat:)`, NameBuiltin, Pop(1)},
{`\b(new\b(?!:))`, NameBuiltin, nil},
{`:=|_`, Operator, Pop(1)},
{`\b[a-zA-Z]+\w*:`, NameFunction, Pop(1)},
{`\b[a-zA-Z]+\w*`, NameFunction, nil},
{`\w+:?|[-+*/\\~<>=|&!?,@%]+`, NameFunction, Pop(1)},
{`\.`, Punctuation, Pop(1)},
{`;`, Punctuation, nil},
{`[\])}]`, Text, nil},
{`[\[({]`, Text, Pop(1)},
},
"squeak fileout": {
{`^"(""|[^"])*"!`, Keyword, nil},
{`^'(''|[^'])*'!`, Keyword, nil},
{`^(!)(\w+)( commentStamp: )(.*?)( prior: .*?!\n)(.*?)(!)`, ByGroups(Keyword, NameClass, Keyword, LiteralString, Keyword, Text, Keyword), nil},
{`^(!)(\w+(?: class)?)( methodsFor: )('(?:''|[^'])*')(.*?!)`, ByGroups(Keyword, NameClass, Keyword, LiteralString, Keyword), nil},
{`^(\w+)( subclass: )(#\w+)(\s+instanceVariableNames: )(.*?)(\s+classVariableNames: )(.*?)(\s+poolDictionaries: )(.*?)(\s+category: )(.*?)(!)`, ByGroups(NameClass, Keyword, LiteralStringSymbol, Keyword, LiteralString, Keyword, LiteralString, Keyword, LiteralString, Keyword, LiteralString, Keyword), nil},
{`^(\w+(?: class)?)(\s+instanceVariableNames: )(.*?)(!)`, ByGroups(NameClass, Keyword, LiteralString, Keyword), nil},
{`(!\n)(\].*)(! !)$`, ByGroups(Keyword, Text, Keyword), nil},
{`! !$`, Keyword, nil},
},
}
}