You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@couchdb.apache.org by ga...@apache.org on 2013/10/30 14:43:00 UTC
[06/52] [partial] Remove unneeded ace files and codemirror
http://git-wip-us.apache.org/repos/asf/couchdb/blob/5b8fb9c3/src/fauxton/assets/js/libs/ace/mode/lua/luaparse.js
----------------------------------------------------------------------
diff --git a/src/fauxton/assets/js/libs/ace/mode/lua/luaparse.js b/src/fauxton/assets/js/libs/ace/mode/lua/luaparse.js
deleted file mode 100644
index 75efb15..0000000
--- a/src/fauxton/assets/js/libs/ace/mode/lua/luaparse.js
+++ /dev/null
@@ -1,1989 +0,0 @@
-define(function(require, exports, module) {
-/*global exports:true module:true require:true define:true global:true */
-
-(function (root, name, factory) {
- factory(exports)
-}(this, 'luaparse', function (exports) {
- 'use strict';
-
- exports.version = '0.1.4';
-
- var input, options, length;
-
- // Options can be set either globally on the parser object through
- // defaultOptions, or during the parse call.
- var defaultOptions = exports.defaultOptions = {
- // Explicitly tell the parser when the input ends.
- wait: false
- // Store comments as an array in the chunk object.
- , comments: true
- // Track identifier scopes by adding an isLocal attribute to each
- // identifier-node.
- , scope: false
- // Store location information on each syntax node as
- // `loc: { start: { line, column }, end: { line, column } }`.
- , locations: false
- // Store the start and end character locations on each syntax node as
- // `range: [start, end]`.
- , ranges: false
- };
-
- // The available tokens expressed as enum flags so they can be checked with
- // bitwise operations.
-
- 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
- };
-
- // As this parser is a bit different from luas own, the error messages
- // will be different in some situations.
-
- var errors = exports.errors = {
- unexpected: 'Unexpected %1 \'%2\' near \'%3\''
- , expected: '\'%1\' expected near \'%2\''
- , expectedToken: '%1 expected near \'%2\''
- , unfinishedString: 'unfinished string near \'%1\''
- , malformedNumber: 'malformed number near \'%1\''
- };
-
- // ### Abstract Syntax Tree
- //
- // The default AST structure is inspired by the Mozilla Parser API but can
- // easily be customized by overriding these functions.
-
- 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
- };
- }
- };
-
- // Wrap up the node object.
-
- function finishNode(node) {
- // Pop a `Marker` off the location-array and attach its location data.
- if (trackLocations) {
- var location = locations.pop();
- location.complete();
- if (options.locations) node.loc = location.loc;
- if (options.ranges) node.range = location.range;
- }
- return node;
- }
-
-
-
- // Helpers
- // -------
-
- var slice = Array.prototype.slice
- , toString = Object.prototype.toString
- , indexOf = function indexOf(array, element) {
- for (var i = 0, length = array.length; i < length; i++) {
- if (array[i] === element) return i;
- }
- return -1;
- };
-
- // Iterate through an array of objects and return the index of an object
- // with a matching property.
-
- function indexOfObject(array, property, element) {
- for (var i = 0, length = array.length; i < length; i++) {
- if (array[i][property] === element) return i;
- }
- return -1;
- }
-
- // A sprintf implementation using %index (beginning at 1) to input
- // arguments in the format string.
- //
- // Example:
- //
- // // Unexpected function in token
- // sprintf('Unexpected %2 in %1.', 'token', 'function');
-
- function sprintf(format) {
- var args = slice.call(arguments, 1);
- format = format.replace(/%(\d)/g, function (match, index) {
- return '' + args[index - 1] || '';
- });
- return format;
- }
-
- // Returns a new object with the properties from all objectes passed as
- // arguments. Last argument takes precedence.
- //
- // Example:
- //
- // this.options = extend(options, { output: false });
-
- function extend() {
- var args = slice.call(arguments)
- , dest = {}
- , src, prop;
-
- for (var i = 0, length = args.length; i < length; i++) {
- src = args[i];
- for (prop in src) if (src.hasOwnProperty(prop)) {
- dest[prop] = src[prop];
- }
- }
- return dest;
- }
-
- // ### Error functions
-
- // #### Raise an exception.
- //
- // Raise an exception by passing a token, a string format and its paramters.
- //
- // The passed tokens location will automatically be added to the error
- // message if it exists, if not it will default to the lexers current
- // position.
- //
- // Example:
- //
- // // [1:0] expected [ near (
- // raise(token, "expected %1 near %2", '[', token.value);
-
- function raise(token) {
- var message = sprintf.apply(null, slice.call(arguments, 1))
- , error, col;
-
- if ('undefined' !== typeof token.line) {
- col = token.range[0] - token.lineStart;
- error = new SyntaxError(sprintf('[%1:%2] %3', token.line, col, message));
- error.line = token.line;
- error.index = token.range[0];
- error.column = col;
- } else {
- col = index - lineStart + 1;
- error = new SyntaxError(sprintf('[%1:%2] %3', line, col, message));
- error.index = index;
- error.line = line;
- error.column = col;
- }
- throw error;
- }
-
- // #### Raise an unexpected token error.
- //
- // Example:
- //
- // // expected <name> near '0'
- // raiseUnexpectedToken('<name>', token);
-
- function raiseUnexpectedToken(type, token) {
- raise(token, errors.expectedToken, type, token.value);
- }
-
- // #### Raise a general unexpected error
- //
- // Usage should pass either a token object or a symbol string which was
- // expected. We can also specify a nearby token such as <eof>, this will
- // default to the currently active token.
- //
- // Example:
- //
- // // Unexpected symbol 'end' near '<eof>'
- // unexpected(token);
- //
- // If there's no token in the buffer it means we have reached <eof>.
-
- function unexpected(found, near) {
- if ('undefined' === typeof near) near = lookahead.value;
- 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);
- }
- return raise(found, errors.unexpected, type, found.value, near);
- }
- return raise(found, errors.unexpected, 'symbol', found, near);
- }
-
- // Lexer
- // -----
- //
- // The lexer, or the tokenizer reads the input string character by character
- // and derives a token left-right. To be as efficient as possible the lexer
- // prioritizes the common cases such as identifiers. It also works with
- // character codes instead of characters as string comparisons was the
- // biggest bottleneck of the parser.
- //
- // If `options.comments` is enabled, all comments encountered will be stored
- // in an array which later will be appended to the chunk object. If disabled,
- // they will simply be disregarded.
- //
- // When the lexer has derived a valid token, it will be returned as an object
- // containing its value and as well as its position in the input string (this
- // is always enabled to provide proper debug messages).
- //
- // `lex()` starts lexing and returns the following token in the stream.
-
- var index
- , token
- , previousToken
- , lookahead
- , comments
- , tokenStart
- , line
- , lineStart;
-
- exports.lex = lex;
-
- function lex() {
- skipWhiteSpace();
-
- // Skip comments beginning with --
- 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);
-
- // Memorize the range index where the token begins.
- tokenStart = index;
- if (isIdentifierStart(charCode)) return scanIdentifierOrKeyword();
-
- switch (charCode) {
- case 39: case 34: // '"
- return scanStringLiteral();
-
- // 0-9
- case 48: case 49: case 50: case 51: case 52: case 53:
- case 54: case 55: case 56: case 57:
- return scanNumericLiteral();
-
- case 46: // .
- // If the dot is followed by a digit it's a float.
- 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 (61 === next) return scanPunctuator('>=');
- return scanPunctuator('>');
-
- case 60: // <
- if (61 === next) return scanPunctuator('<=');
- return scanPunctuator('<');
-
- case 126: // ~
- if (61 === next) return scanPunctuator('~=');
- return raise({}, errors.expected, '=', '~');
-
- case 58: // :
- if (58 === next) return scanPunctuator('::');
- return scanPunctuator(':');
-
- case 91: // [
- // Check for a multiline string, they begin with [= or [[
- if (91 === next || 61 === next) return scanLongStringLiteral();
- return scanPunctuator('[');
-
- // \* / ^ % , { } ] ( ) ; # - +
- case 42: case 47: 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));
- }
-
- // Whitespace has no semantic meaning in lua so simply skip ahead while
- // tracking the encounted newlines. Newlines are also tracked in all
- // token functions where multiline values are allowed.
-
- function skipWhiteSpace() {
- while (index < length) {
- var charCode = input.charCodeAt(index);
- if (isWhiteSpace(charCode)) {
- index++;
- } else if (isLineTerminator(charCode)) {
- line++;
- lineStart = ++index;
- } else {
- break;
- }
- }
- }
-
- // Identifiers, keywords, booleans and nil all look the same syntax wise. We
- // simply go through them one by one and defaulting to an identifier if no
- // previous case matched.
-
- function scanIdentifierOrKeyword() {
- var value, type;
-
- // Slicing the input string is prefered before string concatenation in a
- // loop for performance reasons.
- while (isIdentifierPart(input.charCodeAt(++index)));
- value = input.slice(tokenStart, index);
-
- // Decide on the token type and possibly cast the value.
- 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]
- };
- }
-
- // Once a punctuator reaches this function it should already have been
- // validated so we simply return it as a token.
-
- function scanPunctuator(value) {
- index += value.length;
- return {
- type: Punctuator
- , value: value
- , line: line
- , lineStart: lineStart
- , range: [tokenStart, index]
- };
- }
-
- // A vararg literal consists of three dots.
-
- function scanVarargLiteral() {
- index += 3;
- return {
- type: VarargLiteral
- , value: '...'
- , line: line
- , lineStart: lineStart
- , range: [tokenStart, index]
- };
- }
-
- // Find the string literal by matching the delimiter marks used.
-
- function scanStringLiteral() {
- var delimiter = input.charCodeAt(index++)
- , stringStart = index
- , string = ''
- , charCode;
-
- while (index < length) {
- charCode = input.charCodeAt(index++);
- if (delimiter === charCode) break;
- if (92 === charCode) { // \
- string += input.slice(stringStart, index - 1) + readEscapeSequence();
- stringStart = index;
- }
- // EOF or `\n` terminates a string literal. If we haven't found the
- // ending delimiter by now, raise an exception.
- else if (index >= length || isLineTerminator(charCode)) {
- string += input.slice(stringStart, index - 1);
- raise({}, errors.unfinishedString, string + String.fromCharCode(charCode));
- }
- }
- string += input.slice(stringStart, index - 1);
-
- return {
- type: StringLiteral
- , value: string
- , line: line
- , lineStart: lineStart
- , range: [tokenStart, index]
- };
- }
-
- // Expect a multiline string literal and return it as a regular string
- // literal, if it doesn't validate into a valid multiline string, throw an
- // exception.
-
- function scanLongStringLiteral() {
- var string = readLongString();
- // Fail if it's not a multiline literal.
- if (false === string) raise(token, errors.expected, '[', token.value);
-
- return {
- type: StringLiteral
- , value: string
- , line: line
- , lineStart: lineStart
- , range: [tokenStart, index]
- };
- }
-
- // Numeric literals will be returned as floating-point numbers instead of
- // strings. The raw value should be retrieved from slicing the input string
- // later on in the process.
- //
- // If a hexadecimal number is encountered, it will be converted.
-
- function scanNumericLiteral() {
- var character = input.charAt(index)
- , next = input.charAt(index + 1);
-
- var value = ('0' === character && 'xX'.indexOf(next || null) >= 0) ?
- readHexLiteral() : readDecLiteral();
-
- return {
- type: NumericLiteral
- , value: value
- , line: line
- , lineStart: lineStart
- , range: [tokenStart, index]
- };
- }
-
- // Lua hexadecimals have an optional fraction part and an optional binary
- // exoponent part. These are not included in JavaScript so we will compute
- // all three parts separately and then sum them up at the end of the function
- // with the following algorithm.
- //
- // Digit := toDec(digit)
- // Fraction := toDec(fraction) / 16 ^ fractionCount
- // BinaryExp := 2 ^ binaryExp
- // Number := ( Digit + Fraction ) * BinaryExp
-
- 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
-
- // A minimum of one hex digit is required.
- if (!isHexDigit(input.charCodeAt(index)))
- raise({}, errors.malformedNumber, input.slice(tokenStart, index));
-
- while (isHexDigit(input.charCodeAt(index))) index++;
- // Convert the hexadecimal digit to base 10.
- digit = parseInt(input.slice(digitStart, index), 16);
-
- // Fraction part i optional.
- if ('.' === input.charAt(index)) {
- fractionStart = ++index;
-
- while (isHexDigit(input.charCodeAt(index))) index++;
- fraction = input.slice(fractionStart, index);
-
- // Empty fraction parts should default to 0, others should be converted
- // 0.x form so we can use summation at the end.
- fraction = (fractionStart === index) ? 0
- : parseInt(fraction, 16) / Math.pow(16, index - fractionStart);
- }
-
- // Binary exponents are optional
- if ('pP'.indexOf(input.charAt(index) || null) >= 0) {
- index++;
-
- // Sign part is optional and defaults to 1 (positive).
- if ('+-'.indexOf(input.charAt(index) || null) >= 0)
- binarySign = ('+' === input.charAt(index++)) ? 1 : -1;
-
- exponentStart = index;
-
- // The binary exponent sign requires a decimal digit.
- if (!isDecDigit(input.charCodeAt(index)))
- raise({}, errors.malformedNumber, input.slice(tokenStart, index));
-
- while (isDecDigit(input.charCodeAt(index))) index++;
- binaryExponent = input.slice(exponentStart, index);
-
- // Calculate the binary exponent of the number.
- binaryExponent = Math.pow(2, binaryExponent * binarySign);
- }
-
- return (digit + fraction) * binaryExponent;
- }
-
- // Decimal numbers are exactly the same in Lua and in JavaScript, because of
- // this we check where the token ends and then parse it with native
- // functions.
-
- function readDecLiteral() {
- while (isDecDigit(input.charCodeAt(index))) index++;
- // Fraction part is optional
- if ('.' === input.charAt(index)) {
- index++;
- // Fraction part defaults to 0
- while (isDecDigit(input.charCodeAt(index))) index++;
- }
- // Exponent part is optional.
- if ('eE'.indexOf(input.charAt(index) || null) >= 0) {
- index++;
- // Sign part is optional.
- if ('+-'.indexOf(input.charAt(index) || null) >= 0) index++;
- // An exponent is required to contain at least one decimal digit.
- if (!isDecDigit(input.charCodeAt(index)))
- raise({}, errors.malformedNumber, input.slice(tokenStart, index));
-
- while (isDecDigit(input.charCodeAt(index))) index++;
- }
-
- return parseFloat(input.slice(tokenStart, index));
- }
-
-
- // Translate escape sequences to the actual characters.
-
- function readEscapeSequence() {
- var sequenceStart = index;
- switch (input.charAt(index)) {
- // Lua allow the following escape sequences.
- // We don't escape the bell sequence.
- 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';
- // Skips the following span of white-space.
- case 'z': index++; skipWhiteSpace(); return '';
- // Byte representation should for now be returned as is.
- case 'x':
- // \xXX, where XX is a sequence of exactly two hexadecimal digits
- if (isHexDigit(input.charCodeAt(index + 1)) &&
- isHexDigit(input.charCodeAt(index + 2))) {
- index += 3;
- // Return it as is, without translating the byte.
- return '\\' + input.slice(sequenceStart, index);
- }
- return '\\' + input.charAt(index++);
- default:
- // \ddd, where ddd is a sequence of up to three decimal digits.
- if (isDecDigit(input.charCodeAt(index))) {
- while (isDecDigit(input.charCodeAt(++index)));
- return '\\' + input.slice(sequenceStart, index);
- }
- // Simply return the \ as is, it's not escaping any sequence.
- return input.charAt(index++);
- }
- }
-
- // Comments begin with -- after which it will be decided if they are
- // multiline comments or not.
- //
- // The multiline functionality works the exact same way as with string
- // literals so we reuse the functionality.
-
- function scanComment() {
- tokenStart = index;
- index += 2; // --
-
- var character = input.charAt(index)
- , content = ''
- , isLong = false
- , commentStart = index
- , lineStartComment = lineStart
- , lineComment = line;
-
- if ('[' === character) {
- content = readLongString();
- // This wasn't a multiline comment after all.
- if (false === content) content = character;
- else isLong = true;
- }
- // Scan until next line as long as it's not a multiline comment.
- 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));
-
- // `Marker`s depend on tokens available in the parser and as comments are
- // intercepted in the lexer all location data is set manually.
- if (options.locations) {
- node.loc = {
- start: { line: lineComment, column: tokenStart - lineStartComment }
- , end: { line: line, column: index - lineStart }
- };
- }
- if (options.ranges) {
- node.range = [tokenStart, index];
- }
- comments.push(node);
- }
- }
-
- // Read a multiline string by calculating the depth of `=` characters and
- // then appending until an equal depth is found.
-
- function readLongString() {
- var level = 0
- , content = ''
- , terminator = false
- , character, stringStart;
-
- index++; // [
-
- // Calculate the depth of the comment.
- while ('=' === input.charAt(index + level)) level++;
- // Exit, this is not a long string afterall.
- if ('[' !== input.charAt(index + level)) return false;
-
- index += level + 1;
-
- // If the first character is a newline, ignore it and begin on next line.
- if (isLineTerminator(input.charCodeAt(index))) {
- line++;
- lineStart = index++;
- }
-
- stringStart = index;
- while (index < length) {
- character = input.charAt(index++);
-
- // We have to keep track of newlines as `skipWhiteSpace()` does not get
- // to scan this part.
- if (isLineTerminator(character.charCodeAt(0))) {
- line++;
- lineStart = index;
- }
-
- // Once the delimiter is found, iterate through the depth count and see
- // if it matches.
- 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;
- }
-
- // We reached the end of the multiline string. Get out now.
- if (terminator) break;
- }
- content += input.slice(stringStart, index - 1);
- index += level + 1;
-
- return content;
- }
-
- // ## Lex functions and helpers.
-
- // Read the next token.
- //
- // This is actually done by setting the current token to the lookahead and
- // reading in the new lookahead token.
-
- function next() {
- previousToken = token;
- token = lookahead;
- lookahead = lex();
- }
-
- // Consume a token if its value matches. Once consumed or not, return the
- // success of the operation.
-
- function consume(value) {
- if (value === token.value) {
- next();
- return true;
- }
- return false;
- }
-
- // Expect the next token value to match. If not, throw an exception.
-
- function expect(value) {
- if (value === token.value) next();
- else raise(token, errors.expected, value, token.value);
- }
-
- // ### Validation functions
-
- 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);
- }
-
- // From [Lua 5.2](http://www.lua.org/manual/5.2/manual.html#8.1) onwards
- // identifiers cannot use locale-dependet letters.
-
- function isIdentifierStart(charCode) {
- return (charCode >= 65 && charCode <= 90) || (charCode >= 97 && charCode <= 122) || 95 === charCode;
- }
-
- function isIdentifierPart(charCode) {
- return (charCode >= 65 && charCode <= 90) || (charCode >= 97 && charCode <= 122) || 95 === charCode || (charCode >= 48 && charCode <= 57);
- }
-
- // [3.1 Lexical Conventions](http://www.lua.org/manual/5.2/manual.html#3.1)
- //
- // `true`, `false` and `nil` will not be considered keywords, but literals.
-
- 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:
- return 'else' === id || 'goto' === id || 'then' === id;
- 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;
- }
-
- // @TODO this needs to be rethought.
- function isCallExpression(expression) {
- switch (expression.type) {
- case 'CallExpression':
- case 'TableCallExpression':
- case 'StringCallExpression':
- return true;
- }
- return false;
- }
-
- // Check if the token syntactically closes a block.
-
- 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;
- }
- }
-
- // Scope
- // -----
-
- // Store each block scope as a an array of identifier names. Each scope is
- // stored in an FILO-array.
- var scopes
- // The current scope index
- , scopeDepth
- // A list of all global identifier nodes.
- , globals;
-
- // Create a new scope inheriting all declarations from the previous scope.
- function createScope() {
- scopes.push(Array.apply(null, scopes[scopeDepth++]));
- }
-
- // Exit and remove the current scope.
- function exitScope() {
- scopes.pop();
- scopeDepth--;
- }
-
- // Add identifier name to the current scope if it doesnt already exist.
- function scopeIdentifierName(name) {
- if (-1 !== indexOf(scopes[scopeDepth], name)) return;
- scopes[scopeDepth].push(name);
- }
-
- // Add identifier to the current scope
- function scopeIdentifier(node) {
- scopeIdentifierName(node.name);
- attachScope(node, true);
- }
-
- // Attach scope information to node. If the node is global, store it in the
- // globals array so we can return the information to the user.
- function attachScope(node, isLocal) {
- if (!isLocal && -1 === indexOfObject(globals, 'name', node.name))
- globals.push(node);
-
- node.isLocal = isLocal;
- }
-
- // Is the identifier name available in this scope.
- function scopeHasName(name) {
- return (-1 !== indexOf(scopes[scopeDepth], name));
- }
-
- // Location tracking
- // -----------------
- //
- // Locations are stored in FILO-array as a `Marker` object consisting of both
- // `loc` and `range` data. Once a `Marker` is popped off the list an end
- // location is added and the data is attached to a syntax node.
-
- 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];
- }
-
- // Complete the location data stored in the `Marker` by adding the location
- // of the *previous token* as an end location.
- Marker.prototype.complete = function() {
- if (options.locations) {
- this.loc.end.line = previousToken.line;
- this.loc.end.column = previousToken.range[1] - previousToken.lineStart;
- }
- if (options.ranges) {
- this.range[1] = previousToken.range[1];
- }
- };
-
- // Create a new `Marker` and add it to the FILO-array.
- function markLocation() {
- if (trackLocations) locations.push(createLocationMarker());
- }
-
- // Push an arbitrary `Marker` object onto the FILO-array.
- function pushLocation(marker) {
- if (trackLocations) locations.push(marker);
- }
-
- // Parse functions
- // ---------------
-
- // Chunk is the main program object. Syntactically it's the same as a block.
- //
- // chunk ::= block
-
- function parseChunk() {
- next();
- markLocation();
- var body = parseBlock();
- if (EOF !== token.type) unexpected(token);
- // If the body is empty no previousToken exists when finishNode runs.
- if (trackLocations && !body.length) previousToken = token;
- return finishNode(ast.chunk(body));
- }
-
- // A block contains a list of statements with an optional return statement
- // as its last statement.
- //
- // block ::= {stat} [retstat]
-
- function parseBlock(terminator) {
- var block = []
- , statement;
-
- // Each block creates a new scope.
- if (options.scope) createScope();
-
- while (!isBlockFollow(token)) {
- // Return has to be the last statement in a block.
- if ('return' === token.value) {
- block.push(parseStatement());
- break;
- }
- statement = parseStatement();
- // Statements are only added if they are returned, this allows us to
- // ignore some statements, such as EmptyStatement.
- if (statement) block.push(statement);
- }
-
- if (options.scope) exitScope();
- // Doesn't really need an ast node
- return block;
- }
-
- // There are two types of statements, simple and compound.
- //
- // statement ::= break | goto | do | while | repeat | return
- // | if | for | function | local | label | assignment
- // | functioncall | ';'
-
- function parseStatement() {
- markLocation();
- if (Keyword === token.type) {
- switch (token.value) {
- case 'local': next(); return parseLocalStatement();
- case 'if': next(); return parseIfStatement();
- case 'return': next(); return parseReturnStatement();
- case 'function': next();
- var name = parseFunctionName();
- return parseFunctionDeclaration(name);
- case 'while': next(); return parseWhileStatement();
- case 'for': next(); return parseForStatement();
- case 'repeat': next(); return parseRepeatStatement();
- case 'break': next(); return parseBreakStatement();
- case 'do': next(); return parseDoStatement();
- case 'goto': next(); return parseGotoStatement();
- }
- }
-
- if (Punctuator === token.type) {
- if (consume('::')) return parseLabelStatement();
- }
- // Assignments memorizes the location and pushes it manually for wrapper
- // nodes. Additionally empty `;` statements should not mark a location.
- if (trackLocations) locations.pop();
-
- // When a `;` is encounted, simply eat it without storing it.
- if (consume(';')) return;
-
- return parseAssignmentOrCallStatement();
- }
-
- // ## Statements
-
- // label ::= '::' Name '::'
-
- function parseLabelStatement() {
- var name = token.value
- , label = parseIdentifier();
-
- if (options.scope) {
- scopeIdentifierName('::' + name + '::');
- attachScope(label, true);
- }
-
- expect('::');
- return finishNode(ast.labelStatement(label));
- }
-
- // break ::= 'break'
-
- function parseBreakStatement() {
- return finishNode(ast.breakStatement());
- }
-
- // goto ::= 'goto' Name
-
- function parseGotoStatement() {
- var name = token.value
- , label = parseIdentifier();
-
- if (options.scope) label.isLabel = scopeHasName('::' + name + '::');
- return finishNode(ast.gotoStatement(label));
- }
-
- // do ::= 'do' block 'end'
-
- function parseDoStatement() {
- var body = parseBlock();
- expect('end');
- return finishNode(ast.doStatement(body));
- }
-
- // while ::= 'while' exp 'do' block 'end'
-
- function parseWhileStatement() {
- var condition = parseExpectedExpression();
- expect('do');
- var body = parseBlock();
- expect('end');
- return finishNode(ast.whileStatement(condition, body));
- }
-
- // repeat ::= 'repeat' block 'until' exp
-
- function parseRepeatStatement() {
- var body = parseBlock();
- expect('until');
- var condition = parseExpectedExpression();
- return finishNode(ast.repeatStatement(condition, body));
- }
-
- // retstat ::= 'return' [exp {',' exp}] [';']
-
- function parseReturnStatement() {
- var expressions = [];
-
- if ('end' !== token.value) {
- var expression = parseExpression();
- if (null != expression) expressions.push(expression);
- while (consume(',')) {
- expression = parseExpectedExpression();
- expressions.push(expression);
- }
- consume(';'); // grammar tells us ; is optional here.
- }
- return finishNode(ast.returnStatement(expressions));
- }
-
- // if ::= 'if' exp 'then' block {elif} ['else' block] 'end'
- // elif ::= 'elseif' exp 'then' block
-
- function parseIfStatement() {
- var clauses = []
- , condition
- , body
- , marker;
-
- // IfClauses begin at the same location as the parent IfStatement.
- // It ends at the start of `end`, `else`, or `elseif`.
- if (trackLocations) {
- marker = locations[locations.length - 1];
- locations.push(marker);
- }
- condition = parseExpectedExpression();
- expect('then');
- body = parseBlock();
- clauses.push(finishNode(ast.ifClause(condition, body)));
-
- if (trackLocations) marker = createLocationMarker();
- while (consume('elseif')) {
- pushLocation(marker);
- condition = parseExpectedExpression();
- expect('then');
- body = parseBlock();
- clauses.push(finishNode(ast.elseifClause(condition, body)));
- if (trackLocations) marker = createLocationMarker();
- }
-
- if (consume('else')) {
- // Include the `else` in the location of ElseClause.
- if (trackLocations) {
- marker = new Marker(previousToken);
- locations.push(marker);
- }
- body = parseBlock();
- clauses.push(finishNode(ast.elseClause(body)));
- }
-
- expect('end');
- return finishNode(ast.ifStatement(clauses));
- }
-
- // There are two types of for statements, generic and numeric.
- //
- // for ::= Name '=' exp ',' exp [',' exp] 'do' block 'end'
- // for ::= namelist 'in' explist 'do' block 'end'
- // namelist ::= Name {',' Name}
- // explist ::= exp {',' exp}
-
- function parseForStatement() {
- var variable = parseIdentifier()
- , body;
-
- // The start-identifier is local.
- if (options.scope) scopeIdentifier(variable);
-
- // If the first expression is followed by a `=` punctuator, this is a
- // Numeric For Statement.
- if (consume('=')) {
- // Start expression
- var start = parseExpectedExpression();
- expect(',');
- // End expression
- var end = parseExpectedExpression();
- // Optional step expression
- var step = consume(',') ? parseExpectedExpression() : null;
-
- expect('do');
- body = parseBlock();
- expect('end');
-
- return finishNode(ast.forNumericStatement(variable, start, end, step, body));
- }
- // If not, it's a Generic For Statement
- else {
- // The namelist can contain one or more identifiers.
- var variables = [variable];
- while (consume(',')) {
- variable = parseIdentifier();
- // Each variable in the namelist is locally scoped.
- if (options.scope) scopeIdentifier(variable);
- variables.push(variable);
- }
- expect('in');
- var iterators = [];
-
- // One or more expressions in the explist.
- do {
- var expression = parseExpectedExpression();
- iterators.push(expression);
- } while (consume(','));
-
- expect('do');
- body = parseBlock();
- expect('end');
-
- return finishNode(ast.forGenericStatement(variables, iterators, body));
- }
- }
-
- // Local statements can either be variable assignments or function
- // definitions. If a function definition is found, it will be delegated to
- // `parseFunctionDeclaration()` with the isLocal flag.
- //
- // This AST structure might change into a local assignment with a function
- // child.
- //
- // local ::= 'local' 'function' Name funcdecl
- // | 'local' Name {',' Name} ['=' exp {',' exp}
-
- function parseLocalStatement() {
- var name;
-
- if (Identifier === token.type) {
- var variables = []
- , init = [];
-
- do {
- name = parseIdentifier();
-
- variables.push(name);
- } while (consume(','));
-
- if (consume('=')) {
- do {
- var expression = parseExpectedExpression();
- init.push(expression);
- } while (consume(','));
- }
-
- // Declarations doesn't exist before the statement has been evaluated.
- // Therefore assignments can't use their declarator. And the identifiers
- // shouldn't be added to the scope until the statement is complete.
- 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();
- if (options.scope) scopeIdentifier(name);
-
- // MemberExpressions are not allowed in local function statements.
- return parseFunctionDeclaration(name, true);
- } else {
- raiseUnexpectedToken('<name>', token);
- }
- }
-
- // assignment ::= varlist '=' explist
- // varlist ::= prefixexp {',' prefixexp}
- // explist ::= exp {',' exp}
- //
- // call ::= callexp
- // callexp ::= prefixexp args | prefixexp ':' Name args
-
- function parseAssignmentOrCallStatement() {
- // Keep a reference to the previous token for better error messages in case
- // of invalid statement
- var previous = token
- , expression, marker;
-
- if (trackLocations) marker = createLocationMarker();
- expression = parsePrefixExpression();
-
- if (null == expression) return unexpected(token);
- if (',='.indexOf(token.value) >= 0) {
- var variables = [expression]
- , init = []
- , exp;
-
- while (consume(',')) {
- exp = parsePrefixExpression();
- if (null == exp) raiseUnexpectedToken('<expression>', token);
- variables.push(exp);
- }
- expect('=');
- do {
- exp = parseExpectedExpression();
- init.push(exp);
- } while (consume(','));
-
- pushLocation(marker);
- return finishNode(ast.assignmentStatement(variables, init));
- }
- if (isCallExpression(expression)) {
- pushLocation(marker);
- return finishNode(ast.callStatement(expression));
- }
- // The prefix expression was neither part of an assignment or a
- // callstatement, however as it was valid it's been consumed, so raise
- // the exception on the previous token to provide a helpful message.
- return unexpected(previous);
- }
-
-
-
- // ### Non-statements
-
- // Identifier ::= Name
-
- function parseIdentifier() {
- markLocation();
- var identifier = token.value;
- if (Identifier !== token.type) raiseUnexpectedToken('<name>', token);
- next();
- return finishNode(ast.identifier(identifier));
- }
-
- // Parse the functions parameters and body block. The name should already
- // have been parsed and passed to this declaration function. By separating
- // this we allow for anonymous functions in expressions.
- //
- // For local functions there's a boolean parameter which needs to be set
- // when parsing the declaration.
- //
- // funcdecl ::= '(' [parlist] ')' block 'end'
- // parlist ::= Name {',' Name} | [',' '...'] | '...'
-
- function parseFunctionDeclaration(name, isLocal) {
- var parameters = [];
- expect('(');
-
- // The declaration has arguments
- if (!consume(')')) {
- // Arguments are a comma separated list of identifiers, optionally ending
- // with a vararg.
- while (true) {
- if (Identifier === token.type) {
- var parameter = parseIdentifier();
- // Function parameters are local.
- if (options.scope) scopeIdentifier(parameter);
-
- parameters.push(parameter);
-
- if (consume(',')) continue;
- else if (consume(')')) break;
- }
- // No arguments are allowed after a vararg.
- else if (VarargLiteral === token.type) {
- parameters.push(parsePrimaryExpression());
- expect(')');
- break;
- } else {
- raiseUnexpectedToken('<name> or \'...\'', token);
- }
- }
- }
-
- var body = parseBlock();
- expect('end');
-
- isLocal = isLocal || false;
- return finishNode(ast.functionStatement(name, parameters, isLocal, body));
- }
-
- // Parse the function name as identifiers and member expressions.
- //
- // Name {'.' Name} [':' Name]
-
- function parseFunctionName() {
- var base, name, marker;
-
- if (trackLocations) marker = createLocationMarker();
- base = parseIdentifier();
-
- if (options.scope) attachScope(base, false);
-
- while (consume('.')) {
- pushLocation(marker);
- name = parseIdentifier();
- if (options.scope) attachScope(name, false);
- base = finishNode(ast.memberExpression(base, '.', name));
- }
-
- if (consume(':')) {
- pushLocation(marker);
- name = parseIdentifier();
- if (options.scope) attachScope(name, false);
- base = finishNode(ast.memberExpression(base, ':', name));
- }
-
- return base;
- }
-
- // tableconstructor ::= '{' [fieldlist] '}'
- // fieldlist ::= field {fieldsep field} fieldsep
- // field ::= '[' exp ']' '=' exp | Name = 'exp' | exp
- //
- // fieldsep ::= ',' | ';'
-
- function parseTableConstructor() {
- var fields = []
- , key, value;
-
- while (true) {
- markLocation();
- if (Punctuator === token.type && consume('[')) {
- key = parseExpectedExpression();
- expect(']');
- expect('=');
- value = parseExpectedExpression();
- fields.push(finishNode(ast.tableKey(key, value)));
- } else if (Identifier === token.type) {
- key = parseExpectedExpression();
- if (consume('=')) {
- value = parseExpectedExpression();
- fields.push(finishNode(ast.tableKeyString(key, value)));
- } else {
- fields.push(finishNode(ast.tableValue(key)));
- }
- } else {
- if (null == (value = parseExpression())) {
- locations.pop();
- break;
- }
- fields.push(finishNode(ast.tableValue(value)));
- }
- if (',;'.indexOf(token.value) >= 0) {
- next();
- continue;
- }
- if ('}' === token.value) break;
- }
- expect('}');
- return finishNode(ast.tableConstructorExpression(fields));
- }
-
- // Expression parser
- // -----------------
- //
- // Expressions are evaluated and always return a value. If nothing is
- // matched null will be returned.
- //
- // exp ::= (unop exp | primary | prefixexp ) { binop exp }
- //
- // primary ::= nil | false | true | Number | String | '...'
- // | functiondef | tableconstructor
- //
- // prefixexp ::= (Name | '(' exp ')' ) { '[' exp ']'
- // | '.' Name | ':' Name args | args }
- //
-
- function parseExpression() {
- var expression = parseSubExpression(0);
- return expression;
- }
-
- // Parse an expression expecting it to be valid.
-
- function parseExpectedExpression() {
- var expression = parseExpression();
- if (null == expression) raiseUnexpectedToken('<expression>', token);
- else return expression;
- }
-
-
- // Return the precedence priority of the operator.
- //
- // As unary `-` can't be distinguished from binary `-`, unary precedence
- // isn't described in this table but in `parseSubExpression()` itself.
- //
- // As this function gets hit on every expression it's been optimized due to
- // the expensive CompareICStub which took ~8% of the parse time.
-
- function binaryPrecedence(operator) {
- var charCode = operator.charCodeAt(0)
- , length = operator.length;
-
- if (1 === length) {
- switch (charCode) {
- case 94: return 10; // ^
- case 42: case 47: case 37: return 7; // * / %
- case 43: case 45: return 6; // + -
- case 60: case 62: return 3; // < >
- }
- } else if (2 === length) {
- switch (charCode) {
- case 46: return 5; // ..
- case 60: case 62: case 61: case 126: return 3; // <= >= == ~=
- case 111: return 1; // or
- }
- } else if (97 === charCode && 'and' === operator) return 2;
- return 0;
- }
-
- // Implement an operator-precedence parser to handle binary operator
- // precedence.
- //
- // We use this algorithm because it's compact, it's fast and Lua core uses
- // the same so we can be sure our expressions are parsed in the same manner
- // without excessive amounts of tests.
- //
- // exp ::= (unop exp | primary | prefixexp ) { binop exp }
-
- function parseSubExpression(minPrecedence) {
- var operator = token.value
- // The left-hand side in binary operations.
- , expression, marker;
-
- if (trackLocations) marker = createLocationMarker();
-
- // UnaryExpression
- if (isUnary(token)) {
- markLocation();
- next();
- var argument = parseSubExpression(8);
- if (argument == null) raiseUnexpectedToken('<expression>', token);
- expression = finishNode(ast.unaryExpression(operator, argument));
- }
- if (null == expression) {
- // PrimaryExpression
- expression = parsePrimaryExpression();
-
- // PrefixExpression
- if (null == expression) {
- expression = parsePrefixExpression();
- }
- }
- // This is not a valid left hand expression.
- 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;
- // Right-hand precedence operators
- if ('^' === operator || '..' === operator) precedence--;
- next();
- var right = parseSubExpression(precedence);
- if (null == right) raiseUnexpectedToken('<expression>', token);
- // Push in the marker created before the loop to wrap its entirety.
- if (trackLocations) locations.push(marker);
- expression = finishNode(ast.binaryExpression(operator, expression, right));
-
- }
- return expression;
- }
-
- // prefixexp ::= prefix {suffix}
- // prefix ::= Name | '(' exp ')'
- // suffix ::= '[' exp ']' | '.' Name | ':' Name args | args
- //
- // args ::= '(' [explist] ')' | tableconstructor | String
-
- function parsePrefixExpression() {
- var base, name, marker
- // Keep track of the scope, if a parent is local so are the children.
- , isLocal;
-
- if (trackLocations) marker = createLocationMarker();
-
- // The prefix
- if (Identifier === token.type) {
- name = token.value;
- base = parseIdentifier();
- // Set the parent scope.
- if (options.scope) attachScope(base, isLocal = scopeHasName(name));
- } else if (consume('(')) {
- base = parseExpectedExpression();
- expect(')');
- if (options.scope) isLocal = base.isLocal;
- } else {
- return null;
- }
-
- // The suffix
- var expression, identifier;
- while (true) {
- if (Punctuator === token.type) {
- switch (token.value) {
- case '[':
- pushLocation(marker);
- next();
- expression = parseExpectedExpression();
- base = finishNode(ast.indexExpression(base, expression));
- expect(']');
- break;
- case '.':
- pushLocation(marker);
- next();
- identifier = parseIdentifier();
- // Inherit the scope
- if (options.scope) attachScope(identifier, isLocal);
- base = finishNode(ast.memberExpression(base, '.', identifier));
- break;
- case ':':
- pushLocation(marker);
- next();
- identifier = parseIdentifier();
- if (options.scope) attachScope(identifier, isLocal);
- base = finishNode(ast.memberExpression(base, ':', identifier));
- // Once a : is found, this has to be a CallExpression, otherwise
- // throw an error.
- pushLocation(marker);
- base = parseCallExpression(base);
- break;
- case '(': case '{': // args
- pushLocation(marker);
- base = parseCallExpression(base);
- break;
- default:
- return base;
- }
- } else if (StringLiteral === token.type) {
- pushLocation(marker);
- base = parseCallExpression(base);
- } else {
- break;
- }
- }
-
- return base;
- }
-
- // args ::= '(' [explist] ')' | tableconstructor | String
-
- function parseCallExpression(base) {
- if (Punctuator === token.type) {
- switch (token.value) {
- case '(':
- next();
-
- // List of expressions
- var expressions = [];
- var expression = parseExpression();
- if (null != expression) expressions.push(expression);
- while (consume(',')) {
- expression = parseExpectedExpression();
- expressions.push(expression);
- }
-
- expect(')');
- return finishNode(ast.callExpression(base, expressions));
-
- case '{':
- markLocation();
- next();
- var table = parseTableConstructor();
- return finishNode(ast.tableCallExpression(base, table));
- }
- } else if (StringLiteral === token.type) {
- return finishNode(ast.stringCallExpression(base, parsePrimaryExpression()));
- }
-
- raiseUnexpectedToken('function arguments', token);
- }
-
- // primary ::= String | Numeric | nil | true | false
- // | functiondef | tableconstructor | '...'
-
- function parsePrimaryExpression() {
- var literals = StringLiteral | NumericLiteral | BooleanLiteral | NilLiteral | VarargLiteral
- , value = token.value
- , type = token.type
- , marker;
-
- if (trackLocations) marker = createLocationMarker();
-
- 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();
- return parseFunctionDeclaration(null);
- } else if (consume('{')) {
- pushLocation(marker);
- return parseTableConstructor();
- }
- }
-
- // Parser
- // ------
-
- // Export the main parser.
- //
- // - `wait` Hold parsing until end() is called. Defaults to false
- // - `comments` Store comments. Defaults to true.
- // - `scope` Track identifier scope. Defaults to false.
- //
- // Example:
- //
- // var parser = require('luaparser');
- // parser.parse('i = 0');
-
- exports.parse = parse;
-
- function parse(_input, _options) {
- if ('undefined' === typeof _options && 'object' === typeof _input) {
- _options = _input;
- _input = undefined;
- }
- if (!_options) _options = {};
-
- input = _input || '';
- options = extend(defaultOptions, _options);
-
- // Rewind the lexer
- index = 0;
- line = 1;
- lineStart = 0;
- length = input.length;
- // When tracking identifier scope, initialize with an empty scope.
- scopes = [[]];
- scopeDepth = 0;
- globals = [];
- locations = [];
-
- if (options.comments) comments = [];
- if (!options.wait) return end();
- return exports;
- }
-
- // Write to the source code buffer without beginning the parse.
- exports.write = write;
-
- function write(_input) {
- input += String(_input);
- length = input.length;
- return exports;
- }
-
- // Send an EOF and begin parsing.
- exports.end = end;
-
- function end(_input) {
- if ('undefined' !== typeof _input) write(_input);
-
- length = input.length;
- trackLocations = options.locations || options.ranges;
- // Initialize with a lookahead token.
- 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;
- }
-
-}));
-/* vim: set sw=2 ts=2 et tw=79 : */
-
-});
\ No newline at end of file
http://git-wip-us.apache.org/repos/asf/couchdb/blob/5b8fb9c3/src/fauxton/assets/js/libs/ace/mode/lua_highlight_rules.js
----------------------------------------------------------------------
diff --git a/src/fauxton/assets/js/libs/ace/mode/lua_highlight_rules.js b/src/fauxton/assets/js/libs/ace/mode/lua_highlight_rules.js
deleted file mode 100644
index 5eb969d..0000000
--- a/src/fauxton/assets/js/libs/ace/mode/lua_highlight_rules.js
+++ /dev/null
@@ -1,193 +0,0 @@
-/* ***** BEGIN LICENSE BLOCK *****
- * Distributed under the BSD license:
- *
- * Copyright (c) 2010, Ajax.org B.V.
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions are met:
- * * Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * * Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in the
- * documentation and/or other materials provided with the distribution.
- * * Neither the name of Ajax.org B.V. nor the
- * names of its contributors may be used to endorse or promote products
- * derived from this software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
- * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
- * DISCLAIMED. IN NO EVENT SHALL AJAX.ORG B.V. BE LIABLE FOR ANY
- * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
- * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
- * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
- * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
- * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
- * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
- *
- * ***** END LICENSE BLOCK ***** */
-
-define(function(require, exports, module) {
-"use strict";
-
-var oop = require("../lib/oop");
-var TextHighlightRules = require("./text_highlight_rules").TextHighlightRules;
-
-var LuaHighlightRules = function() {
-
- var keywords = (
- "break|do|else|elseif|end|for|function|if|in|local|repeat|"+
- "return|then|until|while|or|and|not"
- );
-
- var builtinConstants = ("true|false|nil|_G|_VERSION");
-
- var functions = (
- // builtinFunctions
- "string|xpcall|package|tostring|print|os|unpack|require|"+
- "getfenv|setmetatable|next|assert|tonumber|io|rawequal|"+
- "collectgarbage|getmetatable|module|rawset|math|debug|"+
- "pcall|table|newproxy|type|coroutine|_G|select|gcinfo|"+
- "pairs|rawget|loadstring|ipairs|_VERSION|dofile|setfenv|"+
- "load|error|loadfile|"+
-
- "sub|upper|len|gfind|rep|find|match|char|dump|gmatch|"+
- "reverse|byte|format|gsub|lower|preload|loadlib|loaded|"+
- "loaders|cpath|config|path|seeall|exit|setlocale|date|"+
- "getenv|difftime|remove|time|clock|tmpname|rename|execute|"+
- "lines|write|close|flush|open|output|type|read|stderr|"+
- "stdin|input|stdout|popen|tmpfile|log|max|acos|huge|"+
- "ldexp|pi|cos|tanh|pow|deg|tan|cosh|sinh|random|randomseed|"+
- "frexp|ceil|floor|rad|abs|sqrt|modf|asin|min|mod|fmod|log10|"+
- "atan2|exp|sin|atan|getupvalue|debug|sethook|getmetatable|"+
- "gethook|setmetatable|setlocal|traceback|setfenv|getinfo|"+
- "setupvalue|getlocal|getregistry|getfenv|setn|insert|getn|"+
- "foreachi|maxn|foreach|concat|sort|remove|resume|yield|"+
- "status|wrap|create|running|"+
- // metatableMethods
- "__add|__sub|__mod|__unm|__concat|__lt|__index|__call|__gc|__metatable|"+
- "__mul|__div|__pow|__len|__eq|__le|__newindex|__tostring|__mode|__tonumber"
- );
-
- var stdLibaries = ("string|package|os|io|math|debug|table|coroutine");
-
- var futureReserved = "";
-
- var deprecatedIn5152 = ("setn|foreach|foreachi|gcinfo|log10|maxn");
-
- var keywordMapper = this.createKeywordMapper({
- "keyword": keywords,
- "support.function": functions,
- "invalid.deprecated": deprecatedIn5152,
- "constant.library": stdLibaries,
- "constant.language": builtinConstants,
- "invalid.illegal": futureReserved,
- "variable.language": "this"
- }, "identifier");
-
- var decimalInteger = "(?:(?:[1-9]\\d*)|(?:0))";
- var hexInteger = "(?:0[xX][\\dA-Fa-f]+)";
- var integer = "(?:" + decimalInteger + "|" + hexInteger + ")";
-
- var fraction = "(?:\\.\\d+)";
- var intPart = "(?:\\d+)";
- var pointFloat = "(?:(?:" + intPart + "?" + fraction + ")|(?:" + intPart + "\\.))";
- var floatNumber = "(?:" + pointFloat + ")";
-
- this.$rules = {
- "start" : [{
- stateName: "bracketedComment",
- onMatch : function(value, currentState, stack){
- stack.unshift(this.next, value.length - 2, currentState);
- return "comment";
- },
- regex : /\-\-\[=*\[/,
- next : [
- {
- onMatch : function(value, currentState, stack) {
- if (value.length == stack[1]) {
- stack.shift();
- stack.shift();
- this.next = stack.shift();
- } else {
- this.next = "";
- }
- return "comment";
- },
- regex : /\]=*\]/,
- next : "start"
- }, {
- defaultToken : "comment"
- }
- ]
- },
-
- {
- token : "comment",
- regex : "\\-\\-.*$"
- },
- {
- stateName: "bracketedString",
- onMatch : function(value, currentState, stack){
- stack.unshift(this.next, value.length, currentState);
- return "comment";
- },
- regex : /\[=*\[/,
- next : [
- {
- onMatch : function(value, currentState, stack) {
- if (value.length == stack[1]) {
- stack.shift();
- stack.shift();
- this.next = stack.shift();
- } else {
- this.next = "";
- }
- return "comment";
- },
-
- regex : /\]=*\]/,
- next : "start"
- }, {
- defaultToken : "comment"
- }
- ]
- },
- {
- token : "string", // " string
- regex : '"(?:[^\\\\]|\\\\.)*?"'
- }, {
- token : "string", // ' string
- regex : "'(?:[^\\\\]|\\\\.)*?'"
- }, {
- token : "constant.numeric", // float
- regex : floatNumber
- }, {
- token : "constant.numeric", // integer
- regex : integer + "\\b"
- }, {
- token : keywordMapper,
- regex : "[a-zA-Z_$][a-zA-Z0-9_$]*\\b"
- }, {
- token : "keyword.operator",
- regex : "\\+|\\-|\\*|\\/|%|\\#|\\^|~|<|>|<=|=>|==|~=|=|\\:|\\.\\.\\.|\\.\\."
- }, {
- token : "paren.lparen",
- regex : "[\\[\\(\\{]"
- }, {
- token : "paren.rparen",
- regex : "[\\]\\)\\}]"
- }, {
- token : "text",
- regex : "\\s+|\\w+"
- } ]
- };
-
- this.normalizeRules();
-}
-
-oop.inherits(LuaHighlightRules, TextHighlightRules);
-
-exports.LuaHighlightRules = LuaHighlightRules;
-});
http://git-wip-us.apache.org/repos/asf/couchdb/blob/5b8fb9c3/src/fauxton/assets/js/libs/ace/mode/lua_worker.js
----------------------------------------------------------------------
diff --git a/src/fauxton/assets/js/libs/ace/mode/lua_worker.js b/src/fauxton/assets/js/libs/ace/mode/lua_worker.js
deleted file mode 100644
index 9c08f61..0000000
--- a/src/fauxton/assets/js/libs/ace/mode/lua_worker.js
+++ /dev/null
@@ -1,71 +0,0 @@
-/* ***** BEGIN LICENSE BLOCK *****
- * Distributed under the BSD license:
- *
- * Copyright (c) 2010, Ajax.org B.V.
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions are met:
- * * Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * * Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in the
- * documentation and/or other materials provided with the distribution.
- * * Neither the name of Ajax.org B.V. nor the
- * names of its contributors may be used to endorse or promote products
- * derived from this software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
- * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
- * DISCLAIMED. IN NO EVENT SHALL AJAX.ORG B.V. BE LIABLE FOR ANY
- * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
- * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
- * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
- * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
- * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
- * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
- *
- * ***** END LICENSE BLOCK ***** */
-
-define(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 t=Date.now()
- try {
- luaparse.parse(value);
- } catch(e) {
- if (e instanceof SyntaxError) {
- this.sender.emit("error", {
- row: e.line - 1,
- column: e.column,
- text: e.message,
- type: "error"
- });
- }
- // console.log( t-Date.now())
- return;
- }
- // console.log( t-Date.now())
- this.sender.emit("ok");
- };
-
-}).call(Worker.prototype);
-
-});
http://git-wip-us.apache.org/repos/asf/couchdb/blob/5b8fb9c3/src/fauxton/assets/js/libs/ace/mode/luapage.js
----------------------------------------------------------------------
diff --git a/src/fauxton/assets/js/libs/ace/mode/luapage.js b/src/fauxton/assets/js/libs/ace/mode/luapage.js
deleted file mode 100644
index b6f6548..0000000
--- a/src/fauxton/assets/js/libs/ace/mode/luapage.js
+++ /dev/null
@@ -1,21 +0,0 @@
-define(function(require, exports, module) {
-"use strict";
-
-var oop = require("../lib/oop");
-var HtmlMode = require("./html").Mode;
-var LuaMode = require("./lua").Mode;
-var Tokenizer = require("../tokenizer").Tokenizer;
-var LuaPageHighlightRules = require("./luapage_highlight_rules").LuaPageHighlightRules;
-
-var Mode = function() {
- this.HighlightRules = LuaPageHighlightRules;
-
- this.HighlightRules = LuaPageHighlightRules;
- this.createModeDelegates({
- "lua-": LuaMode
- });
-};
-oop.inherits(Mode, HtmlMode);
-
-exports.Mode = Mode;
-});
\ No newline at end of file
http://git-wip-us.apache.org/repos/asf/couchdb/blob/5b8fb9c3/src/fauxton/assets/js/libs/ace/mode/luapage_highlight_rules.js
----------------------------------------------------------------------
diff --git a/src/fauxton/assets/js/libs/ace/mode/luapage_highlight_rules.js b/src/fauxton/assets/js/libs/ace/mode/luapage_highlight_rules.js
deleted file mode 100644
index 5987899..0000000
--- a/src/fauxton/assets/js/libs/ace/mode/luapage_highlight_rules.js
+++ /dev/null
@@ -1,49 +0,0 @@
-// LuaPage implements the LuaPage markup as described by the Kepler Project's CGILua
-// documentation: http://keplerproject.github.com/cgilua/manual.html#templates
-define(function(require, exports, module) {
-"use strict";
-
-var oop = require("../lib/oop");
-var HtmlHighlightRules = require("./html_highlight_rules").HtmlHighlightRules;
-var LuaHighlightRules = require("./lua_highlight_rules").LuaHighlightRules;
-
-var LuaPageHighlightRules = function() {
- HtmlHighlightRules.call(this);
-
- var startRules = [
- {
- token: "keyword",
- regex: "<\\%\\=?",
- push: "lua-start"
- }, {
- token: "keyword",
- regex: "<\\?lua\\=?",
- push: "lua-start"
- }
- ];
-
- var endRules = [
- {
- token: "keyword",
- regex: "\\%>",
- next: "pop"
- }, {
- token: "keyword",
- regex: "\\?>",
- next: "pop"
- }
- ];
-
- this.embedRules(LuaHighlightRules, "lua-", endRules, ["start"]);
-
- for (var key in this.$rules)
- this.$rules[key].unshift.apply(this.$rules[key], startRules);
-
- this.normalizeRules();
-};
-
-oop.inherits(LuaPageHighlightRules, HtmlHighlightRules);
-
-exports.LuaPageHighlightRules = LuaPageHighlightRules;
-
-});
\ No newline at end of file
http://git-wip-us.apache.org/repos/asf/couchdb/blob/5b8fb9c3/src/fauxton/assets/js/libs/ace/mode/lucene.js
----------------------------------------------------------------------
diff --git a/src/fauxton/assets/js/libs/ace/mode/lucene.js b/src/fauxton/assets/js/libs/ace/mode/lucene.js
deleted file mode 100644
index 9beed95..0000000
--- a/src/fauxton/assets/js/libs/ace/mode/lucene.js
+++ /dev/null
@@ -1,16 +0,0 @@
-define(function(require, exports, module) {
-'use strict';
-
-var oop = require("../lib/oop");
-var TextMode = require("./text").Mode;
-var Tokenizer = require("../tokenizer").Tokenizer;
-var LuceneHighlightRules = require("./lucene_highlight_rules").LuceneHighlightRules;
-
-var Mode = function() {
- this.$tokenizer = new Tokenizer(new LuceneHighlightRules().getRules());
-};
-
-oop.inherits(Mode, TextMode);
-
-exports.Mode = Mode;
-});
\ No newline at end of file
http://git-wip-us.apache.org/repos/asf/couchdb/blob/5b8fb9c3/src/fauxton/assets/js/libs/ace/mode/lucene_highlight_rules.js
----------------------------------------------------------------------
diff --git a/src/fauxton/assets/js/libs/ace/mode/lucene_highlight_rules.js b/src/fauxton/assets/js/libs/ace/mode/lucene_highlight_rules.js
deleted file mode 100644
index 536aa1d..0000000
--- a/src/fauxton/assets/js/libs/ace/mode/lucene_highlight_rules.js
+++ /dev/null
@@ -1,49 +0,0 @@
-define(function(require, exports, module) {
-"use strict";
-
-var oop = require("../lib/oop");
-var lang = require("../lib/lang");
-var TextHighlightRules = require("./text_highlight_rules").TextHighlightRules;
-
-var LuceneHighlightRules = function() {
- this.$rules = {
- "start" : [
- {
- token : "constant.character.negation",
- regex : "[\\-]"
- }, {
- token : "constant.character.interro",
- regex : "[\\?]"
- }, {
- token : "constant.character.asterisk",
- regex : "[\\*]"
- }, {
- token: 'constant.character.proximity',
- regex: '~[0-9]+\\b'
- }, {
- token : 'keyword.operator',
- regex: '(?:AND|OR|NOT)\\b'
- }, {
- token : "paren.lparen",
- regex : "[\\(]"
- }, {
- token : "paren.rparen",
- regex : "[\\)]"
- }, {
- token : "keyword",
- regex : "[\\S]+:"
- }, {
- token : "string", // " string
- regex : '".*?"'
- }, {
- token : "text",
- regex : "\\s+"
- }
- ]
- };
-};
-
-oop.inherits(LuceneHighlightRules, TextHighlightRules);
-
-exports.LuceneHighlightRules = LuceneHighlightRules;
-});
http://git-wip-us.apache.org/repos/asf/couchdb/blob/5b8fb9c3/src/fauxton/assets/js/libs/ace/mode/makefile.js
----------------------------------------------------------------------
diff --git a/src/fauxton/assets/js/libs/ace/mode/makefile.js b/src/fauxton/assets/js/libs/ace/mode/makefile.js
deleted file mode 100644
index bd53cc3..0000000
--- a/src/fauxton/assets/js/libs/ace/mode/makefile.js
+++ /dev/null
@@ -1,63 +0,0 @@
-/* ***** BEGIN LICENSE BLOCK *****
- * Distributed under the BSD license:
- *
- * Copyright (c) 2012, Ajax.org B.V.
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions are met:
- * * Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * * Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in the
- * documentation and/or other materials provided with the distribution.
- * * Neither the name of Ajax.org B.V. nor the
- * names of its contributors may be used to endorse or promote products
- * derived from this software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
- * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
- * DISCLAIMED. IN NO EVENT SHALL AJAX.ORG B.V. BE LIABLE FOR ANY
- * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
- * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
- * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
- * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
- * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
- * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
- *
- *
- * Contributor(s):
- *
- *
- *
- * ***** END LICENSE BLOCK ***** */
-
-/*
- THIS FILE WAS AUTOGENERATED BY mode.tmpl.js
-*/
-
-define(function(require, exports, module) {
-"use strict";
-
-var oop = require("../lib/oop");
-var TextMode = require("./text").Mode;
-var Tokenizer = require("../tokenizer").Tokenizer;
-var MakefileHighlightRules = require("./makefile_highlight_rules").MakefileHighlightRules;
-var FoldMode = require("./folding/coffee").FoldMode;
-
-var Mode = function() {
- this.HighlightRules = MakefileHighlightRules;
- this.foldingRules = new FoldMode();
-};
-oop.inherits(Mode, TextMode);
-
-(function() {
-
- this.lineCommentStart = "#";
- this.$indentWithTabs = true;
-
-}).call(Mode.prototype);
-
-exports.Mode = Mode;
-});
\ No newline at end of file
http://git-wip-us.apache.org/repos/asf/couchdb/blob/5b8fb9c3/src/fauxton/assets/js/libs/ace/mode/makefile_highlight_rules.js
----------------------------------------------------------------------
diff --git a/src/fauxton/assets/js/libs/ace/mode/makefile_highlight_rules.js b/src/fauxton/assets/js/libs/ace/mode/makefile_highlight_rules.js
deleted file mode 100644
index 53ef1d0..0000000
--- a/src/fauxton/assets/js/libs/ace/mode/makefile_highlight_rules.js
+++ /dev/null
@@ -1,75 +0,0 @@
-define(function(require, exports, module) {
-"use strict";
-
-var oop = require("../lib/oop");
-var TextHighlightRules = require("./text_highlight_rules").TextHighlightRules;
-
-var ShHighlightFile = require("./sh_highlight_rules");
-
-var MakefileHighlightRules = function() {
-
- // regexp must not have capturing parentheses. Use (?:) instead.
- // regexps are ordered -> the first match is used
-
- var keywordMapper = this.createKeywordMapper({
- "keyword": ShHighlightFile.reservedKeywords,
- "support.function.builtin": ShHighlightFile.languageConstructs,
- "invalid.deprecated": "debugger"
- }, "string");
-
- this.$rules =
- {
- "start": [
- {
- token: "string.interpolated.backtick.makefile",
- regex: "`",
- next: "shell-start"
- },
- {
- token: "punctuation.definition.comment.makefile",
- regex: /#(?=.)/,
- next: "comment"
- },
- {
- token: [ "keyword.control.makefile"],
- regex: "^(?:\\s*\\b)(\\-??include|ifeq|ifneq|ifdef|ifndef|else|endif|vpath|export|unexport|define|endef|override)(?:\\b)"
- },
- {// ^([^\t ]+(\s[^\t ]+)*:(?!\=))\s*.*
- token: ["entity.name.function.makefile", "text"],
- regex: "^([^\\t ]+(?:\\s[^\\t ]+)*:)(\\s*.*)"
- }
- ],
- "comment": [
- {
- token : "punctuation.definition.comment.makefile",
- regex : /.+\\/
- },
- {
- token : "punctuation.definition.comment.makefile",
- regex : ".+",
- next : "start"
- }
- ],
- "shell-start": [
- {
- token: keywordMapper,
- regex : "[a-zA-Z_$][a-zA-Z0-9_$]*\\b"
- },
- {
- token: "string",
- regex : "\\w+"
- },
- {
- token : "string.interpolated.backtick.makefile",
- regex : "`",
- next : "start"
- }
- ]
-}
-
-};
-
-oop.inherits(MakefileHighlightRules, TextHighlightRules);
-
-exports.MakefileHighlightRules = MakefileHighlightRules;
-});
http://git-wip-us.apache.org/repos/asf/couchdb/blob/5b8fb9c3/src/fauxton/assets/js/libs/ace/mode/markdown.js
----------------------------------------------------------------------
diff --git a/src/fauxton/assets/js/libs/ace/mode/markdown.js b/src/fauxton/assets/js/libs/ace/mode/markdown.js
deleted file mode 100644
index f237122..0000000
--- a/src/fauxton/assets/js/libs/ace/mode/markdown.js
+++ /dev/null
@@ -1,76 +0,0 @@
-/* ***** BEGIN LICENSE BLOCK *****
- * Distributed under the BSD license:
- *
- * Copyright (c) 2010, Ajax.org B.V.
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions are met:
- * * Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * * Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in the
- * documentation and/or other materials provided with the distribution.
- * * Neither the name of Ajax.org B.V. nor the
- * names of its contributors may be used to endorse or promote products
- * derived from this software without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
- * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
- * DISCLAIMED. IN NO EVENT SHALL AJAX.ORG B.V. BE LIABLE FOR ANY
- * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
- * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
- * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
- * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
- * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
- * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
- *
- * ***** END LICENSE BLOCK ***** */
-
-define(function(require, exports, module) {
-"use strict";
-
-var oop = require("../lib/oop");
-var TextMode = require("./text").Mode;
-var JavaScriptMode = require("./javascript").Mode;
-var XmlMode = require("./xml").Mode;
-var HtmlMode = require("./html").Mode;
-var Tokenizer = require("../tokenizer").Tokenizer;
-var MarkdownHighlightRules = require("./markdown_highlight_rules").MarkdownHighlightRules;
-var MarkdownFoldMode = require("./folding/markdown").FoldMode;
-
-var Mode = function() {
- this.HighlightRules = MarkdownHighlightRules;
-
- this.createModeDelegates({
- "js-": JavaScriptMode,
- "xml-": XmlMode,
- "html-": HtmlMode
- });
-
- this.foldingRules = new MarkdownFoldMode();
-};
-oop.inherits(Mode, TextMode);
-
-(function() {
- this.type = "text";
- this.lineCommentStart = ">";
-
- this.getNextLineIndent = function(state, line, tab) {
- if (state == "listblock") {
- var match = /^(\s*)(?:([-+*])|(\d+)\.)(\s+)/.exec(line);
- if (!match)
- return "";
- var marker = match[2];
- if (!marker)
- marker = parseInt(match[3], 10) + 1 + ".";
- return match[1] + marker + match[4];
- } else {
- return this.$getIndent(line);
- }
- };
-}).call(Mode.prototype);
-
-exports.Mode = Mode;
-});