From 519b7328b66c4c84f03893a31e4be5ba6b1395f2 Mon Sep 17 00:00:00 2001
From: mitchell <unknown>
Date: Sun, 11 Mar 2018 23:04:41 -0400
Subject: Added optional Lua lexer support. This support is disabled by default
 and must be enabled via compile-time option.

---
 lexlua/props.lua | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)
 create mode 100644 lexlua/props.lua

(limited to 'lexlua/props.lua')

diff --git a/lexlua/props.lua b/lexlua/props.lua
new file mode 100644
index 000000000..634a54031
--- /dev/null
+++ b/lexlua/props.lua
@@ -0,0 +1,33 @@
+-- Copyright 2006-2018 Mitchell mitchell.att.foicica.com. See License.txt.
+-- Props LPeg lexer.
+
+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('props', {lex_by_line = true})
+
+-- Whitespace.
+lex:add_rule('whitespace', token(lexer.WHITESPACE, lexer.space^1))
+
+-- Colors.
+lex:add_rule('color', token('color', '#' * lexer.xdigit * lexer.xdigit *
+                                     lexer.xdigit * lexer.xdigit *
+                                     lexer.xdigit * lexer.xdigit))
+lex:add_style('color', lexer.STYLE_NUMBER)
+
+-- Comments.
+lex:add_rule('comment', token(lexer.COMMENT, '#' * lexer.nonnewline^0))
+
+-- Equals.
+lex:add_rule('equals', token(lexer.OPERATOR, '='))
+
+-- Strings.
+lex:add_rule('string', token(lexer.STRING, lexer.delimited_range("'") +
+                                           lexer.delimited_range('"')))
+
+-- Variables.
+lex:add_rule('variable', token(lexer.VARIABLE, '$(' * (lexer.any - ')')^1 *
+                                               ')'))
+
+return lex
-- 
cgit v1.2.3