diff options
author | Wookey <wookey@wookware.org> | 2014-09-11 07:40:58 +0100 |
---|---|---|
committer | Wookey <wookey@wookware.org> | 2014-09-11 07:40:58 +0100 |
commit | af07161f05d5ae175ed8b70345df417ce4961344 (patch) | |
tree | 6fd38a16c49a3303b09c6d2e7a9e5ef994ecb08e /media/CodeMirror-0.62/contrib/lua/js | |
parent | 5ff759db93e0aee948fa86716b7d1ca282df8ad7 (diff) | |
download | troggle-af07161f05d5ae175ed8b70345df417ce4961344.tar.gz troggle-af07161f05d5ae175ed8b70345df417ce4961344.tar.bz2 troggle-af07161f05d5ae175ed8b70345df417ce4961344.zip |
remove internal copies of jquery, jquiery-forms, jquery-ui+themes,
django-feincms and codemirror
Diffstat (limited to 'media/CodeMirror-0.62/contrib/lua/js')
-rw-r--r-- | media/CodeMirror-0.62/contrib/lua/js/parselua.js | 253 |
1 files changed, 0 insertions, 253 deletions
diff --git a/media/CodeMirror-0.62/contrib/lua/js/parselua.js b/media/CodeMirror-0.62/contrib/lua/js/parselua.js deleted file mode 100644 index 2bc891b..0000000 --- a/media/CodeMirror-0.62/contrib/lua/js/parselua.js +++ /dev/null @@ -1,253 +0,0 @@ -/* - Simple parser for LUA - Written for Lua 5.1, based on parsecss and other parsers. - features: highlights keywords, strings, comments (no leveling supported! ("[==[")),tokens, basic indenting - - to make this parser highlight your special functions pass table with this functions names to parserConfig argument of creator, - - parserConfig: ["myfunction1","myfunction2"], - */ - - -function findFirstRegexp(words) { - return new RegExp("^(?:" + words.join("|") + ")", "i"); -} - -function matchRegexp(words) { - return new RegExp("^(?:" + words.join("|") + ")$", "i"); -} - - - -var luaCustomFunctions= matchRegexp([]); - -function configureLUA(parserConfig){ - if(parserConfig) - luaCustomFunctions= matchRegexp(parserConfig); -} - - -//long list of standard functions from lua manual -var luaStdFunctions = matchRegexp([ -"_G","_VERSION","assert","collectgarbage","dofile","error","getfenv","getmetatable","ipairs","load","loadfile","loadstring","module","next","pairs","pcall","print","rawequal","rawget","rawset","require","select","setfenv","setmetatable","tonumber","tostring","type","unpack","xpcall", - -"coroutine.create","coroutine.resume","coroutine.running","coroutine.status","coroutine.wrap","coroutine.yield", - -"debug.debug","debug.getfenv","debug.gethook","debug.getinfo","debug.getlocal","debug.getmetatable","debug.getregistry","debug.getupvalue","debug.setfenv","debug.sethook","debug.setlocal","debug.setmetatable","debug.setupvalue","debug.traceback", - -"close","flush","lines","read","seek","setvbuf","write", - -"io.close","io.flush","io.input","io.lines","io.open","io.output","io.popen","io.read","io.stderr","io.stdin","io.stdout","io.tmpfile","io.type","io.write", - -"math.abs","math.acos","math.asin","math.atan","math.atan2","math.ceil","math.cos","math.cosh","math.deg","math.exp","math.floor","math.fmod","math.frexp","math.huge","math.ldexp","math.log","math.log10","math.max","math.min","math.modf","math.pi","math.pow","math.rad","math.random","math.randomseed","math.sin","math.sinh","math.sqrt","math.tan","math.tanh", - -"os.clock","os.date","os.difftime","os.execute","os.exit","os.getenv","os.remove","os.rename","os.setlocale","os.time","os.tmpname", - -"package.cpath","package.loaded","package.loaders","package.loadlib","package.path","package.preload","package.seeall", - -"string.byte","string.char","string.dump","string.find","string.format","string.gmatch","string.gsub","string.len","string.lower","string.match","string.rep","string.reverse","string.sub","string.upper", - -"table.concat","table.insert","table.maxn","table.remove","table.sort" -]); - - - - var luaKeywords = matchRegexp(["and","break","elseif","false","nil","not","or","return", - "true","function", "end", "if", "then", "else", "do", - "while", "repeat", "until", "for", "in", "local" ]); - - var luaIndentKeys = matchRegexp(["function", "if","repeat","for","while", "[\(]", "{"]); - var luaUnindentKeys = matchRegexp(["end", "until", "[\)]", "}"]); - - var luaUnindentKeys2 = findFirstRegexp(["end", "until", "[\)]", "}"]); - var luaMiddleKeys = findFirstRegexp(["else","elseif"]); - - - -var LUAParser = Editor.Parser = (function() { - var tokenizeLUA = (function() { - function normal(source, setState) { - var ch = source.next(); - - if (ch == "-" && source.equals("-")) { - source.next(); - setState(inSLComment); - return null; - } - else if (ch == "\"" || ch == "'") { - setState(inString(ch)); - return null; - } - if (ch == "[" && (source.equals("[") || source.equals("="))) { - var level = 0; - while(source.equals("=")){ - level ++; - source.next(); - } - if(! source.equals("[") ) - return "lua-error"; - setState(inMLSomething(level,"lua-string")); - return null; - } - - else if (ch == "=") { - if (source.equals("=")) - source.next(); - return "lua-token"; - } - - else if (ch == ".") { - if (source.equals(".")) - source.next(); - if (source.equals(".")) - source.next(); - return "lua-token"; - } - - else if (ch == "+" || ch == "-" || ch == "*" || ch == "/" || ch == "%" || ch == "^" || ch == "#" ) { - return "lua-token"; - } - else if (ch == ">" || ch == "<" || ch == "(" || ch == ")" || ch == "{" || ch == "}" || ch == "[" ) { - return "lua-token"; - } - else if (ch == "]" || ch == ";" || ch == ":" || ch == ",") { - return "lua-token"; - } - else if (source.equals("=") && (ch == "~" || ch == "<" || ch == ">")) { - source.next(); - return "lua-token"; - } - - else if (/\d/.test(ch)) { - source.nextWhileMatches(/[\w.%]/); - return "lua-number"; - } - else { - source.nextWhileMatches(/[\w\\\-_.]/); - return "lua-identifier"; - } - } - -function inSLComment(source, setState) { - var start = true; - var count=0; - while (!source.endOfLine()) { - var ch = source.next(); - var level = 0; - if ((ch =="[") && start) - while(source.equals("=")){ - source.next(); - level++; - } - if (source.equals("[")){ - setState(inMLSomething(level,"lua-comment")); - return null; - } - start = false; - } - setState(normal); - return "lua-comment"; - - } - - function inMLSomething(level,what) { - //wat sholud be "lua-string" or "lua-comment", level is the number of "=" in opening mark. - return function(source, setState){ - var dashes = 0; - while (!source.endOfLine()) { - var ch = source.next(); - if (dashes == level+1 && ch == "]" ) { - setState(normal); - break; - } - if (dashes == 0) - dashes = (ch == "]") ? 1:0; - else - dashes = (ch == "=") ? dashes + 1 : 0; - } - return what; - } - } - - - function inString(quote) { - return function(source, setState) { - var escaped = false; - while (!source.endOfLine()) { - var ch = source.next(); - if (ch == quote && !escaped) - break; - escaped = !escaped && ch == "\\"; - } - if (!escaped) - setState(normal); - return "lua-string"; - }; - } - - return function(source, startState) { - return tokenizer(source, startState || normal); - }; - })(); - - function indentLUA(indentDepth, base) { - return function(nextChars) { - - var closing = (luaUnindentKeys2.test(nextChars) || luaMiddleKeys.test(nextChars)); - - - return base + ( indentUnit * (indentDepth - (closing?1:0)) ); - }; - } - - -function parseLUA(source,basecolumn) { - basecolumn = basecolumn || 0; - - var tokens = tokenizeLUA(source); - var indentDepth = 0; - - var iter = { - next: function() { - var token = tokens.next(), style = token.style, content = token.content; - - - - if (style == "lua-identifier" && luaKeywords.test(content)){ - token.style = "lua-keyword"; - } - if (style == "lua-identifier" && luaStdFunctions.test(content)){ - token.style = "lua-stdfunc"; - } - if (style == "lua-identifier" && luaCustomFunctions.test(content)){ - token.style = "lua-customfunc"; - } - - if (luaIndentKeys.test(content)) - indentDepth++; - else if (luaUnindentKeys.test(content)) - indentDepth--; - - - if (content == "\n") - token.indentation = indentLUA( indentDepth, basecolumn); - - return token; - }, - - copy: function() { - var _tokenState = tokens.state, _indentDepth = indentDepth; - return function(source) { - tokens = tokenizeLUA(source, _tokenState); - - indentDepth = _indentDepth; - return iter; - }; - } - }; - return iter; - } - - return {make: parseLUA, configure:configureLUA, electricChars: "delf})"}; //en[d] els[e] unti[l] elsei[f] // this should be taken from Keys keywords -})(); - |