rouge 3.6.0 → 3.12.0
Sign up to get free protection for your applications and to get access to all the features.
- checksums.yaml +4 -4
- data/Gemfile +1 -1
- data/lib/rouge/demos/ada +26 -0
- data/lib/rouge/demos/apex +9 -0
- data/lib/rouge/demos/armasm +12 -0
- data/lib/rouge/demos/batchfile +3 -0
- data/lib/rouge/demos/bbcbasic +6 -0
- data/lib/rouge/demos/clean +6 -0
- data/lib/rouge/demos/cmhg +8 -0
- data/lib/rouge/demos/csvs +8 -0
- data/lib/rouge/demos/cuda +11 -0
- data/lib/rouge/demos/cython +6 -0
- data/lib/rouge/demos/eex +1 -0
- data/lib/rouge/demos/epp +4 -0
- data/lib/rouge/demos/gdscript +18 -0
- data/lib/rouge/demos/haxe +5 -0
- data/lib/rouge/demos/hocon +8 -0
- data/lib/rouge/demos/hql +5 -0
- data/lib/rouge/demos/jsl +3 -0
- data/lib/rouge/demos/liquid +0 -1
- data/lib/rouge/demos/lustre +6 -0
- data/lib/rouge/demos/lutin +18 -0
- data/lib/rouge/demos/mason +22 -0
- data/lib/rouge/demos/minizinc +23 -0
- data/lib/rouge/demos/msgtrans +4 -0
- data/lib/rouge/demos/opentype_feature_file +6 -0
- data/lib/rouge/demos/plist +1 -132
- data/lib/rouge/demos/reasonml +12 -0
- data/lib/rouge/demos/robot_framework +27 -0
- data/lib/rouge/demos/sas +13 -0
- data/lib/rouge/demos/sparql +6 -0
- data/lib/rouge/demos/terraform +0 -15
- data/lib/rouge/formatters/html_line_table.rb +3 -1
- data/lib/rouge/formatters/tex.rb +14 -12
- data/lib/rouge/guessers/disambiguation.rb +17 -0
- data/lib/rouge/lexer.rb +3 -0
- data/lib/rouge/lexers/ada.rb +162 -0
- data/lib/rouge/lexers/apex.rb +126 -0
- data/lib/rouge/lexers/armasm.rb +145 -0
- data/lib/rouge/lexers/batchfile.rb +164 -0
- data/lib/rouge/lexers/bbcbasic.rb +112 -0
- data/lib/rouge/lexers/clean.rb +156 -0
- data/lib/rouge/lexers/cmhg.rb +34 -0
- data/lib/rouge/lexers/common_lisp.rb +1 -1
- data/lib/rouge/lexers/console.rb +1 -1
- data/lib/rouge/lexers/coq.rb +12 -9
- data/lib/rouge/lexers/cpp.rb +4 -1
- data/lib/rouge/lexers/csvs.rb +44 -0
- data/lib/rouge/lexers/cuda.rb +35 -0
- data/lib/rouge/lexers/cython.rb +151 -0
- data/lib/rouge/lexers/eex.rb +52 -0
- data/lib/rouge/lexers/elixir.rb +20 -9
- data/lib/rouge/lexers/epp.rb +51 -0
- data/lib/rouge/lexers/escape.rb +3 -0
- data/lib/rouge/lexers/gdscript.rb +171 -0
- data/lib/rouge/lexers/gherkin.rb +4 -2
- data/lib/rouge/lexers/graphql.rb +10 -3
- data/lib/rouge/lexers/handlebars.rb +14 -3
- data/lib/rouge/lexers/haxe.rb +246 -0
- data/lib/rouge/lexers/hocon.rb +86 -0
- data/lib/rouge/lexers/hql.rb +139 -0
- data/lib/rouge/lexers/html.rb +2 -2
- data/lib/rouge/lexers/http.rb +5 -5
- data/lib/rouge/lexers/igorpro.rb +1 -1
- data/lib/rouge/lexers/javascript.rb +1 -1
- data/lib/rouge/lexers/jsl.rb +55 -0
- data/lib/rouge/lexers/json.rb +43 -5
- data/lib/rouge/lexers/julia.rb +1 -1
- data/lib/rouge/lexers/kotlin.rb +21 -28
- data/lib/rouge/lexers/liquid.rb +82 -108
- data/lib/rouge/lexers/lustre.rb +79 -0
- data/lib/rouge/lexers/lutin.rb +33 -0
- data/lib/rouge/lexers/make.rb +39 -12
- data/lib/rouge/lexers/markdown.rb +7 -1
- data/lib/rouge/lexers/mason.rb +110 -0
- data/lib/rouge/lexers/matlab.rb +4 -2
- data/lib/rouge/lexers/matlab/builtins.yml +3515 -0
- data/lib/rouge/lexers/minizinc.rb +87 -0
- data/lib/rouge/lexers/msgtrans.rb +26 -0
- data/lib/rouge/lexers/ocaml.rb +12 -48
- data/lib/rouge/lexers/ocaml/common.rb +53 -0
- data/lib/rouge/lexers/opentype_feature_file.rb +113 -0
- data/lib/rouge/lexers/perl.rb +1 -1
- data/lib/rouge/lexers/php.rb +31 -9
- data/lib/rouge/lexers/php/builtins.rb +181 -174
- data/lib/rouge/lexers/plain_text.rb +1 -1
- data/lib/rouge/lexers/puppet.rb +2 -2
- data/lib/rouge/lexers/q.rb +1 -1
- data/lib/rouge/lexers/r.rb +2 -3
- data/lib/rouge/lexers/reasonml.rb +65 -0
- data/lib/rouge/lexers/robot_framework.rb +249 -0
- data/lib/rouge/lexers/rust.rb +12 -9
- data/lib/rouge/lexers/sas.rb +563 -0
- data/lib/rouge/lexers/sed.rb +1 -1
- data/lib/rouge/lexers/shell.rb +5 -3
- data/lib/rouge/lexers/smarty.rb +10 -10
- data/lib/rouge/lexers/sparql.rb +129 -0
- data/lib/rouge/lexers/sql.rb +26 -6
- data/lib/rouge/lexers/swift.rb +1 -1
- data/lib/rouge/lexers/terraform.rb +8 -0
- data/lib/rouge/plugins/redcarpet.rb +7 -1
- data/lib/rouge/tex_theme_renderer.rb +5 -1
- data/lib/rouge/themes/magritte.rb +3 -3
- data/lib/rouge/themes/thankful_eyes.rb +1 -1
- data/lib/rouge/themes/tulip.rb +1 -1
- data/lib/rouge/version.rb +1 -1
- data/rouge.gemspec +4 -3
- metadata +63 -6
- data/lib/rouge/lexers/matlab/builtins.rb +0 -13
@@ -0,0 +1,145 @@
|
|
1
|
+
# -*- coding: utf-8 -*- #
|
2
|
+
# frozen_string_literal: true
|
3
|
+
|
4
|
+
module Rouge
|
5
|
+
module Lexers
|
6
|
+
class ArmAsm < RegexLexer
|
7
|
+
title "ArmAsm"
|
8
|
+
desc "Arm assembly syntax"
|
9
|
+
tag 'armasm'
|
10
|
+
filenames '*.s'
|
11
|
+
|
12
|
+
def self.preproc_keyword
|
13
|
+
@preproc_keyword ||= %w(
|
14
|
+
define elif else endif error if ifdef ifndef include line pragma undef warning
|
15
|
+
)
|
16
|
+
end
|
17
|
+
|
18
|
+
def self.file_directive
|
19
|
+
@file_directive ||= %w(
|
20
|
+
BIN GET INCBIN INCLUDE LNK
|
21
|
+
)
|
22
|
+
end
|
23
|
+
|
24
|
+
def self.general_directive
|
25
|
+
@general_directive ||= %w(
|
26
|
+
ALIAS ALIGN AOF AOUT AREA ARM ASSERT ATTR CN CODE16 CODE32 COMMON CP
|
27
|
+
DATA DCB DCD DCDO DCDU DCFD DCFDU DCFH DCFHU DCFS DCFSU DCI DCI.N DCI.W
|
28
|
+
DCQ DCQU DCW DCWU DN ELIF ELSE END ENDFUNC ENDIF ENDP ENTRY EQU EXPORT
|
29
|
+
EXPORTAS EXTERN FIELD FILL FN FRAME FUNCTION GBLA GBLL GBLS GLOBAL IF
|
30
|
+
IMPORT INFO KEEP LCLA LCLL LCLS LEADR LEAF LTORG MACRO MAP MEND MEXIT
|
31
|
+
NOFP OPT ORG PRESERVE8 PROC QN RELOC REQUIRE REQUIRE8 RLIST RN ROUT
|
32
|
+
SETA SETL SETS SN SPACE STRONG SUBT THUMB THUMBX TTL WEND WHILE
|
33
|
+
\[ \] [|!#*=%&^]
|
34
|
+
)
|
35
|
+
end
|
36
|
+
|
37
|
+
def self.shift_or_condition
|
38
|
+
@shift_or_condition ||= %w(
|
39
|
+
ASR LSL LSR ROR RRX AL CC CS EQ GE GT HI HS LE LO LS LT MI NE PL VC VS
|
40
|
+
asr lsl lsr ror rrx al cc cs eq ge gt hi hs le lo ls lt mi ne pl vc vs
|
41
|
+
)
|
42
|
+
end
|
43
|
+
|
44
|
+
def self.builtin
|
45
|
+
@builtin ||= %w(
|
46
|
+
ARCHITECTURE AREANAME ARMASM_VERSION CODESIZE COMMANDLINE CONFIG CPU
|
47
|
+
ENDIAN FALSE FPIC FPU INPUTFILE INTER LINENUM LINENUMUP LINENUMUPPER
|
48
|
+
OBJASM_VERSION OPT PC PCSTOREOFFSET REENTRANT ROPI RWPI TRUE VAR
|
49
|
+
)
|
50
|
+
end
|
51
|
+
|
52
|
+
def self.operator
|
53
|
+
@operator ||= %w(
|
54
|
+
AND BASE CC CC_ENCODING CHR DEF EOR FATTR FEXEC FLOAD FSIZE INDEX LAND
|
55
|
+
LEFT LEN LEOR LNOT LOR LOWERCASE MOD NOT OR RCONST REVERSE_CC RIGHT ROL
|
56
|
+
ROR SHL SHR STR TARGET_ARCH_[0-9A-Z_]+ TARGET_FEATURE_[0-9A-Z_]+
|
57
|
+
TARGET_FPU_[A-Z_] TARGET_PROFILE_[ARM] UAL UPPERCASE
|
58
|
+
)
|
59
|
+
end
|
60
|
+
|
61
|
+
state :root do
|
62
|
+
rule %r/\n/, Text
|
63
|
+
rule %r/^([ \t]*)(#[ \t]*(?:(?:#{ArmAsm.preproc_keyword.join('|')})(?:[ \t].*)?)?)(\n)/ do
|
64
|
+
groups Text, Comment::Preproc, Text
|
65
|
+
end
|
66
|
+
rule %r/[ \t]+/, Text, :command
|
67
|
+
rule %r/;.*/, Comment
|
68
|
+
rule %r/\$[a-z_]\w*\.?/i, Name::Namespace # variable substitution or macro argument
|
69
|
+
rule %r/\w+|\|[^|\n]+\|/, Name::Label
|
70
|
+
end
|
71
|
+
|
72
|
+
state :command do
|
73
|
+
rule %r/\n/, Text, :pop!
|
74
|
+
rule %r/[ \t]+/ do |m|
|
75
|
+
token Text
|
76
|
+
goto :args
|
77
|
+
end
|
78
|
+
rule %r/;.*/, Comment, :pop!
|
79
|
+
rule %r/(?:#{ArmAsm.file_directive.join('|')})\b/ do |m|
|
80
|
+
token Keyword
|
81
|
+
goto :filespec
|
82
|
+
end
|
83
|
+
rule %r/(?:#{ArmAsm.general_directive.join('|')})(?=[; \t\n])/, Keyword
|
84
|
+
rule %r/(?:[A-Z][\dA-Z]*|[a-z][\da-z]*)(?:\.[NWnw])?(?:\.[DFIPSUdfipsu]?(?:8|16|32|64)?){,3}\b/, Name::Builtin # rather than attempt to list all opcodes, rely on all-uppercase or all-lowercase rule
|
85
|
+
rule %r/[a-z_]\w*|\|[^|\n]+\|/i, Name::Function # probably a macro name
|
86
|
+
rule %r/\$[a-z]\w*\.?/i, Name::Namespace
|
87
|
+
end
|
88
|
+
|
89
|
+
state :args do
|
90
|
+
rule %r/\n/, Text, :pop!
|
91
|
+
rule %r/[ \t]+/, Text
|
92
|
+
rule %r/;.*/, Comment, :pop!
|
93
|
+
rule %r/(?:#{ArmAsm.shift_or_condition.join('|')})\b/, Name::Builtin
|
94
|
+
rule %r/[a-z_]\w*|\|[^|\n]+\|/i, Name::Variable # various types of symbol
|
95
|
+
rule %r/%[bf]?[at]?\d+(?:[a-z_]\w*)?/i, Name::Label
|
96
|
+
rule %r/(?:&|0x)\h+(?!p)/i, Literal::Number::Hex
|
97
|
+
rule %r/(?:&|0x)[.\h]+(?:p[-+]?\d+)?/i, Literal::Number::Float
|
98
|
+
rule %r/0f_\h{8}|0d_\h{16}/i, Literal::Number::Float
|
99
|
+
rule %r/(?:2_[01]+|3_[0-2]+|4_[0-3]+|5_[0-4]+|6_[0-5]+|7_[0-6]+|8_[0-7]+|9_[0-8]+|\d+)(?!e)/i, Literal::Number::Integer
|
100
|
+
rule %r/(?:2_[.01]+|3_[.0-2]+|4_[.0-3]+|5_[.0-4]+|6_[.0-5]+|7_[.0-6]+|8_[.0-7]+|9_[.0-8]+|[.\d]+)(?:e[-+]?\d+)?/i, Literal::Number::Float
|
101
|
+
rule %r/[@:](?=[ \t]*(?:8|16|32|64|128|256)[^\d])/, Operator
|
102
|
+
rule %r/[.@]|\{(?:#{ArmAsm.builtin.join('|')})\}/, Name::Constant
|
103
|
+
rule %r/[-!#%&()*+,\/<=>?^{|}]|\[|\]|!=|&&|\/=|<<|<=|<>|==|><|>=|>>|\|\||:(?:#{ArmAsm.operator.join('|')}):/, Operator
|
104
|
+
rule %r/\$[a-z]\w*\.?/i, Name::Namespace
|
105
|
+
rule %r/'/ do |m|
|
106
|
+
token Literal::String::Char
|
107
|
+
goto :singlequoted
|
108
|
+
end
|
109
|
+
rule %r/"/ do |m|
|
110
|
+
token Literal::String::Double
|
111
|
+
goto :doublequoted
|
112
|
+
end
|
113
|
+
end
|
114
|
+
|
115
|
+
state :singlequoted do
|
116
|
+
rule %r/\n/, Text, :pop!
|
117
|
+
rule %r/\$\$/, Literal::String::Char
|
118
|
+
rule %r/\$[a-z]\w*\.?/i, Name::Namespace
|
119
|
+
rule %r/'/ do |m|
|
120
|
+
token Literal::String::Char
|
121
|
+
goto :args
|
122
|
+
end
|
123
|
+
rule %r/[^$'\n]+/, Literal::String::Char
|
124
|
+
end
|
125
|
+
|
126
|
+
state :doublequoted do
|
127
|
+
rule %r/\n/, Text, :pop!
|
128
|
+
rule %r/\$\$/, Literal::String::Double
|
129
|
+
rule %r/\$[a-z]\w*\.?/i, Name::Namespace
|
130
|
+
rule %r/"/ do |m|
|
131
|
+
token Literal::String::Double
|
132
|
+
goto :args
|
133
|
+
end
|
134
|
+
rule %r/[^$"\n]+/, Literal::String::Double
|
135
|
+
end
|
136
|
+
|
137
|
+
state :filespec do
|
138
|
+
rule %r/\n/, Text, :pop!
|
139
|
+
rule %r/\$\$/, Literal::String::Other
|
140
|
+
rule %r/\$[a-z]\w*\.?/i, Name::Namespace
|
141
|
+
rule %r/[^$\n]+/, Literal::String::Other
|
142
|
+
end
|
143
|
+
end
|
144
|
+
end
|
145
|
+
end
|
@@ -0,0 +1,164 @@
|
|
1
|
+
# -*- coding: utf-8 -*- #
|
2
|
+
# frozen_string_literal: true
|
3
|
+
|
4
|
+
module Rouge
|
5
|
+
module Lexers
|
6
|
+
class Batchfile < RegexLexer
|
7
|
+
title "Batchfile"
|
8
|
+
desc "Windows Batch File"
|
9
|
+
|
10
|
+
tag 'batchfile'
|
11
|
+
aliases 'bat', 'batch', 'dosbatch', 'winbatch'
|
12
|
+
filenames '*.bat', '*.cmd'
|
13
|
+
|
14
|
+
mimetypes 'application/bat', 'application/x-bat', 'application/x-msdos-program'
|
15
|
+
|
16
|
+
def self.keywords
|
17
|
+
@keywords ||= %w(
|
18
|
+
if else for in do goto call exit
|
19
|
+
)
|
20
|
+
end
|
21
|
+
|
22
|
+
def self.operator_words
|
23
|
+
@operator_words ||= %w(
|
24
|
+
exist defined errorlevel cmdextversion not equ neq lss leq gtr geq
|
25
|
+
)
|
26
|
+
end
|
27
|
+
|
28
|
+
def self.devices
|
29
|
+
@devices ||= %w(
|
30
|
+
con prn aux nul com1 com2 com3 com4 com5 com6 com7 com8 com9 lpt1 lpt2
|
31
|
+
lpt3 lpt4 lpt5 lpt6 lpt7 lpt8 lpt9
|
32
|
+
)
|
33
|
+
end
|
34
|
+
|
35
|
+
def self.builtin_commands
|
36
|
+
@builtin_commands ||= %w(
|
37
|
+
assoc attrib break bcdedit cacls cd chcp chdir chkdsk chkntfs choice
|
38
|
+
cls cmd color comp compact convert copy date del dir diskpart doskey
|
39
|
+
dpath driverquery echo endlocal erase fc find findstr format fsutil
|
40
|
+
ftype gpresult graftabl help icacls label md mkdir mklink mode more
|
41
|
+
move openfiles path pause popd print prompt pushd rd recover ren
|
42
|
+
rename replace rmdir robocopy setlocal sc schtasks shift shutdown sort
|
43
|
+
start subst systeminfo takeown tasklist taskkill time timeout title
|
44
|
+
tree type ver verify vol xcopy waitfor wmic
|
45
|
+
)
|
46
|
+
end
|
47
|
+
|
48
|
+
def self.other_commands
|
49
|
+
@other_commands ||= %w(
|
50
|
+
addusers admodcmd ansicon arp at bcdboot bitsadmin browstat certreq
|
51
|
+
certutil change cidiag cipher cleanmgr clip cmdkey compress convertcp
|
52
|
+
coreinfo csccmd csvde cscript curl debug defrag delprof deltree devcon
|
53
|
+
diamond dirquota diruse diskshadow diskuse dism dnscmd dsacls dsadd
|
54
|
+
dsget dsquery dsmod dsmove dsrm dsmgmt dsregcmd edlin eventcreate
|
55
|
+
expand extract fdisk fltmc forfiles freedisk ftp getmac gpupdate
|
56
|
+
hostname ifmember inuse ipconfig kill lgpo lodctr logman logoff
|
57
|
+
logtime makecab mapisend mbsacli mem mountvol moveuser msg mshta
|
58
|
+
msiexec msinfo32 mstsc nbtstat net net1 netdom netsh netstat nlsinfo
|
59
|
+
nltest now nslookup ntbackup ntdsutil ntoskrnl ntrights nvspbind
|
60
|
+
pathping perms ping portqry powercfg pngout pnputil printbrm prncnfg
|
61
|
+
prnmngr procdump psexec psfile psgetsid psinfo pskill pslist
|
62
|
+
psloggedon psloglist pspasswd psping psservice psshutdown pssuspend
|
63
|
+
qbasic qgrep qprocess query quser qwinsta rasdial reg reg1 regdump
|
64
|
+
regedt32 regsvr32 regini reset restore rundll32 rmtshare route rpcping
|
65
|
+
run runas scandisk setspn setx sfc share shellrunas shortcut sigcheck
|
66
|
+
sleep slmgr strings subinacl sysmon telnet tftp tlist touch tracerpt
|
67
|
+
tracert tscon tsdiscon tskill tttracer typeperf tzutil undelete
|
68
|
+
unformat verifier vmconnect vssadmin w32tm wbadmin wecutil wevtutil
|
69
|
+
wget where whoami windiff winrm winrs wpeutil wpr wusa wuauclt wscript
|
70
|
+
)
|
71
|
+
end
|
72
|
+
|
73
|
+
def self.attributes
|
74
|
+
@attributes ||= %w(
|
75
|
+
on off disable enableextensions enabledelayedexpansion
|
76
|
+
)
|
77
|
+
end
|
78
|
+
|
79
|
+
state :basic do
|
80
|
+
# Comments
|
81
|
+
rule %r/\brem\b.*$/i, Comment
|
82
|
+
# Empty Labels
|
83
|
+
rule %r/^::.*$/, Comment
|
84
|
+
|
85
|
+
# Labels
|
86
|
+
rule %r/:[a-z]+/i, Name::Label
|
87
|
+
|
88
|
+
rule %r/([a-z]\w*)(\.exe|com|bat|cmd|msi)?/i do |m|
|
89
|
+
if self.class.devices.include? m[1]
|
90
|
+
groups Keyword::Reserved, Error
|
91
|
+
elsif self.class.keywords.include? m[1]
|
92
|
+
groups Keyword, Error
|
93
|
+
elsif self.class.operator_words.include? m[1]
|
94
|
+
groups Operator::Word, Error
|
95
|
+
elsif self.class.builtin_commands.include? m[1]
|
96
|
+
token Name::Builtin
|
97
|
+
elsif self.class.other_commands.include? m[1]
|
98
|
+
token Name::Builtin
|
99
|
+
elsif self.class.attributes.include? m[1]
|
100
|
+
groups Name::Attribute, Error
|
101
|
+
elsif "set".casecmp m[1]
|
102
|
+
groups Keyword::Declaration, Error
|
103
|
+
else
|
104
|
+
token Text
|
105
|
+
end
|
106
|
+
end
|
107
|
+
|
108
|
+
rule %r/([\/\-+][a-z]+)\s*/i, Name::Attribute
|
109
|
+
|
110
|
+
mixin :expansions
|
111
|
+
|
112
|
+
rule %r/[<>&|(){}\[\]\-+=;,~?*]/, Operator
|
113
|
+
end
|
114
|
+
|
115
|
+
state :escape do
|
116
|
+
rule %r/\^./m, Str::Escape
|
117
|
+
end
|
118
|
+
|
119
|
+
state :expansions do
|
120
|
+
# Normal and Delayed expansion
|
121
|
+
rule %r/[%!]+([a-z_$@#]+)[%!]+/i, Name::Variable
|
122
|
+
# For Variables
|
123
|
+
rule %r/(\%+~?[a-z]+\d?)/i, Name::Variable::Magic
|
124
|
+
end
|
125
|
+
|
126
|
+
state :double_quotes do
|
127
|
+
mixin :escape
|
128
|
+
rule %r/["]/, Str::Double, :pop!
|
129
|
+
mixin :expansions
|
130
|
+
rule %r/[^\^"%!]+/, Str::Double
|
131
|
+
end
|
132
|
+
|
133
|
+
state :single_quotes do
|
134
|
+
mixin :escape
|
135
|
+
rule %r/[']/, Str::Single, :pop!
|
136
|
+
mixin :expansions
|
137
|
+
rule %r/[^\^'%!]+/, Str::Single
|
138
|
+
end
|
139
|
+
|
140
|
+
state :backtick do
|
141
|
+
mixin :escape
|
142
|
+
rule %r/[`]/, Str::Backtick, :pop!
|
143
|
+
mixin :expansions
|
144
|
+
rule %r/[^\^`%!]+/, Str::Backtick
|
145
|
+
end
|
146
|
+
|
147
|
+
state :data do
|
148
|
+
rule %r/\s+/, Text
|
149
|
+
rule %r/0x[0-9a-f]+/i, Literal::Number::Hex
|
150
|
+
rule %r/[0-9]/, Literal::Number
|
151
|
+
rule %r/["]/, Str::Double, :double_quotes
|
152
|
+
rule %r/[']/, Str::Single, :single_quotes
|
153
|
+
rule %r/[`]/, Str::Backtick, :backtick
|
154
|
+
rule %r/[^\s&|()\[\]{}\^=;!%+\-,"'`~?*]+/, Text
|
155
|
+
mixin :escape
|
156
|
+
end
|
157
|
+
|
158
|
+
state :root do
|
159
|
+
mixin :basic
|
160
|
+
mixin :data
|
161
|
+
end
|
162
|
+
end
|
163
|
+
end
|
164
|
+
end
|
@@ -0,0 +1,112 @@
|
|
1
|
+
# -*- coding: utf-8 -*- #
|
2
|
+
# frozen_string_literal: true
|
3
|
+
|
4
|
+
module Rouge
|
5
|
+
module Lexers
|
6
|
+
class BBCBASIC < RegexLexer
|
7
|
+
title "BBCBASIC"
|
8
|
+
desc "BBC BASIC syntax"
|
9
|
+
tag 'bbcbasic'
|
10
|
+
filenames '*,fd1'
|
11
|
+
|
12
|
+
def self.punctuation
|
13
|
+
@punctuation ||= %w(
|
14
|
+
[,;'~] SPC TAB
|
15
|
+
)
|
16
|
+
end
|
17
|
+
|
18
|
+
def self.function
|
19
|
+
@function ||= %w(
|
20
|
+
ABS ACS ADVAL ASC ASN ATN BEATS BEAT BGET# CHR\$ COS COUNT DEG DIM
|
21
|
+
EOF# ERL ERR EVAL EXP EXT# FN GET\$# GET\$ GET HIMEM INKEY\$ INKEY
|
22
|
+
INSTR INT LEFT\$ LEN LN LOG LOMEM MID\$ OPENIN OPENOUT OPENUP PAGE
|
23
|
+
POINT POS PTR# RAD REPORT\$ RIGHT\$ RND SGN SIN SQR STR\$ STRING\$ SUM
|
24
|
+
SUMLEN TAN TEMPO TIME\$ TIME TOP USR VAL VPOS
|
25
|
+
)
|
26
|
+
end
|
27
|
+
|
28
|
+
def self.statement
|
29
|
+
@statement ||= %w(
|
30
|
+
BEATS BPUT# CALL CASE CHAIN CLEAR CLG CLOSE# CLS COLOR COLOUR DATA
|
31
|
+
ELSE ENDCASE ENDIF ENDPROC ENDWHILE END ENVELOPE FOR GCOL GOSUB GOTO
|
32
|
+
IF INSTALL LET LIBRARY MODE NEXT OFF OF ON ORIGIN OSCI OTHERWISE
|
33
|
+
OVERLAY PLOT PRINT# PRINT PROC QUIT READ REPEAT REPORT RETURN SOUND
|
34
|
+
STEP STEREO STOP SWAP SYS THEN TINT TO VDU VOICES VOICE UNTIL WAIT
|
35
|
+
WHEN WHILE WIDTH
|
36
|
+
)
|
37
|
+
end
|
38
|
+
|
39
|
+
def self.operator
|
40
|
+
@operator ||= %w(
|
41
|
+
<< <= <> < >= >>> >> > [-!$()*+/=?^|] AND DIV EOR MOD NOT OR
|
42
|
+
)
|
43
|
+
end
|
44
|
+
|
45
|
+
def self.constant
|
46
|
+
@constant ||= %w(
|
47
|
+
FALSE TRUE
|
48
|
+
)
|
49
|
+
end
|
50
|
+
|
51
|
+
state :expression do
|
52
|
+
rule %r/#{BBCBASIC.function.join('|')}/o, Name::Builtin # function or pseudo-variable
|
53
|
+
rule %r/#{BBCBASIC.operator.join('|')}/o, Operator
|
54
|
+
rule %r/#{BBCBASIC.constant.join('|')}/o, Name::Constant
|
55
|
+
rule %r/"[^"]*"/o, Literal::String
|
56
|
+
rule %r/[a-z_`][\w`]*[$%]?/io, Name::Variable
|
57
|
+
rule %r/@%/o, Name::Variable
|
58
|
+
rule %r/[\d.]+/o, Literal::Number
|
59
|
+
rule %r/%[01]+/o, Literal::Number::Bin
|
60
|
+
rule %r/&[\h]+/o, Literal::Number::Hex
|
61
|
+
end
|
62
|
+
|
63
|
+
state :root do
|
64
|
+
rule %r/(:+)( *)(\*)(.*)/ do
|
65
|
+
groups Punctuation, Text, Keyword, Text # CLI command
|
66
|
+
end
|
67
|
+
rule %r/(\n+ *)(\*)(.*)/ do
|
68
|
+
groups Text, Keyword, Text # CLI command
|
69
|
+
end
|
70
|
+
rule %r/(ELSE|OTHERWISE|REPEAT|THEN)( *)(\*)(.*)/ do
|
71
|
+
groups Keyword, Text, Keyword, Text # CLI command
|
72
|
+
end
|
73
|
+
rule %r/[ \n]+/o, Text
|
74
|
+
rule %r/:+/o, Punctuation
|
75
|
+
rule %r/[\[]/o, Keyword, :assembly1
|
76
|
+
rule %r/REM *>.*/o, Comment::Special
|
77
|
+
rule %r/REM.*/o, Comment
|
78
|
+
rule %r/(?:#{BBCBASIC.statement.join('|')}|CIRCLE(?: *FILL)?|DEF *(?:FN|PROC)|DRAW(?: *BY)?|DIM(?!\()|ELLIPSE(?: *FILL)?|ERROR(?: *EXT)?|FILL(?: *BY)?|INPUT(?:#| *LINE)?|LINE(?: *INPUT)?|LOCAL(?: *DATA| *ERROR)?|MOUSE(?: *COLOUR| *OFF| *ON| *RECTANGLE| *STEP| *TO)?|MOVE(?: *BY)?|ON(?! *ERROR)|ON *ERROR *(?:LOCAL|OFF)?|POINT(?: *BY)?(?!\()|RECTANGE(?: *FILL)?|RESTORE(?: *DATA| *ERROR)?|TRACE(?: *CLOSE| *ENDPROC| *OFF| *STEP(?: *FN| *ON| *PROC)?| *TO)?)/o, Keyword
|
79
|
+
mixin :expression
|
80
|
+
rule %r/#{BBCBASIC.punctuation.join('|')}/o, Punctuation
|
81
|
+
end
|
82
|
+
|
83
|
+
# Assembly statements are parsed as
|
84
|
+
# {label} {directive|opcode |']' {expressions}} {comment}
|
85
|
+
# Technically, you don't need whitespace between opcodes and arguments,
|
86
|
+
# but this is rare in uncrunched source and trying to enumerate all
|
87
|
+
# possible opcodes here is impractical so we colour it as though
|
88
|
+
# the whitespace is required. Opcodes and directives can only easily be
|
89
|
+
# distinguished from the symbols that make up expressions by looking at
|
90
|
+
# their position within the statement. Similarly, ']' is treated as a
|
91
|
+
# keyword at the start of a statement or as punctuation elsewhere. This
|
92
|
+
# requires a two-state state machine.
|
93
|
+
|
94
|
+
state :assembly1 do
|
95
|
+
rule %r/ +/o, Text
|
96
|
+
rule %r/]/o, Keyword, :pop!
|
97
|
+
rule %r/[:\n]/o, Punctuation
|
98
|
+
rule %r/\.[a-z_`][\w`]*%? */io, Name::Label
|
99
|
+
rule %r/(?:REM|;)[^:\n]*/o, Comment
|
100
|
+
rule %r/[^ :\n]+/o, Keyword, :assembly2
|
101
|
+
end
|
102
|
+
|
103
|
+
state :assembly2 do
|
104
|
+
rule %r/ +/o, Text
|
105
|
+
rule %r/[:\n]/o, Punctuation, :pop!
|
106
|
+
rule %r/(?:REM|;)[^:\n]*/o, Comment, :pop!
|
107
|
+
mixin :expression
|
108
|
+
rule %r/[!#,@\[\]^{}]/, Punctuation
|
109
|
+
end
|
110
|
+
end
|
111
|
+
end
|
112
|
+
end
|
@@ -0,0 +1,156 @@
|
|
1
|
+
# -*- coding: utf-8 -*- #
|
2
|
+
# frozen_string_literal: true
|
3
|
+
|
4
|
+
module Rouge
|
5
|
+
module Lexers
|
6
|
+
class Clean < RegexLexer
|
7
|
+
title "Clean"
|
8
|
+
desc "The Clean programming language (clean.cs.ru.nl)"
|
9
|
+
|
10
|
+
tag 'clean'
|
11
|
+
filenames '*.dcl', '*.icl'
|
12
|
+
|
13
|
+
def self.keywords
|
14
|
+
@keywords ||= Set.new %w(
|
15
|
+
if otherwise
|
16
|
+
let in
|
17
|
+
with where
|
18
|
+
case of
|
19
|
+
infix infixl infixr
|
20
|
+
class instance
|
21
|
+
generic derive
|
22
|
+
special
|
23
|
+
implementation definition system module
|
24
|
+
from import qualified as
|
25
|
+
dynamic
|
26
|
+
code inline foreign export ccall stdcall
|
27
|
+
)
|
28
|
+
end
|
29
|
+
|
30
|
+
# These are literal patterns common to the ABC intermediate language and
|
31
|
+
# Clean. Clean has more extensive literal patterns (see :basic below).
|
32
|
+
state :common_literals do
|
33
|
+
rule %r/'(?:[^'\\]|\\(?:x[0-9a-fA-F]+|\d+|.))'/, Str::Char
|
34
|
+
|
35
|
+
rule %r/[+~-]?\d+\.\d+(?:E[+-]?\d+)?\b/, Num::Float
|
36
|
+
rule %r/[+~-]?\d+E[+-]?\d+\b/, Num::Float
|
37
|
+
rule %r/[+~-]?\d+/, Num::Integer
|
38
|
+
|
39
|
+
rule %r/"/, Str::Double, :string
|
40
|
+
end
|
41
|
+
|
42
|
+
state :basic do
|
43
|
+
rule %r/\s+/m, Text::Whitespace
|
44
|
+
|
45
|
+
rule %r/\/\/\*.*/, Comment::Doc
|
46
|
+
rule %r/\/\/.*/, Comment::Single
|
47
|
+
rule %r/\/\*\*/, Comment::Doc, :comment_doc
|
48
|
+
rule %r/\/\*/, Comment::Multiline, :comment
|
49
|
+
|
50
|
+
rule %r/[+~-]?0[0-7]+/, Num::Oct
|
51
|
+
rule %r/[+~-]?0x[0-9a-fA-F]+/, Num::Hex
|
52
|
+
mixin :common_literals
|
53
|
+
rule %r/(\[)(\s*)(')(?=.*?'\])/ do
|
54
|
+
groups Punctuation, Text::Whitespace, Str::Single, Punctuation
|
55
|
+
push :charlist
|
56
|
+
end
|
57
|
+
end
|
58
|
+
|
59
|
+
# nested commenting
|
60
|
+
state :comment_doc do
|
61
|
+
rule %r/\*\//, Comment::Doc, :pop!
|
62
|
+
rule %r/\/\/.*/, Comment::Doc # Singleline comments in multiline comments are skipped
|
63
|
+
rule %r/\/\*/, Comment::Doc, :comment
|
64
|
+
rule %r/[^*\/]+/, Comment::Doc
|
65
|
+
rule %r/[*\/]/, Comment::Doc
|
66
|
+
end
|
67
|
+
|
68
|
+
# This is the same as the above, but with Multiline instead of Doc
|
69
|
+
state :comment do
|
70
|
+
rule %r/\*\//, Comment::Multiline, :pop!
|
71
|
+
rule %r/\/\/.*/, Comment::Multiline # Singleline comments in multiline comments are skipped
|
72
|
+
rule %r/\/\*/, Comment::Multiline, :comment
|
73
|
+
rule %r/[^*\/]+/, Comment::Multiline
|
74
|
+
rule %r/[*\/]/, Comment::Multiline
|
75
|
+
end
|
76
|
+
|
77
|
+
state :root do
|
78
|
+
mixin :basic
|
79
|
+
|
80
|
+
rule %r/code(\s+inline)?\s*{/, Comment::Preproc, :abc
|
81
|
+
|
82
|
+
rule %r/_*[a-z][\w_`]*/ do |m|
|
83
|
+
if self.class.keywords.include?(m[0])
|
84
|
+
token Keyword
|
85
|
+
else
|
86
|
+
token Name
|
87
|
+
end
|
88
|
+
end
|
89
|
+
|
90
|
+
rule %r/_*[A-Z][\w_`]*/ do |m|
|
91
|
+
if m[0]=='True' || m[0]=='False'
|
92
|
+
token Keyword::Constant
|
93
|
+
else
|
94
|
+
token Keyword::Type
|
95
|
+
end
|
96
|
+
end
|
97
|
+
|
98
|
+
rule %r/[^\w_\s`]/, Punctuation
|
99
|
+
rule %r/_\b/, Punctuation
|
100
|
+
end
|
101
|
+
|
102
|
+
state :escapes do
|
103
|
+
rule %r/\\x[0-9a-fA-F]{1,2}/i, Str::Escape
|
104
|
+
rule %r/\\d\d{0,3}/i, Str::Escape
|
105
|
+
rule %r/\\0[0-7]{0,3}/, Str::Escape
|
106
|
+
rule %r/\\[0-7]{1,3}/, Str::Escape
|
107
|
+
rule %r/\\[nrfbtv\\"']/, Str::Escape
|
108
|
+
end
|
109
|
+
|
110
|
+
state :string do
|
111
|
+
rule %r/"/, Str::Double, :pop!
|
112
|
+
mixin :escapes
|
113
|
+
rule %r/[^\\"]+/, Str::Double
|
114
|
+
end
|
115
|
+
|
116
|
+
state :charlist do
|
117
|
+
rule %r/(')(\])/ do
|
118
|
+
groups Str::Single, Punctuation
|
119
|
+
pop!
|
120
|
+
end
|
121
|
+
mixin :escapes
|
122
|
+
rule %r/[^\\']/, Str::Single
|
123
|
+
end
|
124
|
+
|
125
|
+
state :abc_basic do
|
126
|
+
rule %r/\s+/, Text::Whitespace
|
127
|
+
rule %r/\|.*/, Comment::Single
|
128
|
+
mixin :common_literals
|
129
|
+
end
|
130
|
+
|
131
|
+
# The ABC intermediate language can be included, similar to C's inline
|
132
|
+
# assembly. For some information about ABC, see:
|
133
|
+
# https://en.wikipedia.org/wiki/Clean_(programming_language)#The_ABC-Machine
|
134
|
+
state :abc do
|
135
|
+
mixin :abc_basic
|
136
|
+
|
137
|
+
rule %r/}/, Comment::Preproc, :pop!
|
138
|
+
rule %r/\.\w*/, Keyword, :abc_rest_of_line
|
139
|
+
rule %r/[\w_]+/, Name::Builtin, :abc_rest_of_line
|
140
|
+
end
|
141
|
+
|
142
|
+
state :abc_rest_of_line do
|
143
|
+
rule %r/\n/, Text::Whitespace, :pop!
|
144
|
+
rule %r/}/ do
|
145
|
+
token Comment::Preproc
|
146
|
+
pop!
|
147
|
+
pop!
|
148
|
+
end
|
149
|
+
|
150
|
+
mixin :abc_basic
|
151
|
+
|
152
|
+
rule %r/\S+/, Name
|
153
|
+
end
|
154
|
+
end
|
155
|
+
end
|
156
|
+
end
|