117 lines
2.9 KiB
Ruby
117 lines
2.9 KiB
Ruby
|
# -*- coding: utf-8 -*- #
|
||
|
|
# frozen_string_literal: true
|
||
|
|
|
||
|
|
module Rouge
|
||
|
|
module Lexers
|
||
|
|
class SuperCollider < RegexLexer
|
||
|
|
tag 'supercollider'
|
||
|
|
filenames '*.sc', '*.scd'
|
||
|
|
|
||
|
|
title "SuperCollider"
|
||
|
|
desc 'A cross-platform interpreted programming language for sound synthesis, algorithmic composition, and realtime performance'
|
||
|
|
|
||
|
|
def self.keywords
|
||
|
|
@keywords ||= Set.new %w(
|
||
|
|
var arg classvar const super this
|
||
|
|
)
|
||
|
|
end
|
||
|
|
|
||
|
|
# these aren't technically keywords, but we treat
|
||
|
|
# them as such because it makes things clearer 99%
|
||
|
|
# of the time
|
||
|
|
def self.reserved
|
||
|
|
@reserved ||= Set.new %w(
|
||
|
|
case do for forBy loop if while new newCopyArgs
|
||
|
|
)
|
||
|
|
end
|
||
|
|
|
||
|
|
def self.constants
|
||
|
|
@constants ||= Set.new %w(
|
||
|
|
true false nil inf thisThread
|
||
|
|
thisMethod thisFunction thisProcess
|
||
|
|
thisFunctionDef currentEnvironment
|
||
|
|
topEnvironment
|
||
|
|
)
|
||
|
|
end
|
||
|
|
|
||
|
|
state :whitespace do
|
||
|
|
rule %r/\s+/m, Text
|
||
|
|
end
|
||
|
|
|
||
|
|
state :comments do
|
||
|
|
rule %r(//.*?$), Comment::Single
|
||
|
|
rule %r(/[*]) do
|
||
|
|
token Comment::Multiline
|
||
|
|
push :nested_comment
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
state :nested_comment do
|
||
|
|
rule %r(/[*]), Comment::Multiline, :nested_comment
|
||
|
|
rule %r([*]/), Comment::Multiline, :pop!
|
||
|
|
rule %r([^*/]+)m, Comment::Multiline
|
||
|
|
rule %r/./, Comment::Multiline
|
||
|
|
end
|
||
|
|
|
||
|
|
state :root do
|
||
|
|
mixin :whitespace
|
||
|
|
mixin :comments
|
||
|
|
|
||
|
|
rule %r/[\-+]?0[xX]\h+/, Num::Hex
|
||
|
|
|
||
|
|
# radix float
|
||
|
|
rule %r/[\-+]?\d+r[0-9a-zA-Z]*(\.[0-9A-Z]*)?/, Num::Float
|
||
|
|
|
||
|
|
# normal float
|
||
|
|
rule %r/[\-+]?((\d+(\.\d+)?([eE][\-+]?\d+)?(pi)?)|pi)/, Num::Float
|
||
|
|
|
||
|
|
rule %r/[\-+]?\d+/, Num::Integer
|
||
|
|
|
||
|
|
rule %r/\$(\\.|.)/, Str::Char
|
||
|
|
|
||
|
|
rule %r/"([^\\"]|\\.)*"/, Str
|
||
|
|
|
||
|
|
# symbols (single-quote notation)
|
||
|
|
rule %r/'([^\\']|\\.)*'/, Str::Other
|
||
|
|
|
||
|
|
# symbols (backslash notation)
|
||
|
|
rule %r/\\\w+/, Str::Other
|
||
|
|
|
||
|
|
# symbol arg
|
||
|
|
rule %r/[A-Za-z_]\w*:/, Name::Label
|
||
|
|
|
||
|
|
rule %r/[A-Z]\w*/, Name::Class
|
||
|
|
|
||
|
|
# primitive
|
||
|
|
rule %r/_\w+/, Name::Function
|
||
|
|
|
||
|
|
# main identifiers section
|
||
|
|
rule %r/[a-z]\w*/ do |m|
|
||
|
|
if self.class.keywords.include? m[0]
|
||
|
|
token Keyword
|
||
|
|
elsif self.class.constants.include? m[0]
|
||
|
|
token Keyword::Constant
|
||
|
|
elsif self.class.reserved.include? m[0]
|
||
|
|
token Keyword::Reserved
|
||
|
|
else
|
||
|
|
token Name
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
# environment variables
|
||
|
|
rule %r/~\w+/, Name::Variable::Global
|
||
|
|
|
||
|
|
rule %r/[\{\}()\[\];,\.]/, Punctuation
|
||
|
|
|
||
|
|
# operators. treat # (array unpack) as an operator
|
||
|
|
rule %r/[\+\-\*\/&\|%<>=]+/, Operator
|
||
|
|
rule %r/[\^:#]/, Operator
|
||
|
|
|
||
|
|
# treat curry argument as a special operator
|
||
|
|
rule %r/\b_\b/, Name::Builtin
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|