yks-element 1.5.0 → 1.5.2

package/lib/f36f4038005be804fc28f2cf96e89ca4.js

@@ -1,3519 +0,0 @@
-"no use strict";
-!(function(window) {
-if (typeof window.window != "undefined" && window.document)
-    return;
-if (window.require && window.define)
-    return;
-
-if (!window.console) {
-    window.console = function() {
-        var msgs = Array.prototype.slice.call(arguments, 0);
-        postMessage({type: "log", data: msgs});
-    };
-    window.console.error =
-    window.console.warn = 
-    window.console.log =
-    window.console.trace = window.console;
-}
-window.window = window;
-window.ace = window;
-
-window.onerror = function(message, file, line, col, err) {
-    postMessage({type: "error", data: {
-        message: message,
-        data: err && err.data,
-        file: file,
-        line: line, 
-        col: col,
-        stack: err && err.stack
-    }});
-};
-
-window.normalizeModule = function(parentId, moduleName) {
-    // normalize plugin requires
-    if (moduleName.indexOf("!") !== -1) {
-        var chunks = moduleName.split("!");
-        return window.normalizeModule(parentId, chunks[0]) + "!" + window.normalizeModule(parentId, chunks[1]);
-    }
-    // normalize relative requires
-    if (moduleName.charAt(0) == ".") {
-        var base = parentId.split("/").slice(0, -1).join("/");
-        moduleName = (base ? base + "/" : "") + moduleName;
-        
-        while (moduleName.indexOf(".") !== -1 && previous != moduleName) {
-            var previous = moduleName;
-            moduleName = moduleName.replace(/^\.\//, "").replace(/\/\.\//, "/").replace(/[^\/]+\/\.\.\//, "");
-        }
-    }
-    
-    return moduleName;
-};
-
-window.require = function require(parentId, id) {
-    if (!id) {
-        id = parentId;
-        parentId = null;
-    }
-    if (!id.charAt)
-        throw new Error("worker.js require() accepts only (parentId, id) as arguments");
-
-    id = window.normalizeModule(parentId, id);
-
-    var module = window.require.modules[id];
-    if (module) {
-        if (!module.initialized) {
-            module.initialized = true;
-            module.exports = module.factory().exports;
-        }
-        return module.exports;
-    }
-   
-    if (!window.require.tlns)
-        return console.log("unable to load " + id);
-    
-    var path = resolveModuleId(id, window.require.tlns);
-    if (path.slice(-3) != ".js") path += ".js";
-    
-    window.require.id = id;
-    window.require.modules[id] = {}; // prevent infinite loop on broken modules
-    importScripts(path);
-    return window.require(parentId, id);
-};
-function resolveModuleId(id, paths) {
-    var testPath = id, tail = "";
-    while (testPath) {
-        var alias = paths[testPath];
-        if (typeof alias == "string") {
-            return alias + tail;
-        } else if (alias) {
-            return  alias.location.replace(/\/*$/, "/") + (tail || alias.main || alias.name);
-        } else if (alias === false) {
-            return "";
-        }
-        var i = testPath.lastIndexOf("/");
-        if (i === -1) break;
-        tail = testPath.substr(i) + tail;
-        testPath = testPath.slice(0, i);
-    }
-    return id;
-}
-window.require.modules = {};
-window.require.tlns = {};
-
-window.define = function(id, deps, factory) {
-    if (arguments.length == 2) {
-        factory = deps;
-        if (typeof id != "string") {
-            deps = id;
-            id = window.require.id;
-        }
-    } else if (arguments.length == 1) {
-        factory = id;
-        deps = [];
-        id = window.require.id;
-    }
-    
-    if (typeof factory != "function") {
-        window.require.modules[id] = {
-            exports: factory,
-            initialized: true
-        };
-        return;
-    }
-
-    if (!deps.length)
-        // If there is no dependencies, we inject "require", "exports" and
-        // "module" as dependencies, to provide CommonJS compatibility.
-        deps = ["require", "exports", "module"];
-
-    var req = function(childId) {
-        return window.require(id, childId);
-    };
-
-    window.require.modules[id] = {
-        exports: {},
-        factory: function() {
-            var module = this;
-            var returnExports = factory.apply(this, deps.slice(0, factory.length).map(function(dep) {
-                switch (dep) {
-                    // Because "require", "exports" and "module" aren't actual
-                    // dependencies, we must handle them seperately.
-                    case "require": return req;
-                    case "exports": return module.exports;
-                    case "module":  return module;
-                    // But for all other dependencies, we can just go ahead and
-                    // require them.
-                    default:        return req(dep);
-                }
-            }));
-            if (returnExports)
-                module.exports = returnExports;
-            return module;
-        }
-    };
-};
-window.define.amd = {};
-window.require.tlns = {};
-window.initBaseUrls  = function initBaseUrls(topLevelNamespaces) {
-    for (var i in topLevelNamespaces)
-        this.require.tlns[i] = topLevelNamespaces[i];
-};
-
-window.initSender = function initSender() {
-
-    var EventEmitter = window.require("ace/lib/event_emitter").EventEmitter;
-    var oop = window.require("ace/lib/oop");
-    
-    var Sender = function() {};
-    
-    (function() {
-        
-        oop.implement(this, EventEmitter);
-                
-        this.callback = function(data, callbackId) {
-            postMessage({
-                type: "call",
-                id: callbackId,
-                data: data
-            });
-        };
-    
-        this.emit = function(name, data) {
-            postMessage({
-                type: "event",
-                name: name,
-                data: data
-            });
-        };
-        
-    }).call(Sender.prototype);
-    
-    return new Sender();
-};
-
-var main = window.main = null;
-var sender = window.sender = null;
-
-window.onmessage = function(e) {
-    var msg = e.data;
-    if (msg.event && sender) {
-        sender._signal(msg.event, msg.data);
-    }
-    else if (msg.command) {
-        if (main[msg.command])
-            main[msg.command].apply(main, msg.args);
-        else if (window[msg.command])
-            window[msg.command].apply(window, msg.args);
-        else
-            throw new Error("Unknown command:" + msg.command);
-    }
-    else if (msg.init) {
-        window.initBaseUrls(msg.tlns);
-        sender = window.sender = window.initSender();
-        var clazz = this.require(msg.module)[msg.classname];
-        main = window.main = new clazz(sender);
-    }
-};
-})(this);
-
-ace.define("ace/lib/oop",[], function(require, exports, module){"use strict";
-exports.inherits = function (ctor, superCtor) {
-    ctor.super_ = superCtor;
-    ctor.prototype = Object.create(superCtor.prototype, {
-        constructor: {
-            value: ctor,
-            enumerable: false,
-            writable: true,
-            configurable: true
-        }
-    });
-};
-exports.mixin = function (obj, mixin) {
-    for (var key in mixin) {
-        obj[key] = mixin[key];
-    }
-    return obj;
-};
-exports.implement = function (proto, mixin) {
-    exports.mixin(proto, mixin);
-};
-
-});
-
-ace.define("ace/apply_delta",[], function(require, exports, module){"use strict";
-function throwDeltaError(delta, errorText) {
-    console.log("Invalid Delta:", delta);
-    throw "Invalid Delta: " + errorText;
-}
-function positionInDocument(docLines, position) {
-    return position.row >= 0 && position.row < docLines.length &&
-        position.column >= 0 && position.column <= docLines[position.row].length;
-}
-function validateDelta(docLines, delta) {
-    if (delta.action != "insert" && delta.action != "remove")
-        throwDeltaError(delta, "delta.action must be 'insert' or 'remove'");
-    if (!(delta.lines instanceof Array))
-        throwDeltaError(delta, "delta.lines must be an Array");
-    if (!delta.start || !delta.end)
-        throwDeltaError(delta, "delta.start/end must be an present");
-    var start = delta.start;
-    if (!positionInDocument(docLines, delta.start))
-        throwDeltaError(delta, "delta.start must be contained in document");
-    var end = delta.end;
-    if (delta.action == "remove" && !positionInDocument(docLines, end))
-        throwDeltaError(delta, "delta.end must contained in document for 'remove' actions");
-    var numRangeRows = end.row - start.row;
-    var numRangeLastLineChars = (end.column - (numRangeRows == 0 ? start.column : 0));
-    if (numRangeRows != delta.lines.length - 1 || delta.lines[numRangeRows].length != numRangeLastLineChars)
-        throwDeltaError(delta, "delta.range must match delta lines");
-}
-exports.applyDelta = function (docLines, delta, doNotValidate) {
-    var row = delta.start.row;
-    var startColumn = delta.start.column;
-    var line = docLines[row] || "";
-    switch (delta.action) {
-        case "insert":
-            var lines = delta.lines;
-            if (lines.length === 1) {
-                docLines[row] = line.substring(0, startColumn) + delta.lines[0] + line.substring(startColumn);
-            }
-            else {
-                var args = [row, 1].concat(delta.lines);
-                docLines.splice.apply(docLines, args);
-                docLines[row] = line.substring(0, startColumn) + docLines[row];
-                docLines[row + delta.lines.length - 1] += line.substring(startColumn);
-            }
-            break;
-        case "remove":
-            var endColumn = delta.end.column;
-            var endRow = delta.end.row;
-            if (row === endRow) {
-                docLines[row] = line.substring(0, startColumn) + line.substring(endColumn);
-            }
-            else {
-                docLines.splice(row, endRow - row + 1, line.substring(0, startColumn) + docLines[endRow].substring(endColumn));
-            }
-            break;
-    }
-};
-
-});
-
-ace.define("ace/lib/event_emitter",[], function(require, exports, module){"use strict";
-var EventEmitter = {};
-var stopPropagation = function () { this.propagationStopped = true; };
-var preventDefault = function () { this.defaultPrevented = true; };
-EventEmitter._emit =
-    EventEmitter._dispatchEvent = function (eventName, e) {
-        this._eventRegistry || (this._eventRegistry = {});
-        this._defaultHandlers || (this._defaultHandlers = {});
-        var listeners = this._eventRegistry[eventName] || [];
-        var defaultHandler = this._defaultHandlers[eventName];
-        if (!listeners.length && !defaultHandler)
-            return;
-        if (typeof e != "object" || !e)
-            e = {};
-        if (!e.type)
-            e.type = eventName;
-        if (!e.stopPropagation)
-            e.stopPropagation = stopPropagation;
-        if (!e.preventDefault)
-            e.preventDefault = preventDefault;
-        listeners = listeners.slice();
-        for (var i = 0; i < listeners.length; i++) {
-            listeners[i](e, this);
-            if (e.propagationStopped)
-                break;
-        }
-        if (defaultHandler && !e.defaultPrevented)
-            return defaultHandler(e, this);
-    };
-EventEmitter._signal = function (eventName, e) {
-    var listeners = (this._eventRegistry || {})[eventName];
-    if (!listeners)
-        return;
-    listeners = listeners.slice();
-    for (var i = 0; i < listeners.length; i++)
-        listeners[i](e, this);
-};
-EventEmitter.once = function (eventName, callback) {
-    var _self = this;
-    this.on(eventName, function newCallback() {
-        _self.off(eventName, newCallback);
-        callback.apply(null, arguments);
-    });
-    if (!callback) {
-        return new Promise(function (resolve) {
-            callback = resolve;
-        });
-    }
-};
-EventEmitter.setDefaultHandler = function (eventName, callback) {
-    var handlers = this._defaultHandlers;
-    if (!handlers)
-        handlers = this._defaultHandlers = { _disabled_: {} };
-    if (handlers[eventName]) {
-        var old = handlers[eventName];
-        var disabled = handlers._disabled_[eventName];
-        if (!disabled)
-            handlers._disabled_[eventName] = disabled = [];
-        disabled.push(old);
-        var i = disabled.indexOf(callback);
-        if (i != -1)
-            disabled.splice(i, 1);
-    }
-    handlers[eventName] = callback;
-};
-EventEmitter.removeDefaultHandler = function (eventName, callback) {
-    var handlers = this._defaultHandlers;
-    if (!handlers)
-        return;
-    var disabled = handlers._disabled_[eventName];
-    if (handlers[eventName] == callback) {
-        if (disabled)
-            this.setDefaultHandler(eventName, disabled.pop());
-    }
-    else if (disabled) {
-        var i = disabled.indexOf(callback);
-        if (i != -1)
-            disabled.splice(i, 1);
-    }
-};
-EventEmitter.on =
-    EventEmitter.addEventListener = function (eventName, callback, capturing) {
-        this._eventRegistry = this._eventRegistry || {};
-        var listeners = this._eventRegistry[eventName];
-        if (!listeners)
-            listeners = this._eventRegistry[eventName] = [];
-        if (listeners.indexOf(callback) == -1)
-            listeners[capturing ? "unshift" : "push"](callback);
-        return callback;
-    };
-EventEmitter.off =
-    EventEmitter.removeListener =
-        EventEmitter.removeEventListener = function (eventName, callback) {
-            this._eventRegistry = this._eventRegistry || {};
-            var listeners = this._eventRegistry[eventName];
-            if (!listeners)
-                return;
-            var index = listeners.indexOf(callback);
-            if (index !== -1)
-                listeners.splice(index, 1);
-        };
-EventEmitter.removeAllListeners = function (eventName) {
-    if (!eventName)
-        this._eventRegistry = this._defaultHandlers = undefined;
-    if (this._eventRegistry)
-        this._eventRegistry[eventName] = undefined;
-    if (this._defaultHandlers)
-        this._defaultHandlers[eventName] = undefined;
-};
-exports.EventEmitter = EventEmitter;
-
-});
-
-ace.define("ace/range",[], function(require, exports, module){"use strict";
-var Range = /** @class */ (function () {
-    function Range(startRow, startColumn, endRow, endColumn) {
-        this.start = {
-            row: startRow,
-            column: startColumn
-        };
-        this.end = {
-            row: endRow,
-            column: endColumn
-        };
-    }
-    Range.prototype.isEqual = function (range) {
-        return this.start.row === range.start.row &&
-            this.end.row === range.end.row &&
-            this.start.column === range.start.column &&
-            this.end.column === range.end.column;
-    };
-    Range.prototype.toString = function () {
-        return ("Range: [" + this.start.row + "/" + this.start.column +
-            "] -> [" + this.end.row + "/" + this.end.column + "]");
-    };
-    Range.prototype.contains = function (row, column) {
-        return this.compare(row, column) == 0;
-    };
-    Range.prototype.compareRange = function (range) {
-        var cmp, end = range.end, start = range.start;
-        cmp = this.compare(end.row, end.column);
-        if (cmp == 1) {
-            cmp = this.compare(start.row, start.column);
-            if (cmp == 1) {
-                return 2;
-            }
-            else if (cmp == 0) {
-                return 1;
-            }
-            else {
-                return 0;
-            }
-        }
-        else if (cmp == -1) {
-            return -2;
-        }
-        else {
-            cmp = this.compare(start.row, start.column);
-            if (cmp == -1) {
-                return -1;
-            }
-            else if (cmp == 1) {
-                return 42;
-            }
-            else {
-                return 0;
-            }
-        }
-    };
-    Range.prototype.comparePoint = function (p) {
-        return this.compare(p.row, p.column);
-    };
-    Range.prototype.containsRange = function (range) {
-        return this.comparePoint(range.start) == 0 && this.comparePoint(range.end) == 0;
-    };
-    Range.prototype.intersects = function (range) {
-        var cmp = this.compareRange(range);
-        return (cmp == -1 || cmp == 0 || cmp == 1);
-    };
-    Range.prototype.isEnd = function (row, column) {
-        return this.end.row == row && this.end.column == column;
-    };
-    Range.prototype.isStart = function (row, column) {
-        return this.start.row == row && this.start.column == column;
-    };
-    Range.prototype.setStart = function (row, column) {
-        if (typeof row == "object") {
-            this.start.column = row.column;
-            this.start.row = row.row;
-        }
-        else {
-            this.start.row = row;
-            this.start.column = column;
-        }
-    };
-    Range.prototype.setEnd = function (row, column) {
-        if (typeof row == "object") {
-            this.end.column = row.column;
-            this.end.row = row.row;
-        }
-        else {
-            this.end.row = row;
-            this.end.column = column;
-        }
-    };
-    Range.prototype.inside = function (row, column) {
-        if (this.compare(row, column) == 0) {
-            if (this.isEnd(row, column) || this.isStart(row, column)) {
-                return false;
-            }
-            else {
-                return true;
-            }
-        }
-        return false;
-    };
-    Range.prototype.insideStart = function (row, column) {
-        if (this.compare(row, column) == 0) {
-            if (this.isEnd(row, column)) {
-                return false;
-            }
-            else {
-                return true;
-            }
-        }
-        return false;
-    };
-    Range.prototype.insideEnd = function (row, column) {
-        if (this.compare(row, column) == 0) {
-            if (this.isStart(row, column)) {
-                return false;
-            }
-            else {
-                return true;
-            }
-        }
-        return false;
-    };
-    Range.prototype.compare = function (row, column) {
-        if (!this.isMultiLine()) {
-            if (row === this.start.row) {
-                return column < this.start.column ? -1 : (column > this.end.column ? 1 : 0);
-            }
-        }
-        if (row < this.start.row)
-            return -1;
-        if (row > this.end.row)
-            return 1;
-        if (this.start.row === row)
-            return column >= this.start.column ? 0 : -1;
-        if (this.end.row === row)
-            return column <= this.end.column ? 0 : 1;
-        return 0;
-    };
-    Range.prototype.compareStart = function (row, column) {
-        if (this.start.row == row && this.start.column == column) {
-            return -1;
-        }
-        else {
-            return this.compare(row, column);
-        }
-    };
-    Range.prototype.compareEnd = function (row, column) {
-        if (this.end.row == row && this.end.column == column) {
-            return 1;
-        }
-        else {
-            return this.compare(row, column);
-        }
-    };
-    Range.prototype.compareInside = function (row, column) {
-        if (this.end.row == row && this.end.column == column) {
-            return 1;
-        }
-        else if (this.start.row == row && this.start.column == column) {
-            return -1;
-        }
-        else {
-            return this.compare(row, column);
-        }
-    };
-    Range.prototype.clipRows = function (firstRow, lastRow) {
-        if (this.end.row > lastRow)
-            var end = { row: lastRow + 1, column: 0 };
-        else if (this.end.row < firstRow)
-            var end = { row: firstRow, column: 0 };
-        if (this.start.row > lastRow)
-            var start = { row: lastRow + 1, column: 0 };
-        else if (this.start.row < firstRow)
-            var start = { row: firstRow, column: 0 };
-        return Range.fromPoints(start || this.start, end || this.end);
-    };
-    Range.prototype.extend = function (row, column) {
-        var cmp = this.compare(row, column);
-        if (cmp == 0)
-            return this;
-        else if (cmp == -1)
-            var start = { row: row, column: column };
-        else
-            var end = { row: row, column: column };
-        return Range.fromPoints(start || this.start, end || this.end);
-    };
-    Range.prototype.isEmpty = function () {
-        return (this.start.row === this.end.row && this.start.column === this.end.column);
-    };
-    Range.prototype.isMultiLine = function () {
-        return (this.start.row !== this.end.row);
-    };
-    Range.prototype.clone = function () {
-        return Range.fromPoints(this.start, this.end);
-    };
-    Range.prototype.collapseRows = function () {
-        if (this.end.column == 0)
-            return new Range(this.start.row, 0, Math.max(this.start.row, this.end.row - 1), 0);
-        else
-            return new Range(this.start.row, 0, this.end.row, 0);
-    };
-    Range.prototype.toScreenRange = function (session) {
-        var screenPosStart = session.documentToScreenPosition(this.start);
-        var screenPosEnd = session.documentToScreenPosition(this.end);
-        return new Range(screenPosStart.row, screenPosStart.column, screenPosEnd.row, screenPosEnd.column);
-    };
-    Range.prototype.moveBy = function (row, column) {
-        this.start.row += row;
-        this.start.column += column;
-        this.end.row += row;
-        this.end.column += column;
-    };
-    return Range;
-}());
-Range.fromPoints = function (start, end) {
-    return new Range(start.row, start.column, end.row, end.column);
-};
-Range.comparePoints = function (p1, p2) {
-    return p1.row - p2.row || p1.column - p2.column;
-};
-exports.Range = Range;
-
-});
-
-ace.define("ace/anchor",[], function(require, exports, module){"use strict";
-var oop = require("./lib/oop");
-var EventEmitter = require("./lib/event_emitter").EventEmitter;
-var Anchor = /** @class */ (function () {
-    function Anchor(doc, row, column) {
-        this.$onChange = this.onChange.bind(this);
-        this.attach(doc);
-        if (typeof row != "number")
-            this.setPosition(row.row, row.column);
-        else
-            this.setPosition(row, column);
-    }
-    Anchor.prototype.getPosition = function () {
-        return this.$clipPositionToDocument(this.row, this.column);
-    };
-    Anchor.prototype.getDocument = function () {
-        return this.document;
-    };
-    Anchor.prototype.onChange = function (delta) {
-        if (delta.start.row == delta.end.row && delta.start.row != this.row)
-            return;
-        if (delta.start.row > this.row)
-            return;
-        var point = $getTransformedPoint(delta, { row: this.row, column: this.column }, this.$insertRight);
-        this.setPosition(point.row, point.column, true);
-    };
-    Anchor.prototype.setPosition = function (row, column, noClip) {
-        var pos;
-        if (noClip) {
-            pos = {
-                row: row,
-                column: column
-            };
-        }
-        else {
-            pos = this.$clipPositionToDocument(row, column);
-        }
-        if (this.row == pos.row && this.column == pos.column)
-            return;
-        var old = {
-            row: this.row,
-            column: this.column
-        };
-        this.row = pos.row;
-        this.column = pos.column;
-        this._signal("change", {
-            old: old,
-            value: pos
-        });
-    };
-    Anchor.prototype.detach = function () {
-        this.document.off("change", this.$onChange);
-    };
-    Anchor.prototype.attach = function (doc) {
-        this.document = doc || this.document;
-        this.document.on("change", this.$onChange);
-    };
-    Anchor.prototype.$clipPositionToDocument = function (row, column) {
-        var pos = {};
-        if (row >= this.document.getLength()) {
-            pos.row = Math.max(0, this.document.getLength() - 1);
-            pos.column = this.document.getLine(pos.row).length;
-        }
-        else if (row < 0) {
-            pos.row = 0;
-            pos.column = 0;
-        }
-        else {
-            pos.row = row;
-            pos.column = Math.min(this.document.getLine(pos.row).length, Math.max(0, column));
-        }
-        if (column < 0)
-            pos.column = 0;
-        return pos;
-    };
-    return Anchor;
-}());
-Anchor.prototype.$insertRight = false;
-oop.implement(Anchor.prototype, EventEmitter);
-function $pointsInOrder(point1, point2, equalPointsInOrder) {
-    var bColIsAfter = equalPointsInOrder ? point1.column <= point2.column : point1.column < point2.column;
-    return (point1.row < point2.row) || (point1.row == point2.row && bColIsAfter);
-}
-function $getTransformedPoint(delta, point, moveIfEqual) {
-    var deltaIsInsert = delta.action == "insert";
-    var deltaRowShift = (deltaIsInsert ? 1 : -1) * (delta.end.row - delta.start.row);
-    var deltaColShift = (deltaIsInsert ? 1 : -1) * (delta.end.column - delta.start.column);
-    var deltaStart = delta.start;
-    var deltaEnd = deltaIsInsert ? deltaStart : delta.end; // Collapse insert range.
-    if ($pointsInOrder(point, deltaStart, moveIfEqual)) {
-        return {
-            row: point.row,
-            column: point.column
-        };
-    }
-    if ($pointsInOrder(deltaEnd, point, !moveIfEqual)) {
-        return {
-            row: point.row + deltaRowShift,
-            column: point.column + (point.row == deltaEnd.row ? deltaColShift : 0)
-        };
-    }
-    return {
-        row: deltaStart.row,
-        column: deltaStart.column
-    };
-}
-exports.Anchor = Anchor;
-
-});
-
-ace.define("ace/document",[], function(require, exports, module){"use strict";
-var oop = require("./lib/oop");
-var applyDelta = require("./apply_delta").applyDelta;
-var EventEmitter = require("./lib/event_emitter").EventEmitter;
-var Range = require("./range").Range;
-var Anchor = require("./anchor").Anchor;
-var Document = /** @class */ (function () {
-    function Document(textOrLines) {
-        this.$lines = [""];
-        if (textOrLines.length === 0) {
-            this.$lines = [""];
-        }
-        else if (Array.isArray(textOrLines)) {
-            this.insertMergedLines({ row: 0, column: 0 }, textOrLines);
-        }
-        else {
-            this.insert({ row: 0, column: 0 }, textOrLines);
-        }
-    }
-    Document.prototype.setValue = function (text) {
-        var len = this.getLength() - 1;
-        this.remove(new Range(0, 0, len, this.getLine(len).length));
-        this.insert({ row: 0, column: 0 }, text || "");
-    };
-    Document.prototype.getValue = function () {
-        return this.getAllLines().join(this.getNewLineCharacter());
-    };
-    Document.prototype.createAnchor = function (row, column) {
-        return new Anchor(this, row, column);
-    };
-    Document.prototype.$detectNewLine = function (text) {
-        var match = text.match(/^.*?(\r\n|\r|\n)/m);
-        this.$autoNewLine = match ? match[1] : "\n";
-        this._signal("changeNewLineMode");
-    };
-    Document.prototype.getNewLineCharacter = function () {
-        switch (this.$newLineMode) {
-            case "windows":
-                return "\r\n";
-            case "unix":
-                return "\n";
-            default:
-                return this.$autoNewLine || "\n";
-        }
-    };
-    Document.prototype.setNewLineMode = function (newLineMode) {
-        if (this.$newLineMode === newLineMode)
-            return;
-        this.$newLineMode = newLineMode;
-        this._signal("changeNewLineMode");
-    };
-    Document.prototype.getNewLineMode = function () {
-        return this.$newLineMode;
-    };
-    Document.prototype.isNewLine = function (text) {
-        return (text == "\r\n" || text == "\r" || text == "\n");
-    };
-    Document.prototype.getLine = function (row) {
-        return this.$lines[row] || "";
-    };
-    Document.prototype.getLines = function (firstRow, lastRow) {
-        return this.$lines.slice(firstRow, lastRow + 1);
-    };
-    Document.prototype.getAllLines = function () {
-        return this.getLines(0, this.getLength());
-    };
-    Document.prototype.getLength = function () {
-        return this.$lines.length;
-    };
-    Document.prototype.getTextRange = function (range) {
-        return this.getLinesForRange(range).join(this.getNewLineCharacter());
-    };
-    Document.prototype.getLinesForRange = function (range) {
-        var lines;
-        if (range.start.row === range.end.row) {
-            lines = [this.getLine(range.start.row).substring(range.start.column, range.end.column)];
-        }
-        else {
-            lines = this.getLines(range.start.row, range.end.row);
-            lines[0] = (lines[0] || "").substring(range.start.column);
-            var l = lines.length - 1;
-            if (range.end.row - range.start.row == l)
-                lines[l] = lines[l].substring(0, range.end.column);
-        }
-        return lines;
-    };
-    Document.prototype.insertLines = function (row, lines) {
-        console.warn("Use of document.insertLines is deprecated. Use the insertFullLines method instead.");
-        return this.insertFullLines(row, lines);
-    };
-    Document.prototype.removeLines = function (firstRow, lastRow) {
-        console.warn("Use of document.removeLines is deprecated. Use the removeFullLines method instead.");
-        return this.removeFullLines(firstRow, lastRow);
-    };
-    Document.prototype.insertNewLine = function (position) {
-        console.warn("Use of document.insertNewLine is deprecated. Use insertMergedLines(position, ['', '']) instead.");
-        return this.insertMergedLines(position, ["", ""]);
-    };
-    Document.prototype.insert = function (position, text) {
-        if (this.getLength() <= 1)
-            this.$detectNewLine(text);
-        return this.insertMergedLines(position, this.$split(text));
-    };
-    Document.prototype.insertInLine = function (position, text) {
-        var start = this.clippedPos(position.row, position.column);
-        var end = this.pos(position.row, position.column + text.length);
-        this.applyDelta({
-            start: start,
-            end: end,
-            action: "insert",
-            lines: [text]
-        }, true);
-        return this.clonePos(end);
-    };
-    Document.prototype.clippedPos = function (row, column) {
-        var length = this.getLength();
-        if (row === undefined) {
-            row = length;
-        }
-        else if (row < 0) {
-            row = 0;
-        }
-        else if (row >= length) {
-            row = length - 1;
-            column = undefined;
-        }
-        var line = this.getLine(row);
-        if (column == undefined)
-            column = line.length;
-        column = Math.min(Math.max(column, 0), line.length);
-        return { row: row, column: column };
-    };
-    Document.prototype.clonePos = function (pos) {
-        return { row: pos.row, column: pos.column };
-    };
-    Document.prototype.pos = function (row, column) {
-        return { row: row, column: column };
-    };
-    Document.prototype.$clipPosition = function (position) {
-        var length = this.getLength();
-        if (position.row >= length) {
-            position.row = Math.max(0, length - 1);
-            position.column = this.getLine(length - 1).length;
-        }
-        else {
-            position.row = Math.max(0, position.row);
-            position.column = Math.min(Math.max(position.column, 0), this.getLine(position.row).length);
-        }
-        return position;
-    };
-    Document.prototype.insertFullLines = function (row, lines) {
-        row = Math.min(Math.max(row, 0), this.getLength());
-        var column = 0;
-        if (row < this.getLength()) {
-            lines = lines.concat([""]);
-            column = 0;
-        }
-        else {
-            lines = [""].concat(lines);
-            row--;
-            column = this.$lines[row].length;
-        }
-        this.insertMergedLines({ row: row, column: column }, lines);
-    };
-    Document.prototype.insertMergedLines = function (position, lines) {
-        var start = this.clippedPos(position.row, position.column);
-        var end = {
-            row: start.row + lines.length - 1,
-            column: (lines.length == 1 ? start.column : 0) + lines[lines.length - 1].length
-        };
-        this.applyDelta({
-            start: start,
-            end: end,
-            action: "insert",
-            lines: lines
-        });
-        return this.clonePos(end);
-    };
-    Document.prototype.remove = function (range) {
-        var start = this.clippedPos(range.start.row, range.start.column);
-        var end = this.clippedPos(range.end.row, range.end.column);
-        this.applyDelta({
-            start: start,
-            end: end,
-            action: "remove",
-            lines: this.getLinesForRange({ start: start, end: end })
-        });
-        return this.clonePos(start);
-    };
-    Document.prototype.removeInLine = function (row, startColumn, endColumn) {
-        var start = this.clippedPos(row, startColumn);
-        var end = this.clippedPos(row, endColumn);
-        this.applyDelta({
-            start: start,
-            end: end,
-            action: "remove",
-            lines: this.getLinesForRange({ start: start, end: end })
-        }, true);
-        return this.clonePos(start);
-    };
-    Document.prototype.removeFullLines = function (firstRow, lastRow) {
-        firstRow = Math.min(Math.max(0, firstRow), this.getLength() - 1);
-        lastRow = Math.min(Math.max(0, lastRow), this.getLength() - 1);
-        var deleteFirstNewLine = lastRow == this.getLength() - 1 && firstRow > 0;
-        var deleteLastNewLine = lastRow < this.getLength() - 1;
-        var startRow = (deleteFirstNewLine ? firstRow - 1 : firstRow);
-        var startCol = (deleteFirstNewLine ? this.getLine(startRow).length : 0);
-        var endRow = (deleteLastNewLine ? lastRow + 1 : lastRow);
-        var endCol = (deleteLastNewLine ? 0 : this.getLine(endRow).length);
-        var range = new Range(startRow, startCol, endRow, endCol);
-        var deletedLines = this.$lines.slice(firstRow, lastRow + 1);
-        this.applyDelta({
-            start: range.start,
-            end: range.end,
-            action: "remove",
-            lines: this.getLinesForRange(range)
-        });
-        return deletedLines;
-    };
-    Document.prototype.removeNewLine = function (row) {
-        if (row < this.getLength() - 1 && row >= 0) {
-            this.applyDelta({
-                start: this.pos(row, this.getLine(row).length),
-                end: this.pos(row + 1, 0),
-                action: "remove",
-                lines: ["", ""]
-            });
-        }
-    };
-    Document.prototype.replace = function (range, text) {
-        if (!(range instanceof Range))
-            range = Range.fromPoints(range.start, range.end);
-        if (text.length === 0 && range.isEmpty())
-            return range.start;
-        if (text == this.getTextRange(range))
-            return range.end;
-        this.remove(range);
-        var end;
-        if (text) {
-            end = this.insert(range.start, text);
-        }
-        else {
-            end = range.start;
-        }
-        return end;
-    };
-    Document.prototype.applyDeltas = function (deltas) {
-        for (var i = 0; i < deltas.length; i++) {
-            this.applyDelta(deltas[i]);
-        }
-    };
-    Document.prototype.revertDeltas = function (deltas) {
-        for (var i = deltas.length - 1; i >= 0; i--) {
-            this.revertDelta(deltas[i]);
-        }
-    };
-    Document.prototype.applyDelta = function (delta, doNotValidate) {
-        var isInsert = delta.action == "insert";
-        if (isInsert ? delta.lines.length <= 1 && !delta.lines[0]
-            : !Range.comparePoints(delta.start, delta.end)) {
-            return;
-        }
-        if (isInsert && delta.lines.length > 20000) {
-            this.$splitAndapplyLargeDelta(delta, 20000);
-        }
-        else {
-            applyDelta(this.$lines, delta, doNotValidate);
-            this._signal("change", delta);
-        }
-    };
-    Document.prototype.$safeApplyDelta = function (delta) {
-        var docLength = this.$lines.length;
-        if (delta.action == "remove" && delta.start.row < docLength && delta.end.row < docLength
-            || delta.action == "insert" && delta.start.row <= docLength) {
-            this.applyDelta(delta);
-        }
-    };
-    Document.prototype.$splitAndapplyLargeDelta = function (delta, MAX) {
-        var lines = delta.lines;
-        var l = lines.length - MAX + 1;
-        var row = delta.start.row;
-        var column = delta.start.column;
-        for (var from = 0, to = 0; from < l; from = to) {
-            to += MAX - 1;
-            var chunk = lines.slice(from, to);
-            chunk.push("");
-            this.applyDelta({
-                start: this.pos(row + from, column),
-                end: this.pos(row + to, column = 0),
-                action: delta.action,
-                lines: chunk
-            }, true);
-        }
-        delta.lines = lines.slice(from);
-        delta.start.row = row + from;
-        delta.start.column = column;
-        this.applyDelta(delta, true);
-    };
-    Document.prototype.revertDelta = function (delta) {
-        this.$safeApplyDelta({
-            start: this.clonePos(delta.start),
-            end: this.clonePos(delta.end),
-            action: (delta.action == "insert" ? "remove" : "insert"),
-            lines: delta.lines.slice()
-        });
-    };
-    Document.prototype.indexToPosition = function (index, startRow) {
-        var lines = this.$lines || this.getAllLines();
-        var newlineLength = this.getNewLineCharacter().length;
-        for (var i = startRow || 0, l = lines.length; i < l; i++) {
-            index -= lines[i].length + newlineLength;
-            if (index < 0)
-                return { row: i, column: index + lines[i].length + newlineLength };
-        }
-        return { row: l - 1, column: index + lines[l - 1].length + newlineLength };
-    };
-    Document.prototype.positionToIndex = function (pos, startRow) {
-        var lines = this.$lines || this.getAllLines();
-        var newlineLength = this.getNewLineCharacter().length;
-        var index = 0;
-        var row = Math.min(pos.row, lines.length);
-        for (var i = startRow || 0; i < row; ++i)
-            index += lines[i].length + newlineLength;
-        return index + pos.column;
-    };
-    Document.prototype.$split = function (text) {
-        return text.split(/\r\n|\r|\n/);
-    };
-    return Document;
-}());
-Document.prototype.$autoNewLine = "";
-Document.prototype.$newLineMode = "auto";
-oop.implement(Document.prototype, EventEmitter);
-exports.Document = Document;
-
-});
-
-ace.define("ace/lib/deep_copy",[], function(require, exports, module){exports.deepCopy = function deepCopy(obj) {
-    if (typeof obj !== "object" || !obj)
-        return obj;
-    var copy;
-    if (Array.isArray(obj)) {
-        copy = [];
-        for (var key = 0; key < obj.length; key++) {
-            copy[key] = deepCopy(obj[key]);
-        }
-        return copy;
-    }
-    if (Object.prototype.toString.call(obj) !== "[object Object]")
-        return obj;
-    copy = {};
-    for (var key in obj)
-        copy[key] = deepCopy(obj[key]);
-    return copy;
-};
-
-});
-
-ace.define("ace/lib/lang",[], function(require, exports, module){"use strict";
-exports.last = function (a) {
-    return a[a.length - 1];
-};
-exports.stringReverse = function (string) {
-    return string.split("").reverse().join("");
-};
-exports.stringRepeat = function (string, count) {
-    var result = '';
-    while (count > 0) {
-        if (count & 1)
-            result += string;
-        if (count >>= 1)
-            string += string;
-    }
-    return result;
-};
-var trimBeginRegexp = /^\s\s*/;
-var trimEndRegexp = /\s\s*$/;
-exports.stringTrimLeft = function (string) {
-    return string.replace(trimBeginRegexp, '');
-};
-exports.stringTrimRight = function (string) {
-    return string.replace(trimEndRegexp, '');
-};
-exports.copyObject = function (obj) {
-    var copy = {};
-    for (var key in obj) {
-        copy[key] = obj[key];
-    }
-    return copy;
-};
-exports.copyArray = function (array) {
-    var copy = [];
-    for (var i = 0, l = array.length; i < l; i++) {
-        if (array[i] && typeof array[i] == "object")
-            copy[i] = this.copyObject(array[i]);
-        else
-            copy[i] = array[i];
-    }
-    return copy;
-};
-exports.deepCopy = require("./deep_copy").deepCopy;
-exports.arrayToMap = function (arr) {
-    var map = {};
-    for (var i = 0; i < arr.length; i++) {
-        map[arr[i]] = 1;
-    }
-    return map;
-};
-exports.createMap = function (props) {
-    var map = Object.create(null);
-    for (var i in props) {
-        map[i] = props[i];
-    }
-    return map;
-};
-exports.arrayRemove = function (array, value) {
-    for (var i = 0; i <= array.length; i++) {
-        if (value === array[i]) {
-            array.splice(i, 1);
-        }
-    }
-};
-exports.escapeRegExp = function (str) {
-    return str.replace(/([.*+?^${}()|[\]\/\\])/g, '\\$1');
-};
-exports.escapeHTML = function (str) {
-    return ("" + str).replace(/&/g, "&#38;").replace(/"/g, "&#34;").replace(/'/g, "&#39;").replace(/</g, "&#60;");
-};
-exports.getMatchOffsets = function (string, regExp) {
-    var matches = [];
-    string.replace(regExp, function (str) {
-        matches.push({
-            offset: arguments[arguments.length - 2],
-            length: str.length
-        });
-    });
-    return matches;
-};
-exports.deferredCall = function (fcn) {
-    var timer = null;
-    var callback = function () {
-        timer = null;
-        fcn();
-    };
-    var deferred = function (timeout) {
-        deferred.cancel();
-        timer = setTimeout(callback, timeout || 0);
-        return deferred;
-    };
-    deferred.schedule = deferred;
-    deferred.call = function () {
-        this.cancel();
-        fcn();
-        return deferred;
-    };
-    deferred.cancel = function () {
-        clearTimeout(timer);
-        timer = null;
-        return deferred;
-    };
-    deferred.isPending = function () {
-        return timer;
-    };
-    return deferred;
-};
-exports.delayedCall = function (fcn, defaultTimeout) {
-    var timer = null;
-    var callback = function () {
-        timer = null;
-        fcn();
-    };
-    var _self = function (timeout) {
-        if (timer == null)
-            timer = setTimeout(callback, timeout || defaultTimeout);
-    };
-    _self.delay = function (timeout) {
-        timer && clearTimeout(timer);
-        timer = setTimeout(callback, timeout || defaultTimeout);
-    };
-    _self.schedule = _self;
-    _self.call = function () {
-        this.cancel();
-        fcn();
-    };
-    _self.cancel = function () {
-        timer && clearTimeout(timer);
-        timer = null;
-    };
-    _self.isPending = function () {
-        return timer;
-    };
-    return _self;
-};
-exports.supportsLookbehind = function () {
-    try {
-        new RegExp('(?<=.)');
-    }
-    catch (e) {
-        return false;
-    }
-    return true;
-};
-exports.skipEmptyMatch = function (line, last, supportsUnicodeFlag) {
-    return supportsUnicodeFlag && line.codePointAt(last) > 0xffff ? 2 : 1;
-};
-
-});
-
-ace.define("ace/worker/mirror",[], function(require, exports, module) {
-"use strict";
-
-var Document = require("../document").Document;
-var lang = require("../lib/lang");
-    
-var Mirror = exports.Mirror = function(sender) {
-    this.sender = sender;
-    var doc = this.doc = new Document("");
-    
-    var deferredUpdate = this.deferredUpdate = lang.delayedCall(this.onUpdate.bind(this));
-    
-    var _self = this;
-    sender.on("change", function(e) {
-        var data = e.data;
-        if (data[0].start) {
-            doc.applyDeltas(data);
-        } else {
-            for (var i = 0; i < data.length; i += 2) {
-                var d, err; 
-                if (Array.isArray(data[i+1])) {
-                    d = {action: "insert", start: data[i], lines: data[i+1]};
-                } else {
-                    d = {action: "remove", start: data[i], end: data[i+1]};
-                }
-                
-                if ((d.action == "insert" ? d.start : d.end).row >= doc.$lines.length) {
-                    err = new Error("Invalid delta");
-                    err.data = {
-                        path: _self.$path,
-                        linesLength: doc.$lines.length,
-                        start: d.start,
-                        end: d.end
-                    };
-                    throw err;
-                }
-
-                doc.applyDelta(d, true);
-            }
-        }
-        if (_self.$timeout)
-            return deferredUpdate.schedule(_self.$timeout);
-        _self.onUpdate();
-    });
-};
-
-(function() {
-    
-    this.$timeout = 500;
-    
-    this.setTimeout = function(timeout) {
-        this.$timeout = timeout;
-    };
-    
-    this.setValue = function(value) {
-        this.doc.setValue(value);
-        this.deferredUpdate.schedule(this.$timeout);
-    };
-    
-    this.getValue = function(callbackId) {
-        this.sender.callback(this.doc.getValue(), callbackId);
-    };
-    
-    this.onUpdate = function() {
-    };
-    
-    this.isPending = function() {
-        return this.deferredUpdate.isPending();
-    };
-    
-}).call(Mirror.prototype);
-
-});
-
-ace.define("ace/mode/lua/luaparse",[], function(require, exports, module) {
-
-(function (root, name, factory) {
-   factory(exports)
-}(this, 'luaparse', function (exports) {
-  'use strict';
-
-  exports.version = "0.3.1";
-
-  var input, options, length, features, encodingMode;
-  var defaultOptions = exports.defaultOptions = {
-      wait: false
-    , comments: true
-    , scope: false
-    , locations: false
-    , ranges: false
-    , onCreateNode: null
-    , onCreateScope: null
-    , onDestroyScope: null
-    , onLocalDeclaration: null
-    , luaVersion: '5.3'
-    , encodingMode: 'none'
-  };
-
-  function encodeUTF8(codepoint, highMask) {
-    highMask = highMask || 0;
-
-    if (codepoint < 0x80) {
-      return String.fromCharCode(codepoint);
-    } else if (codepoint < 0x800) {
-      return String.fromCharCode(
-        highMask | 0xc0 |  (codepoint >>  6)        ,
-        highMask | 0x80 | ( codepoint        & 0x3f)
-      );
-    } else if (codepoint < 0x10000) {
-      return String.fromCharCode(
-        highMask | 0xe0 |  (codepoint >> 12)        ,
-        highMask | 0x80 | ((codepoint >>  6) & 0x3f),
-        highMask | 0x80 | ( codepoint        & 0x3f)
-      );
-    } else /* istanbul ignore else */ if (codepoint < 0x110000) {
-      return String.fromCharCode(
-        highMask | 0xf0 |  (codepoint >> 18)        ,
-        highMask | 0x80 | ((codepoint >> 12) & 0x3f),
-        highMask | 0x80 | ((codepoint >>  6) & 0x3f),
-        highMask | 0x80 | ( codepoint        & 0x3f)
-      );
-    } else {
-      return null;
-    }
-  }
-
-  function toHex(num, digits) {
-    var result = num.toString(16);
-    while (result.length < digits)
-      result = '0' + result;
-    return result;
-  }
-
-  function checkChars(rx) {
-    return function (s) {
-      var m = rx.exec(s);
-      if (!m)
-        return s;
-      raise(null, errors.invalidCodeUnit, toHex(m[0].charCodeAt(0), 4).toUpperCase());
-    };
-  }
-
-  var encodingModes = {
-    'pseudo-latin1': {
-      fixup: checkChars(/[^\x00-\xff]/),
-      encodeByte: function (value) {
-        if (value === null)
-          return '';
-        return String.fromCharCode(value);
-      },
-      encodeUTF8: function (codepoint) {
-        return encodeUTF8(codepoint);
-      },
-    },
-    'x-user-defined': {
-      fixup: checkChars(/[^\x00-\x7f\uf780-\uf7ff]/),
-      encodeByte: function (value) {
-        if (value === null)
-          return '';
-        if (value >= 0x80)
-          return String.fromCharCode(value | 0xf700);
-        return String.fromCharCode(value);
-      },
-      encodeUTF8: function (codepoint) {
-        return encodeUTF8(codepoint, 0xf700);
-      }
-    },
-    'none': {
-      discardStrings: true,
-      fixup: function (s) {
-        return s;
-      },
-      encodeByte: function (value) {
-        return '';
-      },
-      encodeUTF8: function (codepoint) {
-        return '';
-      }
-    }
-  };
-
-  var EOF = 1, StringLiteral = 2, Keyword = 4, Identifier = 8
-    , NumericLiteral = 16, Punctuator = 32, BooleanLiteral = 64
-    , NilLiteral = 128, VarargLiteral = 256;
-
-  exports.tokenTypes = { EOF: EOF, StringLiteral: StringLiteral
-    , Keyword: Keyword, Identifier: Identifier, NumericLiteral: NumericLiteral
-    , Punctuator: Punctuator, BooleanLiteral: BooleanLiteral
-    , NilLiteral: NilLiteral, VarargLiteral: VarargLiteral
-  };
-
-  var errors = exports.errors = {
-      unexpected: 'unexpected %1 \'%2\' near \'%3\''
-    , unexpectedEOF: 'unexpected symbol near \'<eof>\''
-    , expected: '\'%1\' expected near \'%2\''
-    , expectedToken: '%1 expected near \'%2\''
-    , unfinishedString: 'unfinished string near \'%1\''
-    , malformedNumber: 'malformed number near \'%1\''
-    , decimalEscapeTooLarge: 'decimal escape too large near \'%1\''
-    , invalidEscape: 'invalid escape sequence near \'%1\''
-    , hexadecimalDigitExpected: 'hexadecimal digit expected near \'%1\''
-    , braceExpected: 'missing \'%1\' near \'%2\''
-    , tooLargeCodepoint: 'UTF-8 value too large near \'%1\''
-    , unfinishedLongString: 'unfinished long string (starting at line %1) near \'%2\''
-    , unfinishedLongComment: 'unfinished long comment (starting at line %1) near \'%2\''
-    , ambiguousSyntax: 'ambiguous syntax (function call x new statement) near \'%1\''
-    , noLoopToBreak: 'no loop to break near \'%1\''
-    , labelAlreadyDefined: 'label \'%1\' already defined on line %2'
-    , labelNotVisible: 'no visible label \'%1\' for <goto>'
-    , gotoJumpInLocalScope: '<goto %1> jumps into the scope of local \'%2\''
-    , cannotUseVararg: 'cannot use \'...\' outside a vararg function near \'%1\''
-    , invalidCodeUnit: 'code unit U+%1 is not allowed in the current encoding mode'
-  };
-
-  var ast = exports.ast = {
-      labelStatement: function(label) {
-      return {
-          type: 'LabelStatement'
-        , label: label
-      };
-    }
-
-    , breakStatement: function() {
-      return {
-          type: 'BreakStatement'
-      };
-    }
-
-    , gotoStatement: function(label) {
-      return {
-          type: 'GotoStatement'
-        , label: label
-      };
-    }
-
-    , returnStatement: function(args) {
-      return {
-          type: 'ReturnStatement'
-        , 'arguments': args
-      };
-    }
-
-    , ifStatement: function(clauses) {
-      return {
-          type: 'IfStatement'
-        , clauses: clauses
-      };
-    }
-    , ifClause: function(condition, body) {
-      return {
-          type: 'IfClause'
-        , condition: condition
-        , body: body
-      };
-    }
-    , elseifClause: function(condition, body) {
-      return {
-          type: 'ElseifClause'
-        , condition: condition
-        , body: body
-      };
-    }
-    , elseClause: function(body) {
-      return {
-          type: 'ElseClause'
-        , body: body
-      };
-    }
-
-    , whileStatement: function(condition, body) {
-      return {
-          type: 'WhileStatement'
-        , condition: condition
-        , body: body
-      };
-    }
-
-    , doStatement: function(body) {
-      return {
-          type: 'DoStatement'
-        , body: body
-      };
-    }
-
-    , repeatStatement: function(condition, body) {
-      return {
-          type: 'RepeatStatement'
-        , condition: condition
-        , body: body
-      };
-    }
-
-    , localStatement: function(variables, init) {
-      return {
-          type: 'LocalStatement'
-        , variables: variables
-        , init: init
-      };
-    }
-
-    , assignmentStatement: function(variables, init) {
-      return {
-          type: 'AssignmentStatement'
-        , variables: variables
-        , init: init
-      };
-    }
-
-    , callStatement: function(expression) {
-      return {
-          type: 'CallStatement'
-        , expression: expression
-      };
-    }
-
-    , functionStatement: function(identifier, parameters, isLocal, body) {
-      return {
-          type: 'FunctionDeclaration'
-        , identifier: identifier
-        , isLocal: isLocal
-        , parameters: parameters
-        , body: body
-      };
-    }
-
-    , forNumericStatement: function(variable, start, end, step, body) {
-      return {
-          type: 'ForNumericStatement'
-        , variable: variable
-        , start: start
-        , end: end
-        , step: step
-        , body: body
-      };
-    }
-
-    , forGenericStatement: function(variables, iterators, body) {
-      return {
-          type: 'ForGenericStatement'
-        , variables: variables
-        , iterators: iterators
-        , body: body
-      };
-    }
-
-    , chunk: function(body) {
-      return {
-          type: 'Chunk'
-        , body: body
-      };
-    }
-
-    , identifier: function(name) {
-      return {
-          type: 'Identifier'
-        , name: name
-      };
-    }
-
-    , literal: function(type, value, raw) {
-      type = (type === StringLiteral) ? 'StringLiteral'
-        : (type === NumericLiteral) ? 'NumericLiteral'
-        : (type === BooleanLiteral) ? 'BooleanLiteral'
-        : (type === NilLiteral) ? 'NilLiteral'
-        : 'VarargLiteral';
-
-      return {
-          type: type
-        , value: value
-        , raw: raw
-      };
-    }
-
-    , tableKey: function(key, value) {
-      return {
-          type: 'TableKey'
-        , key: key
-        , value: value
-      };
-    }
-    , tableKeyString: function(key, value) {
-      return {
-          type: 'TableKeyString'
-        , key: key
-        , value: value
-      };
-    }
-    , tableValue: function(value) {
-      return {
-          type: 'TableValue'
-        , value: value
-      };
-    }
-
-
-    , tableConstructorExpression: function(fields) {
-      return {
-          type: 'TableConstructorExpression'
-        , fields: fields
-      };
-    }
-    , binaryExpression: function(operator, left, right) {
-      var type = ('and' === operator || 'or' === operator) ?
-        'LogicalExpression' :
-        'BinaryExpression';
-
-      return {
-          type: type
-        , operator: operator
-        , left: left
-        , right: right
-      };
-    }
-    , unaryExpression: function(operator, argument) {
-      return {
-          type: 'UnaryExpression'
-        , operator: operator
-        , argument: argument
-      };
-    }
-    , memberExpression: function(base, indexer, identifier) {
-      return {
-          type: 'MemberExpression'
-        , indexer: indexer
-        , identifier: identifier
-        , base: base
-      };
-    }
-
-    , indexExpression: function(base, index) {
-      return {
-          type: 'IndexExpression'
-        , base: base
-        , index: index
-      };
-    }
-
-    , callExpression: function(base, args) {
-      return {
-          type: 'CallExpression'
-        , base: base
-        , 'arguments': args
-      };
-    }
-
-    , tableCallExpression: function(base, args) {
-      return {
-          type: 'TableCallExpression'
-        , base: base
-        , 'arguments': args
-      };
-    }
-
-    , stringCallExpression: function(base, argument) {
-      return {
-          type: 'StringCallExpression'
-        , base: base
-        , argument: argument
-      };
-    }
-
-    , comment: function(value, raw) {
-      return {
-          type: 'Comment'
-        , value: value
-        , raw: raw
-      };
-    }
-  };
-
-  function finishNode(node) {
-    if (trackLocations) {
-      var location = locations.pop();
-      location.complete();
-      location.bless(node);
-    }
-    if (options.onCreateNode) options.onCreateNode(node);
-    return node;
-  }
-
-  var slice = Array.prototype.slice
-    , toString = Object.prototype.toString
-    ;
-
-  var indexOf = /* istanbul ignore next */ function (array, element) {
-    for (var i = 0, length = array.length; i < length; ++i) {
-      if (array[i] === element) return i;
-    }
-    return -1;
-  };
-  if (Array.prototype.indexOf)
-    indexOf = function (array, element) {
-      return array.indexOf(element);
-    };
-
-  function indexOfObject(array, property, element) {
-    for (var i = 0, length = array.length; i < length; ++i) {
-      if (array[i][property] === element) return i;
-    }
-    return -1;
-  }
-
-  function sprintf(format) {
-    var args = slice.call(arguments, 1);
-    format = format.replace(/%(\d)/g, function (match, index) {
-      return '' + args[index - 1] || /* istanbul ignore next */ '';
-    });
-    return format;
-  }
-
-  var assign = /* istanbul ignore next */ function (dest) {
-    var args = slice.call(arguments, 1)
-      , src, prop;
-
-    for (var i = 0, length = args.length; i < length; ++i) {
-      src = args[i];
-      for (prop in src)
-        if (Object.prototype.hasOwnProperty.call(src, prop)) {
-          dest[prop] = src[prop];
-        }
-    }
-
-    return dest;
-  };
-  if (Object.assign)
-    assign = Object.assign;
-
-  exports.SyntaxError = SyntaxError;
-
-  function fixupError(e) {
-    if (!Object.create)
-      return e;
-    return Object.create(e, {
-      'line': { 'writable': true, value: e.line },
-      'index': { 'writable': true, value: e.index },
-      'column': { 'writable': true, value: e.column }
-    });
-  }
-
-  function raise(token) {
-    var message = sprintf.apply(null, slice.call(arguments, 1))
-      , error, col;
-
-    if (token === null || typeof token.line === 'undefined') {
-      col = index - lineStart + 1;
-      error = fixupError(new SyntaxError(sprintf('[%1:%2] %3', line, col, message)));
-      error.index = index;
-      error.line = line;
-      error.column = col;
-    } else {
-      col = token.range[0] - token.lineStart;
-      error = fixupError(new SyntaxError(sprintf('[%1:%2] %3', token.line, col, message)));
-      error.line = token.line;
-      error.index = token.range[0];
-      error.column = col;
-    }
-    throw error;
-  }
-
-  function tokenValue(token) {
-    var raw = input.slice(token.range[0], token.range[1]);
-    if (raw)
-      return raw;
-    return token.value;
-  }
-
-  function raiseUnexpectedToken(type, token) {
-    raise(token, errors.expectedToken, type, tokenValue(token));
-  }
-
-  function unexpected(found) {
-    var near = tokenValue(lookahead);
-    if ('undefined' !== typeof found.type) {
-      var type;
-      switch (found.type) {
-        case StringLiteral:   type = 'string';      break;
-        case Keyword:         type = 'keyword';     break;
-        case Identifier:      type = 'identifier';  break;
-        case NumericLiteral:  type = 'number';      break;
-        case Punctuator:      type = 'symbol';      break;
-        case BooleanLiteral:  type = 'boolean';     break;
-        case NilLiteral:
-          return raise(found, errors.unexpected, 'symbol', 'nil', near);
-        case EOF:
-          return raise(found, errors.unexpectedEOF);
-      }
-      return raise(found, errors.unexpected, type, tokenValue(found), near);
-    }
-    return raise(found, errors.unexpected, 'symbol', found, near);
-  }
-
-  var index
-    , token
-    , previousToken
-    , lookahead
-    , comments
-    , tokenStart
-    , line
-    , lineStart;
-
-  exports.lex = lex;
-
-  function lex() {
-    skipWhiteSpace();
-    while (45 === input.charCodeAt(index) &&
-           45 === input.charCodeAt(index + 1)) {
-      scanComment();
-      skipWhiteSpace();
-    }
-    if (index >= length) return {
-        type : EOF
-      , value: '<eof>'
-      , line: line
-      , lineStart: lineStart
-      , range: [index, index]
-    };
-
-    var charCode = input.charCodeAt(index)
-      , next = input.charCodeAt(index + 1);
-    tokenStart = index;
-    if (isIdentifierStart(charCode)) return scanIdentifierOrKeyword();
-
-    switch (charCode) {
-      case 39: case 34: // '"
-        return scanStringLiteral();
-
-      case 48: case 49: case 50: case 51: case 52: case 53:
-      case 54: case 55: case 56: case 57: // 0-9
-        return scanNumericLiteral();
-
-      case 46: // .
-        if (isDecDigit(next)) return scanNumericLiteral();
-        if (46 === next) {
-          if (46 === input.charCodeAt(index + 2)) return scanVarargLiteral();
-          return scanPunctuator('..');
-        }
-        return scanPunctuator('.');
-
-      case 61: // =
-        if (61 === next) return scanPunctuator('==');
-        return scanPunctuator('=');
-
-      case 62: // >
-        if (features.bitwiseOperators)
-          if (62 === next) return scanPunctuator('>>');
-        if (61 === next) return scanPunctuator('>=');
-        return scanPunctuator('>');
-
-      case 60: // <
-        if (features.bitwiseOperators)
-          if (60 === next) return scanPunctuator('<<');
-        if (61 === next) return scanPunctuator('<=');
-        return scanPunctuator('<');
-
-      case 126: // ~
-        if (61 === next) return scanPunctuator('~=');
-        if (!features.bitwiseOperators)
-          break;
-        return scanPunctuator('~');
-
-      case 58: // :
-        if (features.labels)
-          if (58 === next) return scanPunctuator('::');
-        return scanPunctuator(':');
-
-      case 91: // [
-        if (91 === next || 61 === next) return scanLongStringLiteral();
-        return scanPunctuator('[');
-
-      case 47: // /
-        if (features.integerDivision)
-          if (47 === next) return scanPunctuator('//');
-        return scanPunctuator('/');
-
-      case 38: case 124: // & |
-        if (!features.bitwiseOperators)
-          break;
-      case 42: case 94: case 37: case 44: case 123: case 125:
-      case 93: case 40: case 41: case 59: case 35: case 45:
-      case 43: // * ^ % , { } ] ( ) ; # - +
-        return scanPunctuator(input.charAt(index));
-    }
-
-    return unexpected(input.charAt(index));
-  }
-
-  function consumeEOL() {
-    var charCode = input.charCodeAt(index)
-      , peekCharCode = input.charCodeAt(index + 1);
-
-    if (isLineTerminator(charCode)) {
-      if (10 === charCode && 13 === peekCharCode) ++index;
-      if (13 === charCode && 10 === peekCharCode) ++index;
-      ++line;
-      lineStart = ++index;
-
-      return true;
-    }
-    return false;
-  }
-
-  function skipWhiteSpace() {
-    while (index < length) {
-      var charCode = input.charCodeAt(index);
-      if (isWhiteSpace(charCode)) {
-        ++index;
-      } else if (!consumeEOL()) {
-        break;
-      }
-    }
-  }
-
-  function scanIdentifierOrKeyword() {
-    var value, type;
-    while (isIdentifierPart(input.charCodeAt(++index)));
-    value = encodingMode.fixup(input.slice(tokenStart, index));
-    if (isKeyword(value)) {
-      type = Keyword;
-    } else if ('true' === value || 'false' === value) {
-      type = BooleanLiteral;
-      value = ('true' === value);
-    } else if ('nil' === value) {
-      type = NilLiteral;
-      value = null;
-    } else {
-      type = Identifier;
-    }
-
-    return {
-        type: type
-      , value: value
-      , line: line
-      , lineStart: lineStart
-      , range: [tokenStart, index]
-    };
-  }
-
-  function scanPunctuator(value) {
-    index += value.length;
-    return {
-        type: Punctuator
-      , value: value
-      , line: line
-      , lineStart: lineStart
-      , range: [tokenStart, index]
-    };
-  }
-
-  function scanVarargLiteral() {
-    index += 3;
-    return {
-        type: VarargLiteral
-      , value: '...'
-      , line: line
-      , lineStart: lineStart
-      , range: [tokenStart, index]
-    };
-  }
-
-  function scanStringLiteral() {
-    var delimiter = input.charCodeAt(index++)
-      , beginLine = line
-      , beginLineStart = lineStart
-      , stringStart = index
-      , string = encodingMode.discardStrings ? null : ''
-      , charCode;
-
-    for (;;) {
-      charCode = input.charCodeAt(index++);
-      if (delimiter === charCode) break;
-      if (index > length || isLineTerminator(charCode)) {
-        string += input.slice(stringStart, index - 1);
-        raise(null, errors.unfinishedString, input.slice(tokenStart, index - 1));
-      }
-      if (92 === charCode) { // backslash
-        if (!encodingMode.discardStrings) {
-          var beforeEscape = input.slice(stringStart, index - 1);
-          string += encodingMode.fixup(beforeEscape);
-        }
-        var escapeValue = readEscapeSequence();
-        if (!encodingMode.discardStrings)
-          string += escapeValue;
-        stringStart = index;
-      }
-    }
-    if (!encodingMode.discardStrings) {
-      string += encodingMode.encodeByte(null);
-      string += encodingMode.fixup(input.slice(stringStart, index - 1));
-    }
-
-    return {
-        type: StringLiteral
-      , value: string
-      , line: beginLine
-      , lineStart: beginLineStart
-      , lastLine: line
-      , lastLineStart: lineStart
-      , range: [tokenStart, index]
-    };
-  }
-
-  function scanLongStringLiteral() {
-    var beginLine = line
-      , beginLineStart = lineStart
-      , string = readLongString(false);
-    if (false === string) raise(token, errors.expected, '[', tokenValue(token));
-
-    return {
-        type: StringLiteral
-      , value: encodingMode.discardStrings ? null : encodingMode.fixup(string)
-      , line: beginLine
-      , lineStart: beginLineStart
-      , lastLine: line
-      , lastLineStart: lineStart
-      , range: [tokenStart, index]
-    };
-  }
-
-  function scanNumericLiteral() {
-    var character = input.charAt(index)
-      , next = input.charAt(index + 1);
-
-    var literal = ('0' === character && 'xX'.indexOf(next || null) >= 0) ?
-      readHexLiteral() : readDecLiteral();
-
-    var foundImaginaryUnit = readImaginaryUnitSuffix()
-      , foundInt64Suffix = readInt64Suffix();
-
-    if (foundInt64Suffix && (foundImaginaryUnit || literal.hasFractionPart)) {
-      raise(null, errors.malformedNumber, input.slice(tokenStart, index));
-    }
-
-    return {
-        type: NumericLiteral
-      , value: literal.value
-      , line: line
-      , lineStart: lineStart
-      , range: [tokenStart, index]
-    };
-  }
-
-  function readImaginaryUnitSuffix() {
-    if (!features.imaginaryNumbers) return;
-    if ('iI'.indexOf(input.charAt(index) || null) >= 0) {
-      ++index;
-      return true;
-    } else {
-      return false;
-    }
-  }
-
-  function readInt64Suffix() {
-    if (!features.integerSuffixes) return;
-
-    if ('uU'.indexOf(input.charAt(index) || null) >= 0) {
-      ++index;
-      if ('lL'.indexOf(input.charAt(index) || null) >= 0) {
-        ++index;
-        if ('lL'.indexOf(input.charAt(index) || null) >= 0) {
-          ++index;
-          return 'ULL';
-        } else {
-          raise(null, errors.malformedNumber, input.slice(tokenStart, index));
-        }
-      } else {
-        raise(null, errors.malformedNumber, input.slice(tokenStart, index));
-      }
-    } else if ('lL'.indexOf(input.charAt(index) || null) >= 0) {
-        ++index;
-        if ('lL'.indexOf(input.charAt(index) || null) >= 0) {
-          ++index;
-          return 'LL';
-        } else {
-          raise(null, errors.malformedNumber, input.slice(tokenStart, index));
-        }
-    }
-  }
-
-  function readHexLiteral() {
-    var fraction = 0 // defaults to 0 as it gets summed
-      , binaryExponent = 1 // defaults to 1 as it gets multiplied
-      , binarySign = 1 // positive
-      , digit, fractionStart, exponentStart, digitStart;
-
-    digitStart = index += 2; // Skip 0x part
-    if (!isHexDigit(input.charCodeAt(index)))
-      raise(null, errors.malformedNumber, input.slice(tokenStart, index));
-
-    while (isHexDigit(input.charCodeAt(index))) ++index;
-    digit = parseInt(input.slice(digitStart, index), 16);
-    var foundFraction = false;
-    if ('.' === input.charAt(index)) {
-      foundFraction = true;
-      fractionStart = ++index;
-
-      while (isHexDigit(input.charCodeAt(index))) ++index;
-      fraction = input.slice(fractionStart, index);
-      fraction = (fractionStart === index) ? 0
-        : parseInt(fraction, 16) / Math.pow(16, index - fractionStart);
-    }
-    var foundBinaryExponent = false;
-    if ('pP'.indexOf(input.charAt(index) || null) >= 0) {
-      foundBinaryExponent = true;
-      ++index;
-      if ('+-'.indexOf(input.charAt(index) || null) >= 0)
-        binarySign = ('+' === input.charAt(index++)) ? 1 : -1;
-
-      exponentStart = index;
-      if (!isDecDigit(input.charCodeAt(index)))
-        raise(null, errors.malformedNumber, input.slice(tokenStart, index));
-
-      while (isDecDigit(input.charCodeAt(index))) ++index;
-      binaryExponent = input.slice(exponentStart, index);
-      binaryExponent = Math.pow(2, binaryExponent * binarySign);
-    }
-
-    return {
-      value: (digit + fraction) * binaryExponent,
-      hasFractionPart: foundFraction || foundBinaryExponent
-    };
-  }
-
-  function readDecLiteral() {
-    while (isDecDigit(input.charCodeAt(index))) ++index;
-    var foundFraction = false;
-    if ('.' === input.charAt(index)) {
-      foundFraction = true;
-      ++index;
-      while (isDecDigit(input.charCodeAt(index))) ++index;
-    }
-    var foundExponent = false;
-    if ('eE'.indexOf(input.charAt(index) || null) >= 0) {
-      foundExponent = true;
-      ++index;
-      if ('+-'.indexOf(input.charAt(index) || null) >= 0) ++index;
-      if (!isDecDigit(input.charCodeAt(index)))
-        raise(null, errors.malformedNumber, input.slice(tokenStart, index));
-
-      while (isDecDigit(input.charCodeAt(index))) ++index;
-    }
-
-    return {
-      value: parseFloat(input.slice(tokenStart, index)),
-      hasFractionPart: foundFraction || foundExponent
-    };
-  }
-
-  function readUnicodeEscapeSequence() {
-    var sequenceStart = index++;
-
-    if (input.charAt(index++) !== '{')
-      raise(null, errors.braceExpected, '{', '\\' + input.slice(sequenceStart, index));
-    if (!isHexDigit(input.charCodeAt(index)))
-      raise(null, errors.hexadecimalDigitExpected, '\\' + input.slice(sequenceStart, index));
-
-    while (input.charCodeAt(index) === 0x30) ++index;
-    var escStart = index;
-
-    while (isHexDigit(input.charCodeAt(index))) {
-      ++index;
-      if (index - escStart > 6)
-        raise(null, errors.tooLargeCodepoint, '\\' + input.slice(sequenceStart, index));
-    }
-
-    var b = input.charAt(index++);
-    if (b !== '}') {
-      if ((b === '"') || (b === "'"))
-        raise(null, errors.braceExpected, '}', '\\' + input.slice(sequenceStart, index--));
-      else
-        raise(null, errors.hexadecimalDigitExpected, '\\' + input.slice(sequenceStart, index));
-    }
-
-    var codepoint = parseInt(input.slice(escStart, index - 1) || '0', 16);
-    var frag = '\\' + input.slice(sequenceStart, index);
-
-    if (codepoint > 0x10ffff) {
-      raise(null, errors.tooLargeCodepoint, frag);
-    }
-
-    return encodingMode.encodeUTF8(codepoint, frag);
-  }
-  function readEscapeSequence() {
-    var sequenceStart = index;
-    switch (input.charAt(index)) {
-      case 'a': ++index; return '\x07';
-      case 'n': ++index; return '\n';
-      case 'r': ++index; return '\r';
-      case 't': ++index; return '\t';
-      case 'v': ++index; return '\x0b';
-      case 'b': ++index; return '\b';
-      case 'f': ++index; return '\f';
-      case '\r':
-      case '\n':
-        consumeEOL();
-        return '\n';
-
-      case '0': case '1': case '2': case '3': case '4':
-      case '5': case '6': case '7': case '8': case '9':
-        while (isDecDigit(input.charCodeAt(index)) && index - sequenceStart < 3) ++index;
-
-        var frag = input.slice(sequenceStart, index);
-        var ddd = parseInt(frag, 10);
-        if (ddd > 255) {
-          raise(null, errors.decimalEscapeTooLarge, '\\' + ddd);
-        }
-        return encodingMode.encodeByte(ddd, '\\' + frag);
-
-      case 'z':
-        if (features.skipWhitespaceEscape) {
-          ++index;
-          skipWhiteSpace();
-          return '';
-        }
-        break;
-
-      case 'x':
-        if (features.hexEscapes) {
-          if (isHexDigit(input.charCodeAt(index + 1)) &&
-              isHexDigit(input.charCodeAt(index + 2))) {
-            index += 3;
-            return encodingMode.encodeByte(parseInt(input.slice(sequenceStart + 1, index), 16), '\\' + input.slice(sequenceStart, index));
-          }
-          raise(null, errors.hexadecimalDigitExpected, '\\' + input.slice(sequenceStart, index + 2));
-        }
-        break;
-
-      case 'u':
-        if (features.unicodeEscapes)
-          return readUnicodeEscapeSequence();
-        break;
-
-      case '\\': case '"': case "'":
-        return input.charAt(index++);
-    }
-
-    if (features.strictEscapes)
-      raise(null, errors.invalidEscape, '\\' + input.slice(sequenceStart, index + 1));
-    return input.charAt(index++);
-  }
-
-  function scanComment() {
-    tokenStart = index;
-    index += 2; // --
-
-    var character = input.charAt(index)
-      , content = ''
-      , isLong = false
-      , commentStart = index
-      , lineStartComment = lineStart
-      , lineComment = line;
-
-    if ('[' === character) {
-      content = readLongString(true);
-      if (false === content) content = character;
-      else isLong = true;
-    }
-    if (!isLong) {
-      while (index < length) {
-        if (isLineTerminator(input.charCodeAt(index))) break;
-        ++index;
-      }
-      if (options.comments) content = input.slice(commentStart, index);
-    }
-
-    if (options.comments) {
-      var node = ast.comment(content, input.slice(tokenStart, index));
-      if (options.locations) {
-        node.loc = {
-            start: { line: lineComment, column: tokenStart - lineStartComment }
-          , end: { line: line, column: index - lineStart }
-        };
-      }
-      if (options.ranges) {
-        node.range = [tokenStart, index];
-      }
-      if (options.onCreateNode) options.onCreateNode(node);
-      comments.push(node);
-    }
-  }
-
-  function readLongString(isComment) {
-    var level = 0
-      , content = ''
-      , terminator = false
-      , character, stringStart, firstLine = line;
-
-    ++index; // [
-    while ('=' === input.charAt(index + level)) ++level;
-    if ('[' !== input.charAt(index + level)) return false;
-
-    index += level + 1;
-    if (isLineTerminator(input.charCodeAt(index))) consumeEOL();
-
-    stringStart = index;
-    while (index < length) {
-      while (isLineTerminator(input.charCodeAt(index))) consumeEOL();
-
-      character = input.charAt(index++);
-      if (']' === character) {
-        terminator = true;
-        for (var i = 0; i < level; ++i) {
-          if ('=' !== input.charAt(index + i)) terminator = false;
-        }
-        if (']' !== input.charAt(index + level)) terminator = false;
-      }
-      if (terminator) {
-        content += input.slice(stringStart, index - 1);
-        index += level + 1;
-        return content;
-      }
-    }
-
-    raise(null, isComment ?
-                errors.unfinishedLongComment :
-                errors.unfinishedLongString,
-          firstLine, '<eof>');
-  }
-
-  function next() {
-    previousToken = token;
-    token = lookahead;
-    lookahead = lex();
-  }
-
-  function consume(value) {
-    if (value === token.value) {
-      next();
-      return true;
-    }
-    return false;
-  }
-
-  function expect(value) {
-    if (value === token.value) next();
-    else raise(token, errors.expected, value, tokenValue(token));
-  }
-
-  function isWhiteSpace(charCode) {
-    return 9 === charCode || 32 === charCode || 0xB === charCode || 0xC === charCode;
-  }
-
-  function isLineTerminator(charCode) {
-    return 10 === charCode || 13 === charCode;
-  }
-
-  function isDecDigit(charCode) {
-    return charCode >= 48 && charCode <= 57;
-  }
-
-  function isHexDigit(charCode) {
-    return (charCode >= 48 && charCode <= 57) || (charCode >= 97 && charCode <= 102) || (charCode >= 65 && charCode <= 70);
-  }
-
-  function isIdentifierStart(charCode) {
-    if ((charCode >= 65 && charCode <= 90) || (charCode >= 97 && charCode <= 122) || 95 === charCode)
-      return true;
-    if (features.extendedIdentifiers && charCode >= 128)
-      return true;
-    return false;
-  }
-
-  function isIdentifierPart(charCode) {
-    if ((charCode >= 65 && charCode <= 90) || (charCode >= 97 && charCode <= 122) || 95 === charCode || (charCode >= 48 && charCode <= 57))
-      return true;
-    if (features.extendedIdentifiers && charCode >= 128)
-      return true;
-    return false;
-  }
-
-  function isKeyword(id) {
-    switch (id.length) {
-      case 2:
-        return 'do' === id || 'if' === id || 'in' === id || 'or' === id;
-      case 3:
-        return 'and' === id || 'end' === id || 'for' === id || 'not' === id;
-      case 4:
-        if ('else' === id || 'then' === id)
-          return true;
-        if (features.labels && !features.contextualGoto)
-          return ('goto' === id);
-        return false;
-      case 5:
-        return 'break' === id || 'local' === id || 'until' === id || 'while' === id;
-      case 6:
-        return 'elseif' === id || 'repeat' === id || 'return' === id;
-      case 8:
-        return 'function' === id;
-    }
-    return false;
-  }
-
-  function isUnary(token) {
-    if (Punctuator === token.type) return '#-~'.indexOf(token.value) >= 0;
-    if (Keyword === token.type) return 'not' === token.value;
-    return false;
-  }
-
-  function isBlockFollow(token) {
-    if (EOF === token.type) return true;
-    if (Keyword !== token.type) return false;
-    switch (token.value) {
-      case 'else': case 'elseif':
-      case 'end': case 'until':
-        return true;
-      default:
-        return false;
-    }
-  }
-  var scopes
-    , scopeDepth
-    , globals;
-  function createScope() {
-    var scope = scopes[scopeDepth++].slice();
-    scopes.push(scope);
-    if (options.onCreateScope) options.onCreateScope();
-  }
-  function destroyScope() {
-    var scope = scopes.pop();
-    --scopeDepth;
-    if (options.onDestroyScope) options.onDestroyScope();
-  }
-  function scopeIdentifierName(name) {
-    if (options.onLocalDeclaration) options.onLocalDeclaration(name);
-    if (-1 !== indexOf(scopes[scopeDepth], name)) return;
-    scopes[scopeDepth].push(name);
-  }
-  function scopeIdentifier(node) {
-    scopeIdentifierName(node.name);
-    attachScope(node, true);
-  }
-  function attachScope(node, isLocal) {
-    if (!isLocal && -1 === indexOfObject(globals, 'name', node.name))
-      globals.push(node);
-
-    node.isLocal = isLocal;
-  }
-  function scopeHasName(name) {
-    return (-1 !== indexOf(scopes[scopeDepth], name));
-  }
-
-  var locations = []
-    , trackLocations;
-
-  function createLocationMarker() {
-    return new Marker(token);
-  }
-
-  function Marker(token) {
-    if (options.locations) {
-      this.loc = {
-          start: {
-            line: token.line
-          , column: token.range[0] - token.lineStart
-        }
-        , end: {
-            line: 0
-          , column: 0
-        }
-      };
-    }
-    if (options.ranges) this.range = [token.range[0], 0];
-  }
-  Marker.prototype.complete = function() {
-    if (options.locations) {
-      this.loc.end.line = previousToken.lastLine || previousToken.line;
-      this.loc.end.column = previousToken.range[1] - (previousToken.lastLineStart || previousToken.lineStart);
-    }
-    if (options.ranges) {
-      this.range[1] = previousToken.range[1];
-    }
-  };
-
-  Marker.prototype.bless = function (node) {
-    if (this.loc) {
-      var loc = this.loc;
-      node.loc = {
-        start: {
-          line: loc.start.line,
-          column: loc.start.column
-        },
-        end: {
-          line: loc.end.line,
-          column: loc.end.column
-        }
-      };
-    }
-    if (this.range) {
-      node.range = [
-        this.range[0],
-        this.range[1]
-      ];
-    }
-  };
-  function markLocation() {
-    if (trackLocations) locations.push(createLocationMarker());
-  }
-  function pushLocation(marker) {
-    if (trackLocations) locations.push(marker);
-  }
-
-  function FullFlowContext() {
-    this.scopes = [];
-    this.pendingGotos = [];
-  }
-
-  FullFlowContext.prototype.isInLoop = function () {
-    var i = this.scopes.length;
-    while (i --> 0) {
-      if (this.scopes[i].isLoop)
-        return true;
-    }
-    return false;
-  };
-
-  FullFlowContext.prototype.pushScope = function (isLoop) {
-    var scope = {
-      labels: {},
-      locals: [],
-      deferredGotos: [],
-      isLoop: !!isLoop
-    };
-    this.scopes.push(scope);
-  };
-
-  FullFlowContext.prototype.popScope = function () {
-    for (var i = 0; i < this.pendingGotos.length; ++i) {
-      var theGoto = this.pendingGotos[i];
-      if (theGoto.maxDepth >= this.scopes.length)
-        if (--theGoto.maxDepth <= 0)
-          raise(theGoto.token, errors.labelNotVisible, theGoto.target);
-    }
-
-    this.scopes.pop();
-  };
-
-  FullFlowContext.prototype.addGoto = function (target, token) {
-    var localCounts = [];
-
-    for (var i = 0; i < this.scopes.length; ++i) {
-      var scope = this.scopes[i];
-      localCounts.push(scope.locals.length);
-      if (Object.prototype.hasOwnProperty.call(scope.labels, target))
-        return;
-    }
-
-    this.pendingGotos.push({
-      maxDepth: this.scopes.length,
-      target: target,
-      token: token,
-      localCounts: localCounts
-    });
-  };
-
-  FullFlowContext.prototype.addLabel = function (name, token) {
-    var scope = this.currentScope();
-
-    if (Object.prototype.hasOwnProperty.call(scope.labels, name)) {
-      raise(token, errors.labelAlreadyDefined, name, scope.labels[name].line);
-    } else {
-      var newGotos = [];
-
-      for (var i = 0; i < this.pendingGotos.length; ++i) {
-        var theGoto = this.pendingGotos[i];
-
-        if (theGoto.maxDepth >= this.scopes.length && theGoto.target === name) {
-          if (theGoto.localCounts[this.scopes.length - 1] < scope.locals.length) {
-            scope.deferredGotos.push(theGoto);
-          }
-          continue;
-        }
-
-        newGotos.push(theGoto);
-      }
-
-      this.pendingGotos = newGotos;
-    }
-
-    scope.labels[name] = {
-      localCount: scope.locals.length,
-      line: token.line
-    };
-  };
-
-  FullFlowContext.prototype.addLocal = function (name, token) {
-    this.currentScope().locals.push({
-      name: name,
-      token: token
-    });
-  };
-
-  FullFlowContext.prototype.currentScope = function () {
-    return this.scopes[this.scopes.length - 1];
-  };
-
-  FullFlowContext.prototype.raiseDeferredErrors = function () {
-    var scope = this.currentScope();
-    var bads = scope.deferredGotos;
-    for (var i = 0; i < bads.length; ++i) {
-      var theGoto = bads[i];
-      raise(theGoto.token, errors.gotoJumpInLocalScope, theGoto.target, scope.locals[theGoto.localCounts[this.scopes.length - 1]].name);
-    }
-  };
-
-  function LoopFlowContext() {
-    this.level = 0;
-    this.loopLevels = [];
-  }
-
-  LoopFlowContext.prototype.isInLoop = function () {
-    return !!this.loopLevels.length;
-  };
-
-  LoopFlowContext.prototype.pushScope = function (isLoop) {
-    ++this.level;
-    if (isLoop)
-      this.loopLevels.push(this.level);
-  };
-
-  LoopFlowContext.prototype.popScope = function () {
-    var levels = this.loopLevels;
-    var levlen = levels.length;
-    if (levlen) {
-      if (levels[levlen - 1] === this.level)
-        levels.pop();
-    }
-    --this.level;
-  };
-
-  LoopFlowContext.prototype.addGoto =
-  LoopFlowContext.prototype.addLabel =
-  function () { throw new Error('This should never happen'); };
-
-  LoopFlowContext.prototype.addLocal =
-  LoopFlowContext.prototype.raiseDeferredErrors =
-  function () {};
-
-  function makeFlowContext() {
-    return features.labels ? new FullFlowContext() : new LoopFlowContext();
-  }
-
-  function parseChunk() {
-    next();
-    markLocation();
-    if (options.scope) createScope();
-    var flowContext = makeFlowContext();
-    flowContext.allowVararg = true;
-    flowContext.pushScope();
-    var body = parseBlock(flowContext);
-    flowContext.popScope();
-    if (options.scope) destroyScope();
-    if (EOF !== token.type) unexpected(token);
-    if (trackLocations && !body.length) previousToken = token;
-    return finishNode(ast.chunk(body));
-  }
-
-  function parseBlock(flowContext) {
-    var block = []
-      , statement;
-
-    while (!isBlockFollow(token)) {
-      if ('return' === token.value || (!features.relaxedBreak && 'break' === token.value)) {
-        block.push(parseStatement(flowContext));
-        break;
-      }
-      statement = parseStatement(flowContext);
-      consume(';');
-      if (statement) block.push(statement);
-    }
-    return block;
-  }
-
-  function parseStatement(flowContext) {
-    markLocation();
-
-    if (Punctuator === token.type) {
-      if (consume('::')) return parseLabelStatement(flowContext);
-    }
-    if (features.emptyStatement) {
-      if (consume(';')) {
-        if (trackLocations) locations.pop();
-        return;
-      }
-    }
-
-    flowContext.raiseDeferredErrors();
-
-    if (Keyword === token.type) {
-      switch (token.value) {
-        case 'local':    next(); return parseLocalStatement(flowContext);
-        case 'if':       next(); return parseIfStatement(flowContext);
-        case 'return':   next(); return parseReturnStatement(flowContext);
-        case 'function': next();
-          var name = parseFunctionName();
-          return parseFunctionDeclaration(name);
-        case 'while':    next(); return parseWhileStatement(flowContext);
-        case 'for':      next(); return parseForStatement(flowContext);
-        case 'repeat':   next(); return parseRepeatStatement(flowContext);
-        case 'break':    next();
-          if (!flowContext.isInLoop())
-            raise(token, errors.noLoopToBreak, token.value);
-          return parseBreakStatement();
-        case 'do':       next(); return parseDoStatement(flowContext);
-        case 'goto':     next(); return parseGotoStatement(flowContext);
-      }
-    }
-
-    if (features.contextualGoto &&
-        token.type === Identifier && token.value === 'goto' &&
-        lookahead.type === Identifier && lookahead.value !== 'goto') {
-      next(); return parseGotoStatement(flowContext);
-    }
-    if (trackLocations) locations.pop();
-
-    return parseAssignmentOrCallStatement(flowContext);
-  }
-
-  function parseLabelStatement(flowContext) {
-    var nameToken = token
-      , label = parseIdentifier();
-
-    if (options.scope) {
-      scopeIdentifierName('::' + nameToken.value + '::');
-      attachScope(label, true);
-    }
-
-    expect('::');
-
-    flowContext.addLabel(nameToken.value, nameToken);
-    return finishNode(ast.labelStatement(label));
-  }
-
-  function parseBreakStatement() {
-    return finishNode(ast.breakStatement());
-  }
-
-  function parseGotoStatement(flowContext) {
-    var name = token.value
-      , gotoToken = previousToken
-      , label = parseIdentifier();
-
-    flowContext.addGoto(name, gotoToken);
-    return finishNode(ast.gotoStatement(label));
-  }
-
-  function parseDoStatement(flowContext) {
-    if (options.scope) createScope();
-    flowContext.pushScope();
-    var body = parseBlock(flowContext);
-    flowContext.popScope();
-    if (options.scope) destroyScope();
-    expect('end');
-    return finishNode(ast.doStatement(body));
-  }
-
-  function parseWhileStatement(flowContext) {
-    var condition = parseExpectedExpression(flowContext);
-    expect('do');
-    if (options.scope) createScope();
-    flowContext.pushScope(true);
-    var body = parseBlock(flowContext);
-    flowContext.popScope();
-    if (options.scope) destroyScope();
-    expect('end');
-    return finishNode(ast.whileStatement(condition, body));
-  }
-
-  function parseRepeatStatement(flowContext) {
-    if (options.scope) createScope();
-    flowContext.pushScope(true);
-    var body = parseBlock(flowContext);
-    expect('until');
-    flowContext.raiseDeferredErrors();
-    var condition = parseExpectedExpression(flowContext);
-    flowContext.popScope();
-    if (options.scope) destroyScope();
-    return finishNode(ast.repeatStatement(condition, body));
-  }
-
-  function parseReturnStatement(flowContext) {
-    var expressions = [];
-
-    if ('end' !== token.value) {
-      var expression = parseExpression(flowContext);
-      if (null != expression) expressions.push(expression);
-      while (consume(',')) {
-        expression = parseExpectedExpression(flowContext);
-        expressions.push(expression);
-      }
-      consume(';'); // grammar tells us ; is optional here.
-    }
-    return finishNode(ast.returnStatement(expressions));
-  }
-
-  function parseIfStatement(flowContext) {
-    var clauses = []
-      , condition
-      , body
-      , marker;
-    if (trackLocations) {
-      marker = locations[locations.length - 1];
-      locations.push(marker);
-    }
-    condition = parseExpectedExpression(flowContext);
-    expect('then');
-    if (options.scope) createScope();
-    flowContext.pushScope();
-    body = parseBlock(flowContext);
-    flowContext.popScope();
-    if (options.scope) destroyScope();
-    clauses.push(finishNode(ast.ifClause(condition, body)));
-
-    if (trackLocations) marker = createLocationMarker();
-    while (consume('elseif')) {
-      pushLocation(marker);
-      condition = parseExpectedExpression(flowContext);
-      expect('then');
-      if (options.scope) createScope();
-      flowContext.pushScope();
-      body = parseBlock(flowContext);
-      flowContext.popScope();
-      if (options.scope) destroyScope();
-      clauses.push(finishNode(ast.elseifClause(condition, body)));
-      if (trackLocations) marker = createLocationMarker();
-    }
-
-    if (consume('else')) {
-      if (trackLocations) {
-        marker = new Marker(previousToken);
-        locations.push(marker);
-      }
-      if (options.scope) createScope();
-      flowContext.pushScope();
-      body = parseBlock(flowContext);
-      flowContext.popScope();
-      if (options.scope) destroyScope();
-      clauses.push(finishNode(ast.elseClause(body)));
-    }
-
-    expect('end');
-    return finishNode(ast.ifStatement(clauses));
-  }
-
-  function parseForStatement(flowContext) {
-    var variable = parseIdentifier()
-      , body;
-
-    if (options.scope) {
-      createScope();
-      scopeIdentifier(variable);
-    }
-    if (consume('=')) {
-      var start = parseExpectedExpression(flowContext);
-      expect(',');
-      var end = parseExpectedExpression(flowContext);
-      var step = consume(',') ? parseExpectedExpression(flowContext) : null;
-
-      expect('do');
-      flowContext.pushScope(true);
-      body = parseBlock(flowContext);
-      flowContext.popScope();
-      expect('end');
-      if (options.scope) destroyScope();
-
-      return finishNode(ast.forNumericStatement(variable, start, end, step, body));
-    }
-    else {
-      var variables = [variable];
-      while (consume(',')) {
-        variable = parseIdentifier();
-        if (options.scope) scopeIdentifier(variable);
-        variables.push(variable);
-      }
-      expect('in');
-      var iterators = [];
-      do {
-        var expression = parseExpectedExpression(flowContext);
-        iterators.push(expression);
-      } while (consume(','));
-
-      expect('do');
-      flowContext.pushScope(true);
-      body = parseBlock(flowContext);
-      flowContext.popScope();
-      expect('end');
-      if (options.scope) destroyScope();
-
-      return finishNode(ast.forGenericStatement(variables, iterators, body));
-    }
-  }
-
-  function parseLocalStatement(flowContext) {
-    var name
-      , declToken = previousToken;
-
-    if (Identifier === token.type) {
-      var variables = []
-        , init = [];
-
-      do {
-        name = parseIdentifier();
-
-        variables.push(name);
-        flowContext.addLocal(name.name, declToken);
-      } while (consume(','));
-
-      if (consume('=')) {
-        do {
-          var expression = parseExpectedExpression(flowContext);
-          init.push(expression);
-        } while (consume(','));
-      }
-      if (options.scope) {
-        for (var i = 0, l = variables.length; i < l; ++i) {
-          scopeIdentifier(variables[i]);
-        }
-      }
-
-      return finishNode(ast.localStatement(variables, init));
-    }
-    if (consume('function')) {
-      name = parseIdentifier();
-      flowContext.addLocal(name.name, declToken);
-
-      if (options.scope) {
-        scopeIdentifier(name);
-        createScope();
-      }
-      return parseFunctionDeclaration(name, true);
-    } else {
-      raiseUnexpectedToken('<name>', token);
-    }
-  }
-
-  function parseAssignmentOrCallStatement(flowContext) {
-    var previous = token
-      , marker, startMarker;
-    var lvalue, base, name;
-
-    var targets = [];
-
-    if (trackLocations) startMarker = createLocationMarker();
-
-    do {
-      if (trackLocations) marker = createLocationMarker();
-
-      if (Identifier === token.type) {
-        name = token.value;
-        base = parseIdentifier();
-        if (options.scope) attachScope(base, scopeHasName(name));
-        lvalue = true;
-      } else if ('(' === token.value) {
-        next();
-        base = parseExpectedExpression(flowContext);
-        expect(')');
-        lvalue = false;
-      } else {
-        return unexpected(token);
-      }
-
-      both: for (;;) {
-        var newBase;
-
-        switch (StringLiteral === token.type ? '"' : token.value) {
-        case '.':
-        case '[':
-          lvalue = true;
-          break;
-        case ':':
-        case '(':
-        case '{':
-        case '"':
-          lvalue = null;
-          break;
-        default:
-          break both;
-        }
-
-        base = parsePrefixExpressionPart(base, marker, flowContext);
-      }
-
-      targets.push(base);
-
-      if (',' !== token.value)
-        break;
-
-      if (!lvalue) {
-        return unexpected(token);
-      }
-
-      next();
-    } while (true);
-
-    if (targets.length === 1 && lvalue === null) {
-      pushLocation(marker);
-      return finishNode(ast.callStatement(targets[0]));
-    } else if (!lvalue) {
-      return unexpected(token);
-    }
-
-    expect('=');
-
-    var values = [];
-
-    do {
-      values.push(parseExpectedExpression(flowContext));
-    } while (consume(','));
-
-    pushLocation(startMarker);
-    return finishNode(ast.assignmentStatement(targets, values));
-  }
-
-  function parseIdentifier() {
-    markLocation();
-    var identifier = token.value;
-    if (Identifier !== token.type) raiseUnexpectedToken('<name>', token);
-    next();
-    return finishNode(ast.identifier(identifier));
-  }
-
-  function parseFunctionDeclaration(name, isLocal) {
-    var flowContext = makeFlowContext();
-    flowContext.pushScope();
-
-    var parameters = [];
-    expect('(');
-    if (!consume(')')) {
-      while (true) {
-        if (Identifier === token.type) {
-          var parameter = parseIdentifier();
-          if (options.scope) scopeIdentifier(parameter);
-
-          parameters.push(parameter);
-
-          if (consume(',')) continue;
-        }
-        else if (VarargLiteral === token.type) {
-          flowContext.allowVararg = true;
-          parameters.push(parsePrimaryExpression(flowContext));
-        } else {
-          raiseUnexpectedToken('<name> or \'...\'', token);
-        }
-        expect(')');
-        break;
-      }
-    }
-
-    var body = parseBlock(flowContext);
-    flowContext.popScope();
-    expect('end');
-    if (options.scope) destroyScope();
-
-    isLocal = isLocal || false;
-    return finishNode(ast.functionStatement(name, parameters, isLocal, body));
-  }
-
-  function parseFunctionName() {
-    var base, name, marker;
-
-    if (trackLocations) marker = createLocationMarker();
-    base = parseIdentifier();
-
-    if (options.scope) {
-      attachScope(base, scopeHasName(base.name));
-      createScope();
-    }
-
-    while (consume('.')) {
-      pushLocation(marker);
-      name = parseIdentifier();
-      base = finishNode(ast.memberExpression(base, '.', name));
-    }
-
-    if (consume(':')) {
-      pushLocation(marker);
-      name = parseIdentifier();
-      base = finishNode(ast.memberExpression(base, ':', name));
-      if (options.scope) scopeIdentifierName('self');
-    }
-
-    return base;
-  }
-
-  function parseTableConstructor(flowContext) {
-    var fields = []
-      , key, value;
-
-    while (true) {
-      markLocation();
-      if (Punctuator === token.type && consume('[')) {
-        key = parseExpectedExpression(flowContext);
-        expect(']');
-        expect('=');
-        value = parseExpectedExpression(flowContext);
-        fields.push(finishNode(ast.tableKey(key, value)));
-      } else if (Identifier === token.type) {
-        if ('=' === lookahead.value) {
-          key = parseIdentifier();
-          next();
-          value = parseExpectedExpression(flowContext);
-          fields.push(finishNode(ast.tableKeyString(key, value)));
-        } else {
-          value = parseExpectedExpression(flowContext);
-          fields.push(finishNode(ast.tableValue(value)));
-        }
-      } else {
-        if (null == (value = parseExpression(flowContext))) {
-          locations.pop();
-          break;
-        }
-        fields.push(finishNode(ast.tableValue(value)));
-      }
-      if (',;'.indexOf(token.value) >= 0) {
-        next();
-        continue;
-      }
-      break;
-    }
-    expect('}');
-    return finishNode(ast.tableConstructorExpression(fields));
-  }
-
-  function parseExpression(flowContext) {
-    var expression = parseSubExpression(0, flowContext);
-    return expression;
-  }
-
-  function parseExpectedExpression(flowContext) {
-    var expression = parseExpression(flowContext);
-    if (null == expression) raiseUnexpectedToken('<expression>', token);
-    else return expression;
-  }
-
-  function binaryPrecedence(operator) {
-    var charCode = operator.charCodeAt(0)
-      , length = operator.length;
-
-    if (1 === length) {
-      switch (charCode) {
-        case 94: return 12; // ^
-        case 42: case 47: case 37: return 10; // * / %
-        case 43: case 45: return 9; // + -
-        case 38: return 6; // &
-        case 126: return 5; // ~
-        case 124: return 4; // |
-        case 60: case 62: return 3; // < >
-      }
-    } else if (2 === length) {
-      switch (charCode) {
-        case 47: return 10; // //
-        case 46: return 8; // ..
-        case 60: case 62:
-            if('<<' === operator || '>>' === operator) return 7; // << >>
-            return 3; // <= >=
-        case 61: case 126: return 3; // == ~=
-        case 111: return 1; // or
-      }
-    } else if (97 === charCode && 'and' === operator) return 2;
-    return 0;
-  }
-
-  function parseSubExpression(minPrecedence, flowContext) {
-    var operator = token.value
-      , expression, marker;
-
-    if (trackLocations) marker = createLocationMarker();
-    if (isUnary(token)) {
-      markLocation();
-      next();
-      var argument = parseSubExpression(10, flowContext);
-      if (argument == null) raiseUnexpectedToken('<expression>', token);
-      expression = finishNode(ast.unaryExpression(operator, argument));
-    }
-    if (null == expression) {
-      expression = parsePrimaryExpression(flowContext);
-      if (null == expression) {
-        expression = parsePrefixExpression(flowContext);
-      }
-    }
-    if (null == expression) return null;
-
-    var precedence;
-    while (true) {
-      operator = token.value;
-
-      precedence = (Punctuator === token.type || Keyword === token.type) ?
-        binaryPrecedence(operator) : 0;
-
-      if (precedence === 0 || precedence <= minPrecedence) break;
-      if ('^' === operator || '..' === operator) --precedence;
-      next();
-      var right = parseSubExpression(precedence, flowContext);
-      if (null == right) raiseUnexpectedToken('<expression>', token);
-      if (trackLocations) locations.push(marker);
-      expression = finishNode(ast.binaryExpression(operator, expression, right));
-
-    }
-    return expression;
-  }
-
-  function parsePrefixExpressionPart(base, marker, flowContext) {
-    var expression, identifier;
-
-    if (Punctuator === token.type) {
-      switch (token.value) {
-        case '[':
-          pushLocation(marker);
-          next();
-          expression = parseExpectedExpression(flowContext);
-          expect(']');
-          return finishNode(ast.indexExpression(base, expression));
-        case '.':
-          pushLocation(marker);
-          next();
-          identifier = parseIdentifier();
-          return finishNode(ast.memberExpression(base, '.', identifier));
-        case ':':
-          pushLocation(marker);
-          next();
-          identifier = parseIdentifier();
-          base = finishNode(ast.memberExpression(base, ':', identifier));
-          pushLocation(marker);
-          return parseCallExpression(base, flowContext);
-        case '(': case '{': // args
-          pushLocation(marker);
-          return parseCallExpression(base, flowContext);
-      }
-    } else if (StringLiteral === token.type) {
-      pushLocation(marker);
-      return parseCallExpression(base, flowContext);
-    }
-
-    return null;
-  }
-
-  function parsePrefixExpression(flowContext) {
-    var base, name, marker;
-
-    if (trackLocations) marker = createLocationMarker();
-    if (Identifier === token.type) {
-      name = token.value;
-      base = parseIdentifier();
-      if (options.scope) attachScope(base, scopeHasName(name));
-    } else if (consume('(')) {
-      base = parseExpectedExpression(flowContext);
-      expect(')');
-    } else {
-      return null;
-    }
-    for (;;) {
-      var newBase = parsePrefixExpressionPart(base, marker, flowContext);
-      if (newBase === null)
-        break;
-      base = newBase;
-    }
-
-    return base;
-  }
-
-  function parseCallExpression(base, flowContext) {
-    if (Punctuator === token.type) {
-      switch (token.value) {
-        case '(':
-          if (!features.emptyStatement) {
-            if (token.line !== previousToken.line)
-              raise(null, errors.ambiguousSyntax, token.value);
-          }
-          next();
-          var expressions = [];
-          var expression = parseExpression(flowContext);
-          if (null != expression) expressions.push(expression);
-          while (consume(',')) {
-            expression = parseExpectedExpression(flowContext);
-            expressions.push(expression);
-          }
-
-          expect(')');
-          return finishNode(ast.callExpression(base, expressions));
-
-        case '{':
-          markLocation();
-          next();
-          var table = parseTableConstructor(flowContext);
-          return finishNode(ast.tableCallExpression(base, table));
-      }
-    } else if (StringLiteral === token.type) {
-      return finishNode(ast.stringCallExpression(base, parsePrimaryExpression(flowContext)));
-    }
-
-    raiseUnexpectedToken('function arguments', token);
-  }
-
-  function parsePrimaryExpression(flowContext) {
-    var literals = StringLiteral | NumericLiteral | BooleanLiteral | NilLiteral | VarargLiteral
-      , value = token.value
-      , type = token.type
-      , marker;
-
-    if (trackLocations) marker = createLocationMarker();
-
-    if (type === VarargLiteral && !flowContext.allowVararg) {
-      raise(token, errors.cannotUseVararg, token.value);
-    }
-
-    if (type & literals) {
-      pushLocation(marker);
-      var raw = input.slice(token.range[0], token.range[1]);
-      next();
-      return finishNode(ast.literal(type, value, raw));
-    } else if (Keyword === type && 'function' === value) {
-      pushLocation(marker);
-      next();
-      if (options.scope) createScope();
-      return parseFunctionDeclaration(null);
-    } else if (consume('{')) {
-      pushLocation(marker);
-      return parseTableConstructor(flowContext);
-    }
-  }
-
-  exports.parse = parse;
-
-  var versionFeatures = {
-    '5.1': {
-    },
-    '5.2': {
-      labels: true,
-      emptyStatement: true,
-      hexEscapes: true,
-      skipWhitespaceEscape: true,
-      strictEscapes: true,
-      relaxedBreak: true
-    },
-    '5.3': {
-      labels: true,
-      emptyStatement: true,
-      hexEscapes: true,
-      skipWhitespaceEscape: true,
-      strictEscapes: true,
-      unicodeEscapes: true,
-      bitwiseOperators: true,
-      integerDivision: true,
-      relaxedBreak: true
-    },
-    'LuaJIT': {
-      labels: true,
-      contextualGoto: true,
-      hexEscapes: true,
-      skipWhitespaceEscape: true,
-      strictEscapes: true,
-      unicodeEscapes: true,
-      imaginaryNumbers: true,
-      integerSuffixes: true
-    }
-  };
-
-  function parse(_input, _options) {
-    if ('undefined' === typeof _options && 'object' === typeof _input) {
-      _options = _input;
-      _input = undefined;
-    }
-    if (!_options) _options = {};
-
-    input = _input || '';
-    options = assign({}, defaultOptions, _options);
-    index = 0;
-    line = 1;
-    lineStart = 0;
-    length = input.length;
-    scopes = [[]];
-    scopeDepth = 0;
-    globals = [];
-    locations = [];
-
-    if (!Object.prototype.hasOwnProperty.call(versionFeatures, options.luaVersion)) {
-      throw new Error(sprintf("Lua version '%1' not supported", options.luaVersion));
-    }
-
-    features = assign({}, versionFeatures[options.luaVersion]);
-    if (options.extendedIdentifiers !== void 0)
-      features.extendedIdentifiers = !!options.extendedIdentifiers;
-
-    if (!Object.prototype.hasOwnProperty.call(encodingModes, options.encodingMode)) {
-      throw new Error(sprintf("Encoding mode '%1' not supported", options.encodingMode));
-    }
-
-    encodingMode = encodingModes[options.encodingMode];
-
-    if (options.comments) comments = [];
-    if (!options.wait) return end();
-    return exports;
-  }
-  exports.write = write;
-
-  function write(_input) {
-    input += String(_input);
-    length = input.length;
-    return exports;
-  }
-  exports.end = end;
-
-  function end(_input) {
-    if ('undefined' !== typeof _input) write(_input);
-    if (input && input.substr(0, 2) === '#!') input = input.replace(/^.*/, function (line) {
-      return line.replace(/./g, ' ');
-    });
-
-    length = input.length;
-    trackLocations = options.locations || options.ranges;
-    lookahead = lex();
-
-    var chunk = parseChunk();
-    if (options.comments) chunk.comments = comments;
-    if (options.scope) chunk.globals = globals;
-    if (locations.length > 0)
-      throw new Error('Location tracking failed. This is most likely a bug in luaparse');
-
-    return chunk;
-  }
-
-}));
-
-});
-
-ace.define("ace/mode/lua_worker",[], function(require, exports, module) {
-"use strict";
-
-var oop = require("../lib/oop");
-var Mirror = require("../worker/mirror").Mirror;
-var luaparse = require("../mode/lua/luaparse");
-
-var Worker = exports.Worker = function(sender) {
-    Mirror.call(this, sender);
-    this.setTimeout(500);
-};
-
-oop.inherits(Worker, Mirror);
-
-(function() {
-
-    this.onUpdate = function() {
-        var value = this.doc.getValue();
-        var errors = [];
-        try {
-            luaparse.parse(value);
-        } catch(e) {
-            if (e instanceof luaparse.SyntaxError) {
-                errors.push({
-                    row: e.line - 1,
-                    column: e.column,
-                    text: e.message,
-                    type: "error"
-                });
-            }
-        }
-        this.sender.emit("annotate", errors);
-    };
-
-}).call(Worker.prototype);
-
-});