iup-stack/iup/etc/lexlua/tex.lua

35 lines
1.1 KiB
Lua
Executable File

-- Copyright 2006-2019 Mitchell mitchell.att.foicica.com. See License.txt.
-- Plain TeX LPeg lexer.
-- Modified by Robert Gieseke.
local lexer = require('lexer')
local token, word_match = lexer.token, lexer.word_match
local P, R, S = lpeg.P, lpeg.R, lpeg.S
local lex = lexer.new('tex')
-- Whitespace.
lex:add_rule('whitespace', token(lexer.WHITESPACE, lexer.space^1))
-- Comments.
lex:add_rule('comment', token(lexer.COMMENT, '%' * lexer.nonnewline^0))
-- TeX environments.
lex:add_rule('environment', token('environment', '\\' * (P('begin') + 'end') *
lexer.word))
lex:add_style('environment', lexer.STYLE_KEYWORD)
-- Commands.
lex:add_rule('command', token(lexer.KEYWORD, '\\' *
(lexer.alpha^1 + S('#$&~_^%{}'))))
-- Operators.
lex:add_rule('operator', token(lexer.OPERATOR, S('$&#{}[]')))
-- Fold points.
lex:add_fold_point(lexer.COMMENT, '%', lexer.fold_line_comments('%'))
lex:add_fold_point('environment', '\\begin', '\\end')
lex:add_fold_point(lexer.OPERATOR, '{', '}')
return lex