Cutlery/calibre
1
0
Fork 0
mirror of https://github.com/kovidgoyal/calibre.git synced 2025-06-23 15:30:45 -04:00
Code Issues Packages Projects Releases Wiki Activity
calibre/resources/rapydscript/compiler.js
Kovid Goyal 64590fddf7 RapydScript compiler and REPL
2015-06-20 09:27:36 +05:30

5960 lines
220 KiB
JavaScript
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

function _$rapyd$_extends(child, parent) {
child.prototype = Object.create(parent.prototype);
child.prototype.constructor = child;
}
function _$rapyd$_in(val, arr) {
if (arr instanceof Array || typeof arr === "string") {
return arr.indexOf(val) !== -1;
} else {
if (arr.hasOwnProperty(val)) {
return true;
}
return false;
}
}
function abs(n) {
return Math.abs(n);
}
function dir(item) {
var arr;
arr = [];
for (var i in item) {
arr.push(i);
}
return arr;
}
function len(obj) {
var count;
if (obj instanceof Array || typeof obj === "string") {
return obj.length;
} else {
count = 0;
for (var i in obj) {
if (obj.hasOwnProperty(i)) {
count += 1;
}
}
return count;
}
}
function range(start, stop, step) {
var length, idx, range;
if (arguments.length <= 1) {
stop = start || 0;
start = 0;
}
step = arguments[2] || 1;
length = Math.max(Math.ceil((stop - start) / step), 0);
idx = 0;
range = new Array(length);
while (idx < length) {
range[idx++] = start;
start += step;
}
return range;
}
function _$rapyd$_mixin(target, source, overwrite) {
for (var i in source) {
if (source.hasOwnProperty(i) && overwrite || typeof target[i] === "undefined") {
target[i] = source[i];
}
}
}
function _$rapyd$_bind(fn, thisArg) {
var ret;
if (fn.orig) {
fn = fn.orig;
}
if (thisArg === false) {
return fn;
}
ret = function() {
return fn.apply(thisArg, arguments);
};
ret.orig = fn;
return ret;
}
function enumerate(item) {
var arr;
arr = [];
for (var i=0;i<item.length;i++) {
arr[arr.length] = [ i, item[i] ];
}
return arr;
}
function _$rapyd$_print() {
var args = [].slice.call(arguments, 0);
var output;
output = JSON.stringify(args);
if (typeof console === "object") {
console.log(output.substr(1, output.length - 2));
}
}
function reversed(arr) {
var tmp;
tmp = arr.slice(0);
return tmp.reverse();
}
function getattr(obj, name) {
return obj[name];
}
function setattr(obj, name, value) {
obj[name] = value;
}
function hasattr(obj, name) {
return name in obj;
}
function sum(arr, start) {
if (typeof start === "undefined") start = 0;
return arr.reduce(function(prev, cur) {
return prev + cur;
}, start);
}
function _$rapyd$_eslice(arr, step, start, end) {
var isString;
arr = arr.slice(0);
if (typeof arr === "string" || arr instanceof String) {
isString = true;
arr = arr.split("");
}
if (step < 0) {
step = -step;
arr.reverse();
if (typeof start !== "undefined") {
start = arr.length - start - 1;
}
if (typeof end !== "undefined") {
end = arr.length - end - 1;
}
}
if (typeof start === "undefined") {
start = 0;
}
if (typeof end === "undefined") {
end = arr.length;
}
arr = arr.slice(start, end).filter(function(e, i) {
return i % step === 0;
});
return isString ? arr.join("") : arr;
}
function _$rapyd$_Iterable(iterable) {
if (iterable instanceof Array || iterable instanceof String || typeof iterable === "string") {
return iterable;
}
return Object.keys(iterable);
}
var MAP;
"\n**********************************************************************\n\n A RapydScript to JavaScript compiler.\n https://github.com/atsepkov/RapydScript2\n\n -------------------------------- (C) ---------------------------------\n\n Author: Alexander Tsepkov\n <atsepkov@pyjeon.com>\n http://www.pyjeon.com\n\n Distributed under Apache 2.0 license:\n Copyright 2013 (c) Alexander Tsepkov <atsepkov@pyjeon.com>\n\n RapydScript source code is originally based on UglifyJS2 (covered\n by BSD license). UglifyJS2 was written by Mihai Bazon\n <mihai.bazon@gmail.com>, who is its respective copyright holder.\n\n Redistribution and use in source and binary forms, with or without\n modification, are permitted provided that the following conditions\n are met:\n\n * Redistributions of source code must retain the above\n copyright notice, this list of conditions and the following\n disclaimer.\n\n * Redistributions in binary form must reproduce the above\n copyright notice, this list of conditions and the following\n disclaimer in the documentation and/or other materials\n provided with the distribution.\n\n THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDER “AS IS” AND ANY\n EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE\n IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR\n PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER BE\n LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,\n OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,\n PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR\n PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY\n THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR\n TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF\n THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF\n SUCH DAMAGE.\n\n **********************************************************************\n";
"use strict";
function array_to_hash(a) {
var ret, i;
ret = Object.create(null);
for (i = 0; i < len(a); i++) {
ret[a[i]] = true;
}
return ret;
}
function slice(a, start) {
return Array.prototype.slice.call(a, start || 0);
}
function characters(str_) {
return str_.split("");
}
function member(name, array) {
var i;
for (i = array.length - 1; i > -1; i-=1) {
if (array[i] === name) {
return true;
}
}
return false;
}
function find_if(func, array) {
var i;
for (i = 0; i < len(array); i++) {
if (func(array[i])) {
return array[i];
}
}
}
function repeat_string(str_, i) {
var d;
if (i <= 0) {
return "";
}
if (i === 1) {
return str_;
}
d = repeat_string(str_, i >> 1);
d += d;
if (i & 1) {
d += str_;
}
return d;
}
function DefaultsError(msg, defs) {
this.msg = msg;
this.defs = defs;
}
function defaults(args, defs, croak) {
var ret, i;
if (args === true) {
args = {};
}
ret = args || {};
if (croak) {
for (i in ret) {
if (ret.hasOwnProperty(i) && !defs.hasOwnProperty(i)) {
throw new DefaultsError("`" + i + "` is not a supported option", defs);
}
}
}
for (i in defs) {
if (defs.hasOwnProperty(i)) {
ret[i] = args && args.hasOwnProperty(i) ? args[i] : defs[i];
}
}
return ret;
}
function merge(obj, ext) {
var i;
for (i in ext) {
if (ext.hasOwnProperty(i)) {
obj[i] = ext[i];
}
}
return obj;
}
function noop() {
}
MAP = function() {
var skip;
function MAP(a, f, backwards) {
var ret, top, i;
ret = [];
top = [];
function doit() {
var is_last, val;
val = f(a[i], i);
is_last = val instanceof Last;
if (is_last) {
val = val.v;
}
if (val instanceof AtTop) {
val = val.v;
if (val instanceof Splice) {
top.push.apply(top, backwards ? val.v.slice().reverse() : val.v);
} else {
top.push(val);
}
} else if (val !== skip) {
if (val instanceof Splice) {
ret.push.apply(ret, backwards ? val.v.slice().reverse() : val.v);
} else {
ret.push(val);
}
}
return is_last;
}
if (a instanceof Array) {
if (backwards) {
for (i = a.length - 1; i > -1; i-=1) {
if (doit()) {
break;
}
}
ret.reverse();
top.reverse();
} else {
for (i = 0; i < len(a); i++) {
if (doit()) {
break;
}
}
}
} else {
for (i in a) {
if (a.hasOwnProperty(i)) {
if (doit()) {
break;
}
}
}
}
return top.concat(ret);
}
MAP.at_top = function(val) {
return new AtTop(val);
};
MAP.splice = function(val) {
return new Splice(val);
};
MAP.last = function(val) {
return new Last(val);
};
skip = MAP.skip = {};
function AtTop(val) {
this.v = val;
}
function Splice(val) {
this.v = val;
}
function Last(val) {
this.v = val;
}
return MAP;
}.call(this);
function push_uniq(array, el) {
if (array.indexOf(el) < 0) {
array.push(el);
}
}
function string_template(text, props) {
return text.replace(/\{(.+?)\}/g, function(str_, p) {
return props[p];
});
}
function remove(array, el) {
var i;
for (i = array.length - 1; i > -1; i-=1) {
if (array[i] === el) {
array.splice(i, 1);
}
}
}
function mergeSort(array, cmp) {
if (array.length < 2) {
return array.slice();
}
function merge(a, b) {
var r, ai, bi, i;
r = [];
ai = 0;
bi = 0;
i = 0;
while (ai < a.length && bi < b.length) {
if (cmp(a[ai], b[bi]) <= 0) {
r[i] = a[ai];
ai += 1;
} else {
r[i] = b[bi];
bi += 1;
}
i += 1;
}
if (ai < a.length) {
r.push.apply(r, a.slice(ai));
}
if (bi < b.length) {
r.push.apply(r, b.slice(bi));
}
return r;
}
function _ms(a) {
var m, left, right;
if (a.length <= 1) {
return a;
}
m = Math.floor(a.length / 2);
left = a.slice(0, m);
right = a.slice(m);
left = _ms(left);
right = _ms(right);
return merge(left, right);
}
return _ms(array);
}
function set_difference(a, b) {
return a.filter(function(el) {
return b.indexOf(el) < 0;
});
}
function set_intersection(a, b) {
return a.filter(function(el) {
return b.indexOf(el) >= 0;
});
}
function makePredicate(words) {
var cats, skip, j, cat, i, f;
if (!(words instanceof Array)) {
words = words.split(" ");
}
f = "";
cats = [];
for (i = 0; i < len(words); i++) {
skip = false;
for (j = 0; j < len(cats); j++) {
if (cats[j][0].length === words[i].length) {
cats[j].push(words[i]);
skip = true;
break;
}
}
if (!skip) {
cats.push([ words[i] ]);
}
}
function compareTo(arr) {
var i;
if (arr.length === 1) {
return f += "return str === " + JSON.stringify(arr[0]) + ";";
}
f += "switch(str){";
for (i = 0; i < len(arr); i++) {
f += "case " + JSON.stringify(arr[i]) + ":";
}
f += "return true}return false;";
}
if (cats.length > 3) {
cats.sort(function(a, b) {
return b.length - a.length;
});
f += "switch(str.length){";
for (i = 0; i < len(cats); i++) {
cat = cats[i];
f += "case " + cat[0].length + ":";
compareTo(cat);
}
f += "}";
} else {
compareTo(words);
}
return new Function("str", f);
}
function Dictionary() {
this._values = Object.create(null);
this._size = 0;
}
Dictionary.prototype = {
set: function(key, val) {
if (!this.has(key)) {
this._size += 1;
}
this._values["$" + key] = val;
return this;
},
add: function(key, val) {
if (this.has(key)) {
this.get(key).push(val);
} else {
this.set(key, [ val ]);
}
return this;
},
get: function(key) {
return this._values["$" + key];
},
del_: function(key) {
if (this.has(key)) {
this._size -= 1;
delete this._values["$" + key];
}
return this;
},
has: function(key) {
return _$rapyd$_in("$" + key, this._values);
},
each: function(f) {
var i;
for (i in this._values) {
f(this._values[i], i.substr(1));
}
},
size: function() {
return this._size;
},
map: function(f) {
var ret, i;
ret = [];
for (i in this._values) {
ret.push(f(this._values[i], i.substr(1)));
}
return ret;
}
};
var AST_Token, AST_Node, AST_Statement, AST_Debugger, AST_Directive, AST_SimpleStatement, AST_Block, AST_BlockStatement, AST_EmptyStatement, AST_StatementWithBody, AST_LabeledStatement, AST_DWLoop, AST_Do, AST_While, AST_ForIn, AST_ForJS, AST_ListComprehension, AST_With, AST_Scope, AST_Toplevel, AST_Import, AST_Decorator, AST_Lambda, AST_Accessor, AST_Function, AST_Class, AST_Module, AST_Method, AST_Jump, AST_Exit, AST_Return, AST_Throw, AST_LoopControl, AST_Break, AST_Continue, AST_If, AST_Switch, AST_SwitchBranch, AST_Default, AST_Case, AST_Try, AST_Catch, AST_Except, AST_Finally, AST_Definitions, AST_Var, AST_Const, AST_VarDef, AST_BaseCall, AST_Call, AST_ClassCall, AST_New, AST_Seq, AST_PropAccess, AST_Dot, AST_Sub, AST_Splice, AST_Unary, AST_UnaryPrefix, AST_UnaryPostfix, AST_Binary, AST_Conditional, AST_Assign, AST_Array, AST_TupleUnpack, AST_Object, AST_ObjectProperty, AST_ObjectKeyVal, AST_ObjectSetter, AST_ObjectGetter, AST_Symbol, AST_SymbolAccessor, AST_SymbolDeclaration, AST_SymbolVar, AST_SymbolConst, AST_SymbolFunarg, AST_SymbolDefun, AST_SymbolLambda, AST_SymbolCatch, AST_Label, AST_SymbolRef, AST_LabelRef, AST_This, AST_Constant, AST_String, AST_Verbatim, AST_Number, AST_RegExp, AST_Atom, AST_Null, AST_NaN, AST_Undefined, AST_Hole, AST_Infinity, AST_Boolean, AST_False, AST_True;
"\n**********************************************************************\n\n A RapydScript to JavaScript compiler.\n https://github.com/atsepkov/RapydScript2\n\n -------------------------------- (C) ---------------------------------\n\n Author: Alexander Tsepkov\n <atsepkov@pyjeon.com>\n http://www.pyjeon.com\n\n Distributed under Apache 2.0 license:\n Copyright 2013 (c) Alexander Tsepkov <atsepkov@pyjeon.com>\n\n RapydScript source code is originally based on UglifyJS2 (covered\n by BSD license). UglifyJS2 was written by Mihai Bazon\n <mihai.bazon@gmail.com>, who is its respective copyright holder.\n\n Redistribution and use in source and binary forms, with or without\n modification, are permitted provided that the following conditions\n are met:\n\n * Redistributions of source code must retain the above\n copyright notice, this list of conditions and the following\n disclaimer.\n\n * Redistributions in binary form must reproduce the above\n copyright notice, this list of conditions and the following\n disclaimer in the documentation and/or other materials\n provided with the distribution.\n\n THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDER “AS IS” AND ANY\n EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE\n IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR\n PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER BE\n LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,\n OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,\n PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR\n PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY\n THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR\n TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF\n THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF\n SUCH DAMAGE.\n\n **********************************************************************\n";
"use strict";
function DEFNODE(type, props, methods, base) {
var self_props, proto, code, ctor, i;
if (arguments.length < 4) {
base = AST_Node;
}
if (!props) {
props = [];
} else {
props = props.split(/\s+/);
}
self_props = props;
if (base && base.PROPS) {
props = props.concat(base.PROPS);
}
code = "return function AST_" + type + "(props){ if (props) { ";
for (i = props.length - 1; i > -1; i-=1) {
code += "this." + props[i] + " = props." + props[i] + ";";
}
proto = base && new base();
if (proto && proto.initialize || methods && methods.initialize) {
code += "this.initialize();";
}
code += "}}";
ctor = new Function(code)();
if (proto) {
ctor.prototype = proto;
ctor.BASE = base;
}
if (base) {
base.SUBCLASSES.push(ctor);
}
ctor.prototype.CTOR = ctor;
ctor.PROPS = props || null;
ctor.SELF_PROPS = self_props;
ctor.SUBCLASSES = [];
if (type) {
ctor.prototype.TYPE = ctor.TYPE = type;
}
if (methods) {
for (i in methods) {
if (methods.hasOwnProperty(i)) {
if (/^\$/.test(i)) {
ctor[i.substr(1)] = methods[i];
} else {
ctor.prototype[i] = methods[i];
}
}
}
}
ctor.DEFMETHOD = function(name, method) {
this.prototype[name] = method;
};
return ctor;
}
AST_Token = DEFNODE("Token", "type value line col pos endpos nlb comments_before file", {}, null);
AST_Node = DEFNODE("Node", "start end", {
clone: function() {
return new this.CTOR(this);
},
$documentation: "Base class of all AST nodes",
$propdoc: {
start: "[AST_Token] The first token of this node",
end: "[AST_Token] The last token of this node"
},
_walk: function(visitor) {
return visitor._visit(this);
},
walk: function(visitor) {
return this._walk(visitor);
}
}, null);
AST_Node.warn_function = null;
AST_Node.warn = function(txt, props) {
if (AST_Node.warn_function) {
AST_Node.warn_function(string_template(txt, props));
}
};
AST_Statement = DEFNODE("Statement", null, {
$documentation: "Base class of all statements"
});
AST_Debugger = DEFNODE("Debugger", null, {
$documentation: "Represents a debugger statement"
}, AST_Statement);
AST_Directive = DEFNODE("Directive", "value scope", {
$documentation: "Represents a directive, like \"use strict\";",
$propdoc: {
value: "[string] The value of this directive as a plain string (it's not an AST_String!)",
scope: "[AST_Scope/S] The scope that this directive affects"
}
}, AST_Statement);
AST_SimpleStatement = DEFNODE("SimpleStatement", "body", {
$documentation: "A statement consisting of an expression, i.e. a = 1 + 2",
$propdoc: {
body: "[AST_Node] an expression node (should not be instanceof AST_Statement)"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.body._walk(visitor);
});
}
}, AST_Statement);
function walk_body(node, visitor) {
if (node.body instanceof AST_Statement) {
node.body._walk(visitor);
} else {
node.body.forEach(function(stat) {
stat._walk(visitor);
});
}
}
AST_Block = DEFNODE("Block", "body", {
$documentation: "A body of statements (usually bracketed)",
$propdoc: {
body: "[AST_Statement*] an array of statements"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
walk_body(this, visitor);
});
}
}, AST_Statement);
AST_BlockStatement = DEFNODE("BlockStatement", null, {
$documentation: "A block statement"
}, AST_Block);
AST_EmptyStatement = DEFNODE("EmptyStatement", null, {
$documentation: "The empty statement (empty block or simply a semicolon)",
_walk: function(visitor) {
return visitor._visit(this);
}
}, AST_Statement);
AST_StatementWithBody = DEFNODE("StatementWithBody", "body", {
$documentation: "Base class for all statements that contain one nested body: `For`, `ForIn`, `Do`, `While`, `With`",
$propdoc: {
body: "[AST_Statement] the body; this should always be present, even if it's an AST_EmptyStatement"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.body._walk(visitor);
});
}
}, AST_Statement);
AST_LabeledStatement = DEFNODE("LabeledStatement", "label", {
$documentation: "Statement with a label",
$propdoc: {
label: "[AST_Label] a label definition"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.label._walk(visitor);
this.body._walk(visitor);
});
}
}, AST_StatementWithBody);
AST_DWLoop = DEFNODE("DWLoop", "condition", {
$documentation: "Base class for do/while statements",
$propdoc: {
condition: "[AST_Node] the loop condition. Should not be instanceof AST_Statement"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.condition._walk(visitor);
this.body._walk(visitor);
});
}
}, AST_StatementWithBody);
AST_Do = DEFNODE("Do", null, {
$documentation: "A `do` statement"
}, AST_DWLoop);
AST_While = DEFNODE("While", null, {
$documentation: "A `while` statement"
}, AST_DWLoop);
AST_ForIn = DEFNODE("ForIn", "init name object", {
$documentation: "A `for ... in` statement",
$propdoc: {
init: "[AST_Node] the `for/in` initialization code",
name: "[AST_SymbolRef?] the loop variable, only if `init` is AST_Var",
object: "[AST_Node] the object that we're looping through"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.init._walk(visitor);
this.object._walk(visitor);
this.body._walk(visitor);
});
}
}, AST_StatementWithBody);
AST_ForJS = DEFNODE("ForJS", "condition", {
$documentation: "A `for ... in` statement",
$propdoc: {
condition: "[AST_Verbatim] raw JavaScript conditional"
}
}, AST_StatementWithBody);
AST_ListComprehension = DEFNODE("ListComprehension", "condition statement", {
$documentation: "A list comprehension expression",
$propdoc: {
condition: "[AST_Node] the `if` condition",
statement: "[AST_Node] statement to perform on each element before returning it"
}
}, AST_ForIn);
AST_With = DEFNODE("With", "expression", {
$documentation: "A `with` statement",
$propdoc: {
expression: "[AST_Node] the `with` expression"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.expression._walk(visitor);
this.body._walk(visitor);
});
}
}, AST_StatementWithBody);
AST_Scope = DEFNODE("Scope", "directives variables localvars functions uses_with uses_eval parent_scope enclosed cname", {
$documentation: "Base class for all statements introducing a lexical scope",
$propdoc: {
directives: "[string*/S] an array of directives declared in this scope",
variables: "[Object/S] a map of name -> SymbolDef for all variables/functions defined in this scope",
localvars: "[SymbolDef*] list of variables local to this scope",
functions: "[Object/S] like `variables`, but only lists function declarations",
uses_with: "[boolean/S] tells whether this scope uses the `with` statement",
uses_eval: "[boolean/S] tells whether this scope contains a direct call to the global `eval`",
parent_scope: "[AST_Scope?/S] link to the parent scope",
enclosed: "[SymbolDef*/S] a list of all symbol definitions that are accessed from this scope or any subscopes",
cname: "[integer/S] current index for mangling variables (used internally by the mangler)"
}
}, AST_Block);
AST_Toplevel = DEFNODE("Toplevel", "globals baselib imports strict shebang", {
$documentation: "The toplevel scope",
$propdoc: {
globals: "[Object/S] a map of name -> SymbolDef for all undeclared names",
baselib: "[Object/s] a collection of used parts of baselib",
imports: "[AST_Import*] a collection of all imported modules",
strict: "[boolean/S] true if strict directive is in scope",
shebang: "[string] If #! line is present, it will be stored here"
},
wrap_enclose: function(arg_parameter_pairs) {
var self, args, parameters, wrapped_tl;
self = this;
args = [];
parameters = [];
arg_parameter_pairs.forEach(function(pair) {
var split;
split = pair.split(":");
args.push(split[0]);
parameters.push(split[1]);
});
wrapped_tl = "(function(" + parameters.join(",") + "){ '$ORIG'; })(" + args.join(",") + ")";
wrapped_tl = parse(wrapped_tl);
wrapped_tl = wrapped_tl.transform(new TreeTransformer(function before(node) {
if (node instanceof AST_Directive && node.value === "$ORIG") {
return MAP.splice(self.body);
}
}));
return wrapped_tl;
},
wrap_commonjs: function(name, export_all) {
var self, to_export, wrapped_tl;
self = this;
to_export = [];
if (export_all) {
self.figure_out_scope();
self.walk(new TreeWalker(function(node) {
if (node instanceof AST_SymbolDeclaration && node.definition().global) {
if (!find_if(function(n) {
return n.name === node.name;
}, to_export)) {
to_export.push(node);
}
}
}));
}
wrapped_tl = "(function(exports, global){ global['" + name + "'] = exports; '$ORIG'; '$EXPORTS'; }({}, (function(){return this}())))";
wrapped_tl = parse(wrapped_tl);
wrapped_tl = wrapped_tl.transform(new TreeTransformer(function before(node) {
var tmp_, body;
if (node instanceof AST_SimpleStatement) {
node = node.body;
if (node instanceof AST_String) {
tmp_ = node.getValue();
if (tmp_ === "$ORIG") {
return MAP.splice(self.body);
} else if (tmp_ === "$EXPORTS") {
body = [];
to_export.forEach(function(sym) {
body.push(new AST_SimpleStatement({
body: new AST_Assign({
left: new AST_Sub({
expression: new AST_SymbolRef({
name: "exports"
}),
property: new AST_String({
value: sym.name
})
}),
operator: "=",
right: new AST_SymbolRef(sym)
})
}));
});
return MAP.splice(body);
}
}
}
}));
return wrapped_tl;
}
}, AST_Scope);
AST_Import = DEFNODE("Import", "module argnames variables body", {
$documentation: "Container for imported files",
$propdoc: {
"module": "[AST_SymbolVar] name of the module we're importing",
argnames: "[AST_SymbolVar*] names of objects to be imported",
variables: "[Object/S] a map of name -> SymbolDef for all variables/functions defined in this scope",
body: "[AST_TopLevel] contents of the imported file"
}
}, AST_Statement);
AST_Decorator = DEFNODE("Decorator", "name", {
$documentation: "Class for function decorators",
$propdoc: {
name: "[string] decorator name"
}
});
AST_Lambda = DEFNODE("Lambda", "name argnames uses_arguments decorators", {
$documentation: "Base class for functions",
$propdoc: {
name: "[AST_SymbolDeclaration?] the name of this function",
argnames: "[AST_SymbolFunarg*] array of function arguments",
uses_arguments: "[boolean/S] tells whether this function accesses the arguments array",
decorators: "[AST_Decorator*] function decorators, if any"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
if (this.name) {
this.name._walk(visitor);
}
this.argnames.forEach(function(arg) {
arg._walk(visitor);
});
walk_body(this, visitor);
});
}
}, AST_Scope);
AST_Accessor = DEFNODE("Accessor", null, {
$documentation: "A setter/getter function"
}, AST_Lambda);
AST_Function = DEFNODE("Function", null, {
$documentation: "A function expression"
}, AST_Lambda);
AST_Class = DEFNODE("Class", "init name parent static external bound decorators modules", {
$documentation: "A class declaration",
$propdoc: {
name: "[AST_SymbolDeclaration?] the name of this class",
init: "[AST_Function] constructor for the class",
parent: "[AST_Class?] parent class this class inherits from",
"static": "[string*] list of static methods",
external: "[boolean] true if class is declared elsewhere, but will be within current scope at runtime",
bound: "[string*] list of methods that need to be bound to behave correctly (function pointers)",
decorators: "[AST_Decorator*] function decorators, if any",
modules: "[string*] module stack that this class resides inside of, if any"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.name._walk(visitor);
walk_body(this, visitor);
this.parent._walk(visitor);
});
}
}, AST_Scope);
AST_Module = DEFNODE("Module", "name external decorators", {
$documentation: "A module definition, meant to abstract a group of related classes and/or functions",
$propdoc: {
name: "[AST_SymbolDeclaration?] the name of this class",
external: "[boolean] true if module is declared elsewhere, but will be within current scope at runtime",
decorators: "[AST_Decorator*] module decorators, if any"
}
}, AST_Scope);
AST_Method = DEFNODE("Defun", "static", {
$documentation: "A class method definition",
$propdoc: {
"static": "[boolean] true if method is static"
}
}, AST_Lambda);
AST_Jump = DEFNODE("Jump", null, {
$documentation: "Base class for “jumps” (for now that's `return`, `throw`, `break` and `continue`)"
}, AST_Statement);
AST_Exit = DEFNODE("Exit", "value", {
$documentation: "Base class for “exits” (`return` and `throw`)",
$propdoc: {
value: "[AST_Node?] the value returned or thrown by this statement; could be null for AST_Return"
},
_walk: function(visitor) {
return visitor._visit(this, this.value && function() {
this.value._walk(visitor);
});
}
}, AST_Jump);
AST_Return = DEFNODE("Return", null, {
$documentation: "A `return` statement"
}, AST_Exit);
AST_Throw = DEFNODE("Throw", null, {
$documentation: "A `throw` statement"
}, AST_Exit);
AST_LoopControl = DEFNODE("LoopControl", "label", {
$documentation: "Base class for loop control statements (`break` and `continue`)",
$propdoc: {
label: "[AST_LabelRef?] the label, or null if none"
},
_walk: function(visitor) {
return visitor._visit(this, this.label && function() {
this.label._walk(visitor);
});
}
}, AST_Jump);
AST_Break = DEFNODE("Break", null, {
$documentation: "A `break` statement"
}, AST_LoopControl);
AST_Continue = DEFNODE("Continue", null, {
$documentation: "A `continue` statement"
}, AST_LoopControl);
AST_If = DEFNODE("If", "condition alternative", {
$documentation: "A `if` statement",
$propdoc: {
condition: "[AST_Node] the `if` condition",
alternative: "[AST_Statement?] the `else` part, or null if not present"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.condition._walk(visitor);
this.body._walk(visitor);
if (this.alternative) {
this.alternative._walk(visitor);
}
});
}
}, AST_StatementWithBody);
AST_Switch = DEFNODE("Switch", "expression", {
$documentation: "A `switch` statement",
$propdoc: {
expression: "[AST_Node] the `switch` “discriminant”"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.expression._walk(visitor);
walk_body(this, visitor);
});
}
}, AST_Block);
AST_SwitchBranch = DEFNODE("SwitchBranch", null, {
$documentation: "Base class for `switch` branches"
}, AST_Block);
AST_Default = DEFNODE("Default", null, {
$documentation: "A `default` switch branch"
}, AST_SwitchBranch);
AST_Case = DEFNODE("Case", "expression", {
$documentation: "A `case` switch branch",
$propdoc: {
expression: "[AST_Node] the `case` expression"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.expression._walk(visitor);
walk_body(this, visitor);
});
}
}, AST_SwitchBranch);
AST_Try = DEFNODE("Try", "bcatch bfinally", {
$documentation: "A `try` statement",
$propdoc: {
bcatch: "[AST_Catch?] the catch block, or null if not present",
bfinally: "[AST_Finally?] the finally block, or null if not present"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
walk_body(this, visitor);
if (this.bcatch) {
this.bcatch._walk(visitor);
}
if (this.bfinally) {
this.bfinally._walk(visitor);
}
});
}
}, AST_Block);
AST_Catch = DEFNODE("Catch", null, {
$documentation: "A `catch` node; only makes sense as part of a `try` statement",
$propdoc: {},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.argname._walk(visitor);
walk_body(this, visitor);
});
}
}, AST_Block);
AST_Except = DEFNODE("Except", "argname errors", {
$documentation: "An `except` node for RapydScript, which resides inside the catch block",
$propdoc: {
argname: "[AST_SymbolCatch] symbol for the exception",
errors: "[AST_SymbolVar*] error classes to catch in this block"
}
}, AST_Block);
AST_Finally = DEFNODE("Finally", null, {
$documentation: "A `finally` node; only makes sense as part of a `try` statement"
}, AST_Block);
AST_Definitions = DEFNODE("Definitions", "definitions", {
$documentation: "Base class for `var` or `const` nodes (variable declarations/initializations)",
$propdoc: {
definitions: "[AST_VarDef*] array of variable definitions"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.definitions.forEach(function(def_) {
def_._walk(visitor);
});
});
}
}, AST_Statement);
AST_Var = DEFNODE("Var", null, {
$documentation: "A `var` statement"
}, AST_Definitions);
AST_Const = DEFNODE("Const", null, {
$documentation: "A `const` statement"
}, AST_Definitions);
AST_VarDef = DEFNODE("VarDef", "name value", {
$documentation: "A variable declaration; only appears in a AST_Definitions node",
$propdoc: {
name: "[AST_SymbolVar|AST_SymbolConst] name of the variable",
value: "[AST_Node?] initializer, or null if there's no initializer"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.name._walk(visitor);
if (this.value) {
this.value._walk(visitor);
}
});
}
});
AST_BaseCall = DEFNODE("BaseCall", "args", {
$documentation: "A base class for function calls",
$propdoc: {
args: "[AST_Node*] array of arguments"
}
});
AST_Call = DEFNODE("Call", "expression", {
$documentation: "A function call expression",
$propdoc: {
expression: "[AST_Node] expression to invoke as function"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.expression._walk(visitor);
this.args.forEach(function(arg) {
arg._walk(visitor);
});
});
}
}, AST_BaseCall);
AST_ClassCall = DEFNODE("ClassCall", "class method static", {
$documentation: "A function call expression",
$propdoc: {
"class": "[string] name of the class method belongs to",
method: "[string] class method being called",
"static": "[boolean] defines whether the method is static"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.expression._walk(visitor);
this.args.forEach(function(arg) {
arg._walk(visitor);
});
});
}
}, AST_BaseCall);
AST_New = DEFNODE("New", null, {
$documentation: "An object instantiation. Derives from a function call since it has exactly the same properties"
}, AST_Call);
AST_Seq = DEFNODE("Seq", "car cdr", {
$documentation: "A sequence expression (two comma-separated expressions)",
$propdoc: {
car: "[AST_Node] first element in sequence",
cdr: "[AST_Node] second element in sequence"
},
$cons: function(x, y) {
var seq;
seq = new AST_Seq(x);
seq.car = x;
seq.cdr = y;
return seq;
},
$from_array: function(array) {
var list, i, p;
if (array.length === 0) {
return null;
}
if (array.length === 1) {
return array[0].clone();
}
list = null;
for (i = array.length - 1; i > -1; i-=1) {
list = AST_Seq.cons(array[i], list);
}
p = list;
while (p) {
if (p.cdr && !p.cdr.cdr) {
p.cdr = p.cdr.car;
break;
}
p = p.cdr;
}
return list;
},
to_array: function() {
var a, p;
p = this;
a = [];
while (p) {
a.push(p.car);
if (p.cdr && !(p.cdr instanceof AST_Seq)) {
a.push(p.cdr);
break;
}
p = p.cdr;
}
return a;
},
add: function(node) {
var cell, p;
p = this;
while (p) {
if (!(p.cdr instanceof AST_Seq)) {
cell = AST_Seq.cons(p.cdr, node);
return p.cdr = cell;
}
p = p.cdr;
}
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.car._walk(visitor);
if (this.cdr) {
this.cdr._walk(visitor);
}
});
}
});
AST_PropAccess = DEFNODE("PropAccess", "expression property", {
$documentation: "Base class for property access expressions, i.e. `a.foo` or `a[\"foo\"]`",
$propdoc: {
expression: "[AST_Node] the “container” expression",
property: "[AST_Node|string] the property to access. For AST_Dot this is always a plain string, while for AST_Sub it's an arbitrary AST_Node"
}
});
AST_Dot = DEFNODE("Dot", null, {
$documentation: "A dotted property access expression",
_walk: function(visitor) {
return visitor._visit(this, function() {
this.expression._walk(visitor);
});
}
}, AST_PropAccess);
AST_Sub = DEFNODE("Sub", null, {
$documentation: "Index-style property access, i.e. `a[\"foo\"]`",
_walk: function(visitor) {
return visitor._visit(this, function() {
this.expression._walk(visitor);
this.property._walk(visitor);
});
}
}, AST_PropAccess);
AST_Splice = DEFNODE("Slice", "property2 assignment", {
$documentation: "Index-style property access, i.e. `a[3:5]`",
$propdoc: {
property2: "[AST_Node] the 2nd property to access - typically ending index for the array.",
assignment: "[AST_Node] The data being spliced in."
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.expression._walk(visitor);
this.property._walk(visitor);
this.property2._walk(visitor);
});
}
}, AST_PropAccess);
AST_Unary = DEFNODE("Unary", "operator expression", {
$documentation: "Base class for unary expressions",
$propdoc: {
operator: "[string] the operator",
expression: "[AST_Node] expression that this unary operator applies to"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.expression._walk(visitor);
});
}
});
AST_UnaryPrefix = DEFNODE("UnaryPrefix", null, {
$documentation: "Unary prefix expression, i.e. `typeof i` or `++i`"
}, AST_Unary);
AST_UnaryPostfix = DEFNODE("UnaryPostfix", null, {
$documentation: "Unary postfix expression, i.e. `i++`"
}, AST_Unary);
AST_Binary = DEFNODE("Binary", "left operator right", {
$documentation: "Binary expression, i.e. `a + b`",
$propdoc: {
left: "[AST_Node] left-hand side expression",
operator: "[string] the operator",
right: "[AST_Node] right-hand side expression"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.left._walk(visitor);
this.right._walk(visitor);
});
}
});
AST_Conditional = DEFNODE("Conditional", "condition consequent alternative", {
$documentation: "Conditional expression using the ternary operator, i.e. `a ? b : c`",
$propdoc: {
condition: "[AST_Node]",
consequent: "[AST_Node]",
alternative: "[AST_Node]"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.condition._walk(visitor);
this.consequent._walk(visitor);
this.alternative._walk(visitor);
});
}
});
AST_Assign = DEFNODE("Assign", null, {
$documentation: "An assignment expression — `a = b + 5`"
}, AST_Binary);
AST_Array = DEFNODE("Array", "elements", {
$documentation: "An array literal",
$propdoc: {
elements: "[AST_Node*] array of elements"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.elements.forEach(function(el) {
el._walk(visitor);
});
});
}
});
AST_TupleUnpack = DEFNODE("TupleUnpack", "elements right", {
$documentation: "An object used to represent tuple unpacking",
$propdoc: {
elements: "[AST_Node*] array of elements being assigned to",
right: "[AST_Node] right-hand side expression"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.elements.forEach(function(el) {
el._walk(visitor);
});
this.right._walk(visitor);
});
}
});
AST_Object = DEFNODE("Object", "properties", {
$documentation: "An object literal",
$propdoc: {
properties: "[AST_ObjectProperty*] array of properties"
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.properties.forEach(function(prop) {
prop._walk(visitor);
});
});
}
});
AST_ObjectProperty = DEFNODE("ObjectProperty", "key value quoted", {
$documentation: "Base class for literal object properties",
$propdoc: {
key: "[string] the property name; it's always a plain string in our AST, no matter if it was a string, number or identifier in original code",
value: "[AST_Node] property value. For setters and getters this is an AST_Function.",
quoted: "[true/false] keeps track whether the property was quoted in original code."
},
_walk: function(visitor) {
return visitor._visit(this, function() {
this.value._walk(visitor);
});
}
});
AST_ObjectKeyVal = DEFNODE("ObjectKeyVal", null, {
$documentation: "A key: value object property"
}, AST_ObjectProperty);
AST_ObjectSetter = DEFNODE("ObjectSetter", null, {
$documentation: "An object setter property"
}, AST_ObjectProperty);
AST_ObjectGetter = DEFNODE("ObjectGetter", null, {
$documentation: "An object getter property"
}, AST_ObjectProperty);
AST_Symbol = DEFNODE("Symbol", "scope name thedef", {
$propdoc: {
name: "[string] name of this symbol",
scope: "[AST_Scope/S] the current scope (not necessarily the definition scope)",
thedef: "[SymbolDef/S] the definition of this symbol"
},
$documentation: "Base class for all symbols"
});
AST_SymbolAccessor = DEFNODE("SymbolAccessor", null, {
$documentation: "The name of a property accessor (setter/getter function)"
}, AST_Symbol);
AST_SymbolDeclaration = DEFNODE("SymbolDeclaration", "init", {
$documentation: "A declaration symbol (symbol in var/const, function name or argument, symbol in catch)",
$propdoc: {
init: "[AST_Node*/S] array of initializers for this declaration."
}
}, AST_Symbol);
AST_SymbolVar = DEFNODE("SymbolVar", null, {
$documentation: "Symbol defining a variable"
}, AST_SymbolDeclaration);
AST_SymbolConst = DEFNODE("SymbolConst", null, {
$documentation: "A constant declaration"
}, AST_SymbolDeclaration);
AST_SymbolFunarg = DEFNODE("SymbolFunarg", null, {
$documentation: "Symbol naming a function argument"
}, AST_SymbolVar);
AST_SymbolDefun = DEFNODE("SymbolDefun", null, {
$documentation: "Symbol defining a function"
}, AST_SymbolDeclaration);
AST_SymbolLambda = DEFNODE("SymbolLambda", null, {
$documentation: "Symbol naming a function expression"
}, AST_SymbolDeclaration);
AST_SymbolCatch = DEFNODE("SymbolCatch", null, {
$documentation: "Symbol naming the exception in catch"
}, AST_SymbolDeclaration);
AST_Label = DEFNODE("Label", "references", {
$documentation: "Symbol naming a label (declaration)",
$propdoc: {
references: "[AST_LabelRef*] a list of nodes referring to this label"
}
}, AST_Symbol);
AST_SymbolRef = DEFNODE("SymbolRef", "parens", {
$documentation: "Reference to some symbol (not definition/declaration)",
$propdoc: {
parens: "[boolean/S] if true, this variable is wrapped in parentheses"
}
}, AST_Symbol);
AST_LabelRef = DEFNODE("LabelRef", null, {
$documentation: "Reference to a label symbol"
}, AST_Symbol);
AST_This = DEFNODE("This", null, {
$documentation: "The `this` symbol"
}, AST_Symbol);
AST_Constant = DEFNODE("Constant", null, {
$documentation: "Base class for all constants",
getValue: function() {
return this.value;
}
});
AST_String = DEFNODE("String", "value", {
$documentation: "A string literal",
$propdoc: {
value: "[string] the contents of this string"
}
}, AST_Constant);
AST_Verbatim = DEFNODE("Verbatim", "value", {
$documentation: "Raw JavaScript code",
$propdoc: {
value: "[string] A string of raw JS code"
}
}, AST_Constant);
AST_Number = DEFNODE("Number", "value", {
$documentation: "A number literal",
$propdoc: {
value: "[number] the numeric value"
}
}, AST_Constant);
AST_RegExp = DEFNODE("RegExp", "value", {
$documentation: "A regexp literal",
$propdoc: {
value: "[RegExp] the actual regexp"
}
}, AST_Constant);
AST_Atom = DEFNODE("Atom", null, {
$documentation: "Base class for atoms"
}, AST_Constant);
AST_Null = DEFNODE("Null", null, {
$documentation: "The `null` atom",
value: null
}, AST_Atom);
AST_NaN = DEFNODE("NaN", null, {
$documentation: "The impossible value",
value: 0 / 0
}, AST_Atom);
AST_Undefined = DEFNODE("Undefined", null, {
$documentation: "The `undefined` value",
value: function() {
}.call(this)
}, AST_Atom);
AST_Hole = DEFNODE("Hole", null, {
$documentation: "A hole in an array",
value: function() {
}.call(this)
}, AST_Atom);
AST_Infinity = DEFNODE("Infinity", null, {
$documentation: "The `Infinity` value",
value: 1 / 0
}, AST_Atom);
AST_Boolean = DEFNODE("Boolean", null, {
$documentation: "Base class for booleans"
}, AST_Atom);
AST_False = DEFNODE("False", null, {
$documentation: "The `false` atom",
value: false
}, AST_Boolean);
AST_True = DEFNODE("True", null, {
$documentation: "The `true` atom",
value: true
}, AST_Boolean);
function TreeWalker(callback) {
this.visit = callback;
this.stack = [];
}
TreeWalker.prototype = {
_visit: function(node, descend) {
var ret;
this.stack.push(node);
ret = this.visit(node, descend ? function() {
descend.call(node);
} : noop);
if (!ret && descend) {
descend.call(node);
}
this.stack.pop();
return ret;
},
parent: function(n) {
return this.stack[this.stack.length - 2 - (n || 0)];
},
push: function(node) {
this.stack.push(node);
},
pop: function() {
return this.stack.pop();
},
self: function() {
return this.stack[this.stack.length - 1];
},
find_parent: function(type) {
var stack, x, i;
stack = this.stack;
for (i = stack.length - 1; i > -1; i-=1) {
x = stack[i];
if (x instanceof type) {
return x;
}
}
},
in_boolean_context: function() {
var stack, i, p, self;
stack = this.stack;
i = stack.length;
self = stack[i -= 1];
while (i > 0) {
p = stack[i -= 1];
if (p instanceof AST_If && p.condition === self || p instanceof AST_Conditional && p.condition === self || p instanceof AST_DWLoop && p.condition === self || p instanceof AST_UnaryPrefix && p.operator === "!" && p.expression === self) {
return true;
}
if (!(p instanceof AST_Binary && (p.operator === "&&" || p.operator === "||"))) {
return false;
}
self = p;
}
},
loopcontrol_target: function(label) {
var stack, x, i;
stack = this.stack;
if (label) {
for (i = stack.length - 1; i > -1; i-=1) {
x = stack[i];
if (x instanceof AST_LabeledStatement && x.label.name === label.name) {
return x.body;
}
}
} else {
for (i = stack.length - 1; i > -1; i-=1) {
x = stack[i];
if (x instanceof AST_Switch || x instanceof AST_ForIn || x instanceof AST_DWLoop) {
return x;
}
}
}
}
};
var KEYWORDS, RESERVED_WORDS, KEYWORDS_BEFORE_EXPRESSION, KEYWORDS_ATOM, NATIVE_CLASSES, COMMON_STATIC, OPERATOR_CHARS, RE_HEX_NUMBER, RE_OCT_NUMBER, RE_DEC_NUMBER, OPERATORS, OP_MAP, WHITESPACE_CHARS, PUNC_BEFORE_EXPRESSION, PUNC_CHARS, REGEXP_MODIFIERS, UNICODE, IMPORTED, BASELIB, EX_EOF, UNARY_PREFIX, UNARY_POSTFIX, ASSIGNMENT, PRECEDENCE, STATEMENTS_WITH_LABELS, ATOMIC_START_TOKEN;
"\n**********************************************************************\n\n A RapydScript to JavaScript compiler.\n https://github.com/atsepkov/RapydScript2\n\n -------------------------------- (C) ---------------------------------\n\n Author: Alexander Tsepkov\n <atsepkov@pyjeon.com>\n http://www.pyjeon.com\n\n Distributed under Apache 2.0 license:\n Copyright 2013 (c) Alexander Tsepkov <atsepkov@pyjeon.com>\n\n RapydScript source code is originally based on UglifyJS2 (covered\n by BSD license). UglifyJS2 was written by Mihai Bazon\n <mihai.bazon@gmail.com>, who is its respective copyright holder.\n\n Redistribution and use in source and binary forms, with or without\n modification, are permitted provided that the following conditions\n are met:\n\n * Redistributions of source code must retain the above\n copyright notice, this list of conditions and the following\n disclaimer.\n\n * Redistributions in binary form must reproduce the above\n copyright notice, this list of conditions and the following\n disclaimer in the documentation and/or other materials\n provided with the distribution.\n\n THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDER “AS IS” AND ANY\n EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE\n IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR\n PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER BE\n LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,\n OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,\n PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR\n PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY\n THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR\n TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF\n THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF\n SUCH DAMAGE.\n\n**********************************************************************\n";
"use strict";
KEYWORDS = "as break case class const continue debugger default def del do elif else except finally for from if import in instanceof is module new nonlocal pass raise return switch til to try typeof var void while with or and not";
KEYWORDS_ATOM = "False None True";
RESERVED_WORDS = "abstract boolean byte char double enum export extends final float goto implements int interface long native package private protected public short static super synchronized this throws transient volatile" + " " + KEYWORDS_ATOM + " " + KEYWORDS;
KEYWORDS_BEFORE_EXPRESSION = "return new del raise elif else if";
KEYWORDS = makePredicate(KEYWORDS);
RESERVED_WORDS = makePredicate(RESERVED_WORDS);
KEYWORDS_BEFORE_EXPRESSION = makePredicate(KEYWORDS_BEFORE_EXPRESSION);
KEYWORDS_ATOM = makePredicate(KEYWORDS_ATOM);
NATIVE_CLASSES = {
"Image": {},
"RegExp": {},
"Error": {},
"Object": {
"static": [ "getOwnPropertyNames", "keys", "create" ]
},
"String": {
"static": [ "fromCharCode" ]
},
"Array": {
"static": [ "isArray", "from", "of" ]
},
"Number": {
"static": [ "isFinite", "isNaN" ]
},
"Function": {},
"Date": {
"static": [ "UTC", "now", "parse" ]
},
"Boolean": {},
"ArrayBuffer": {},
"DataView": {},
"Float32Array": {},
"Float64Array": {},
"Int16Array": {},
"Int32Array": {},
"Int8Array": {},
"Uint16Array": {},
"Uint32Array": {},
"Uint8Array": {},
"Uint8ClampedArray": {}
};
COMMON_STATIC = [ "call", "apply", "bind", "toString" ];
OPERATOR_CHARS = makePredicate(characters("+-*&%=<>!?|~^@"));
RE_HEX_NUMBER = /^0x[0-9a-f]+$/i;
RE_OCT_NUMBER = /^0[0-7]+$/;
RE_DEC_NUMBER = /^\d*\.?\d*(?:e[+-]?\d*(?:\d\.?|\.?\d)\d*)?$/i;
OPERATORS = makePredicate([ "in", "instanceof", "typeof", "new", "void", "del", "++", "--", "+", "-", "not", "~", "&", "|", "^", "**", "*", "/", "%", ">>", "<<", ">>>", "<", ">", "<=", ">=", "==", "===", "is", "!=", "!==", "?", "=", "+=", "-=", "/=", "*=", "%=", ">>=", "<<=", ">>>=", "|=", "^=", "&=", "and", "or", "til", "to", "@" ]);
OP_MAP = {
"or": "||",
"and": "&&",
"not": "!",
"del": "delete",
"None": "null",
"is": "===",
"==": "===",
"!=": "!=="
};
WHITESPACE_CHARS = makePredicate(characters("  \n\r\t\f ​᠎             　"));
PUNC_BEFORE_EXPRESSION = makePredicate(characters("[{(,.;:"));
PUNC_CHARS = makePredicate(characters("[]{}(),;:"));
REGEXP_MODIFIERS = makePredicate(characters("gmsiy"));
UNICODE = {
letter: new RegExp("[\\u0041-\\u005A\\u0061-\\u007A\\u00AA\\u00B5\\u00BA\\u00C0-\\u00D6\\u00D8-\\u00F6\\u00F8-\\u02C1\\u02C6-\\u02D1\\u02E0-\\u02E4\\u02EC\\u02EE\\u0370-\\u0374\\u0376\\u0377\\u037A-\\u037D\\u0386\\u0388-\\u038A\\u038C\\u038E-\\u03A1\\u03A3-\\u03F5\\u03F7-\\u0481\\u048A-\\u0523\\u0531-\\u0556\\u0559\\u0561-\\u0587\\u05D0-\\u05EA\\u05F0-\\u05F2\\u0621-\\u064A\\u066E\\u066F\\u0671-\\u06D3\\u06D5\\u06E5\\u06E6\\u06EE\\u06EF\\u06FA-\\u06FC\\u06FF\\u0710\\u0712-\\u072F\\u074D-\\u07A5\\u07B1\\u07CA-\\u07EA\\u07F4\\u07F5\\u07FA\\u0904-\\u0939\\u093D\\u0950\\u0958-\\u0961\\u0971\\u0972\\u097B-\\u097F\\u0985-\\u098C\\u098F\\u0990\\u0993-\\u09A8\\u09AA-\\u09B0\\u09B2\\u09B6-\\u09B9\\u09BD\\u09CE\\u09DC\\u09DD\\u09DF-\\u09E1\\u09F0\\u09F1\\u0A05-\\u0A0A\\u0A0F\\u0A10\\u0A13-\\u0A28\\u0A2A-\\u0A30\\u0A32\\u0A33\\u0A35\\u0A36\\u0A38\\u0A39\\u0A59-\\u0A5C\\u0A5E\\u0A72-\\u0A74\\u0A85-\\u0A8D\\u0A8F-\\u0A91\\u0A93-\\u0AA8\\u0AAA-\\u0AB0\\u0AB2\\u0AB3\\u0AB5-\\u0AB9\\u0ABD\\u0AD0\\u0AE0\\u0AE1\\u0B05-\\u0B0C\\u0B0F\\u0B10\\u0B13-\\u0B28\\u0B2A-\\u0B30\\u0B32\\u0B33\\u0B35-\\u0B39\\u0B3D\\u0B5C\\u0B5D\\u0B5F-\\u0B61\\u0B71\\u0B83\\u0B85-\\u0B8A\\u0B8E-\\u0B90\\u0B92-\\u0B95\\u0B99\\u0B9A\\u0B9C\\u0B9E\\u0B9F\\u0BA3\\u0BA4\\u0BA8-\\u0BAA\\u0BAE-\\u0BB9\\u0BD0\\u0C05-\\u0C0C\\u0C0E-\\u0C10\\u0C12-\\u0C28\\u0C2A-\\u0C33\\u0C35-\\u0C39\\u0C3D\\u0C58\\u0C59\\u0C60\\u0C61\\u0C85-\\u0C8C\\u0C8E-\\u0C90\\u0C92-\\u0CA8\\u0CAA-\\u0CB3\\u0CB5-\\u0CB9\\u0CBD\\u0CDE\\u0CE0\\u0CE1\\u0D05-\\u0D0C\\u0D0E-\\u0D10\\u0D12-\\u0D28\\u0D2A-\\u0D39\\u0D3D\\u0D60\\u0D61\\u0D7A-\\u0D7F\\u0D85-\\u0D96\\u0D9A-\\u0DB1\\u0DB3-\\u0DBB\\u0DBD\\u0DC0-\\u0DC6\\u0E01-\\u0E30\\u0E32\\u0E33\\u0E40-\\u0E46\\u0E81\\u0E82\\u0E84\\u0E87\\u0E88\\u0E8A\\u0E8D\\u0E94-\\u0E97\\u0E99-\\u0E9F\\u0EA1-\\u0EA3\\u0EA5\\u0EA7\\u0EAA\\u0EAB\\u0EAD-\\u0EB0\\u0EB2\\u0EB3\\u0EBD\\u0EC0-\\u0EC4\\u0EC6\\u0EDC\\u0EDD\\u0F00\\u0F40-\\u0F47\\u0F49-\\u0F6C\\u0F88-\\u0F8B\\u1000-\\u102A\\u103F\\u1050-\\u1055\\u105A-\\u105D\\u1061\\u1065\\u1066\\u106E-\\u1070\\u1075-\\u1081\\u108E\\u10A0-\\u10C5\\u10D0-\\u10FA\\u10FC\\u1100-\\u1159\\u115F-\\u11A2\\u11A8-\\u11F9\\u1200-\\u1248\\u124A-\\u124D\\u1250-\\u1256\\u1258\\u125A-\\u125D\\u1260-\\u1288\\u128A-\\u128D\\u1290-\\u12B0\\u12B2-\\u12B5\\u12B8-\\u12BE\\u12C0\\u12C2-\\u12C5\\u12C8-\\u12D6\\u12D8-\\u1310\\u1312-\\u1315\\u1318-\\u135A\\u1380-\\u138F\\u13A0-\\u13F4\\u1401-\\u166C\\u166F-\\u1676\\u1681-\\u169A\\u16A0-\\u16EA\\u1700-\\u170C\\u170E-\\u1711\\u1720-\\u1731\\u1740-\\u1751\\u1760-\\u176C\\u176E-\\u1770\\u1780-\\u17B3\\u17D7\\u17DC\\u1820-\\u1877\\u1880-\\u18A8\\u18AA\\u1900-\\u191C\\u1950-\\u196D\\u1970-\\u1974\\u1980-\\u19A9\\u19C1-\\u19C7\\u1A00-\\u1A16\\u1B05-\\u1B33\\u1B45-\\u1B4B\\u1B83-\\u1BA0\\u1BAE\\u1BAF\\u1C00-\\u1C23\\u1C4D-\\u1C4F\\u1C5A-\\u1C7D\\u1D00-\\u1DBF\\u1E00-\\u1F15\\u1F18-\\u1F1D\\u1F20-\\u1F45\\u1F48-\\u1F4D\\u1F50-\\u1F57\\u1F59\\u1F5B\\u1F5D\\u1F5F-\\u1F7D\\u1F80-\\u1FB4\\u1FB6-\\u1FBC\\u1FBE\\u1FC2-\\u1FC4\\u1FC6-\\u1FCC\\u1FD0-\\u1FD3\\u1FD6-\\u1FDB\\u1FE0-\\u1FEC\\u1FF2-\\u1FF4\\u1FF6-\\u1FFC\\u2071\\u207F\\u2090-\\u2094\\u2102\\u2107\\u210A-\\u2113\\u2115\\u2119-\\u211D\\u2124\\u2126\\u2128\\u212A-\\u212D\\u212F-\\u2139\\u213C-\\u213F\\u2145-\\u2149\\u214E\\u2183\\u2184\\u2C00-\\u2C2E\\u2C30-\\u2C5E\\u2C60-\\u2C6F\\u2C71-\\u2C7D\\u2C80-\\u2CE4\\u2D00-\\u2D25\\u2D30-\\u2D65\\u2D6F\\u2D80-\\u2D96\\u2DA0-\\u2DA6\\u2DA8-\\u2DAE\\u2DB0-\\u2DB6\\u2DB8-\\u2DBE\\u2DC0-\\u2DC6\\u2DC8-\\u2DCE\\u2DD0-\\u2DD6\\u2DD8-\\u2DDE\\u2E2F\\u3005\\u3006\\u3031-\\u3035\\u303B\\u303C\\u3041-\\u3096\\u309D-\\u309F\\u30A1-\\u30FA\\u30FC-\\u30FF\\u3105-\\u312D\\u3131-\\u318E\\u31A0-\\u31B7\\u31F0-\\u31FF\\u3400\\u4DB5\\u4E00\\u9FC3\\uA000-\\uA48C\\uA500-\\uA60C\\uA610-\\uA61F\\uA62A\\uA62B\\uA640-\\uA65F\\uA662-\\uA66E\\uA67F-\\uA697\\uA717-\\uA71F\\uA722-\\uA788\\uA78B\\uA78C\\uA7FB-\\uA801\\uA803-\\uA805\\uA807-\\uA80A\\uA80C-\\uA822\\uA840-\\uA873\\uA882-\\uA8B3\\uA90A-\\uA925\\uA930-\\uA946\\uAA00-\\uAA28\\uAA40-\\uAA42\\uAA44-\\uAA4B\\uAC00\\uD7A3\\uF900-\\uFA2D\\uFA30-\\uFA6A\\uFA70-\\uFAD9\\uFB00-\\uFB06\\uFB13-\\uFB17\\uFB1D\\uFB1F-\\uFB28\\uFB2A-\\uFB36\\uFB38-\\uFB3C\\uFB3E\\uFB40\\uFB41\\uFB43\\uFB44\\uFB46-\\uFBB1\\uFBD3-\\uFD3D\\uFD50-\\uFD8F\\uFD92-\\uFDC7\\uFDF0-\\uFDFB\\uFE70-\\uFE74\\uFE76-\\uFEFC\\uFF21-\\uFF3A\\uFF41-\\uFF5A\\uFF66-\\uFFBE\\uFFC2-\\uFFC7\\uFFCA-\\uFFCF\\uFFD2-\\uFFD7\\uFFDA-\\uFFDC]"),
non_spacing_mark: new RegExp("[\\u0300-\\u036F\\u0483-\\u0487\\u0591-\\u05BD\\u05BF\\u05C1\\u05C2\\u05C4\\u05C5\\u05C7\\u0610-\\u061A\\u064B-\\u065E\\u0670\\u06D6-\\u06DC\\u06DF-\\u06E4\\u06E7\\u06E8\\u06EA-\\u06ED\\u0711\\u0730-\\u074A\\u07A6-\\u07B0\\u07EB-\\u07F3\\u0816-\\u0819\\u081B-\\u0823\\u0825-\\u0827\\u0829-\\u082D\\u0900-\\u0902\\u093C\\u0941-\\u0948\\u094D\\u0951-\\u0955\\u0962\\u0963\\u0981\\u09BC\\u09C1-\\u09C4\\u09CD\\u09E2\\u09E3\\u0A01\\u0A02\\u0A3C\\u0A41\\u0A42\\u0A47\\u0A48\\u0A4B-\\u0A4D\\u0A51\\u0A70\\u0A71\\u0A75\\u0A81\\u0A82\\u0ABC\\u0AC1-\\u0AC5\\u0AC7\\u0AC8\\u0ACD\\u0AE2\\u0AE3\\u0B01\\u0B3C\\u0B3F\\u0B41-\\u0B44\\u0B4D\\u0B56\\u0B62\\u0B63\\u0B82\\u0BC0\\u0BCD\\u0C3E-\\u0C40\\u0C46-\\u0C48\\u0C4A-\\u0C4D\\u0C55\\u0C56\\u0C62\\u0C63\\u0CBC\\u0CBF\\u0CC6\\u0CCC\\u0CCD\\u0CE2\\u0CE3\\u0D41-\\u0D44\\u0D4D\\u0D62\\u0D63\\u0DCA\\u0DD2-\\u0DD4\\u0DD6\\u0E31\\u0E34-\\u0E3A\\u0E47-\\u0E4E\\u0EB1\\u0EB4-\\u0EB9\\u0EBB\\u0EBC\\u0EC8-\\u0ECD\\u0F18\\u0F19\\u0F35\\u0F37\\u0F39\\u0F71-\\u0F7E\\u0F80-\\u0F84\\u0F86\\u0F87\\u0F90-\\u0F97\\u0F99-\\u0FBC\\u0FC6\\u102D-\\u1030\\u1032-\\u1037\\u1039\\u103A\\u103D\\u103E\\u1058\\u1059\\u105E-\\u1060\\u1071-\\u1074\\u1082\\u1085\\u1086\\u108D\\u109D\\u135F\\u1712-\\u1714\\u1732-\\u1734\\u1752\\u1753\\u1772\\u1773\\u17B7-\\u17BD\\u17C6\\u17C9-\\u17D3\\u17DD\\u180B-\\u180D\\u18A9\\u1920-\\u1922\\u1927\\u1928\\u1932\\u1939-\\u193B\\u1A17\\u1A18\\u1A56\\u1A58-\\u1A5E\\u1A60\\u1A62\\u1A65-\\u1A6C\\u1A73-\\u1A7C\\u1A7F\\u1B00-\\u1B03\\u1B34\\u1B36-\\u1B3A\\u1B3C\\u1B42\\u1B6B-\\u1B73\\u1B80\\u1B81\\u1BA2-\\u1BA5\\u1BA8\\u1BA9\\u1C2C-\\u1C33\\u1C36\\u1C37\\u1CD0-\\u1CD2\\u1CD4-\\u1CE0\\u1CE2-\\u1CE8\\u1CED\\u1DC0-\\u1DE6\\u1DFD-\\u1DFF\\u20D0-\\u20DC\\u20E1\\u20E5-\\u20F0\\u2CEF-\\u2CF1\\u2DE0-\\u2DFF\\u302A-\\u302F\\u3099\\u309A\\uA66F\\uA67C\\uA67D\\uA6F0\\uA6F1\\uA802\\uA806\\uA80B\\uA825\\uA826\\uA8C4\\uA8E0-\\uA8F1\\uA926-\\uA92D\\uA947-\\uA951\\uA980-\\uA982\\uA9B3\\uA9B6-\\uA9B9\\uA9BC\\uAA29-\\uAA2E\\uAA31\\uAA32\\uAA35\\uAA36\\uAA43\\uAA4C\\uAAB0\\uAAB2-\\uAAB4\\uAAB7\\uAAB8\\uAABE\\uAABF\\uAAC1\\uABE5\\uABE8\\uABED\\uFB1E\\uFE00-\\uFE0F\\uFE20-\\uFE26]"),
space_combining_mark: new RegExp("[\\u0903\\u093E-\\u0940\\u0949-\\u094C\\u094E\\u0982\\u0983\\u09BE-\\u09C0\\u09C7\\u09C8\\u09CB\\u09CC\\u09D7\\u0A03\\u0A3E-\\u0A40\\u0A83\\u0ABE-\\u0AC0\\u0AC9\\u0ACB\\u0ACC\\u0B02\\u0B03\\u0B3E\\u0B40\\u0B47\\u0B48\\u0B4B\\u0B4C\\u0B57\\u0BBE\\u0BBF\\u0BC1\\u0BC2\\u0BC6-\\u0BC8\\u0BCA-\\u0BCC\\u0BD7\\u0C01-\\u0C03\\u0C41-\\u0C44\\u0C82\\u0C83\\u0CBE\\u0CC0-\\u0CC4\\u0CC7\\u0CC8\\u0CCA\\u0CCB\\u0CD5\\u0CD6\\u0D02\\u0D03\\u0D3E-\\u0D40\\u0D46-\\u0D48\\u0D4A-\\u0D4C\\u0D57\\u0D82\\u0D83\\u0DCF-\\u0DD1\\u0DD8-\\u0DDF\\u0DF2\\u0DF3\\u0F3E\\u0F3F\\u0F7F\\u102B\\u102C\\u1031\\u1038\\u103B\\u103C\\u1056\\u1057\\u1062-\\u1064\\u1067-\\u106D\\u1083\\u1084\\u1087-\\u108C\\u108F\\u109A-\\u109C\\u17B6\\u17BE-\\u17C5\\u17C7\\u17C8\\u1923-\\u1926\\u1929-\\u192B\\u1930\\u1931\\u1933-\\u1938\\u19B0-\\u19C0\\u19C8\\u19C9\\u1A19-\\u1A1B\\u1A55\\u1A57\\u1A61\\u1A63\\u1A64\\u1A6D-\\u1A72\\u1B04\\u1B35\\u1B3B\\u1B3D-\\u1B41\\u1B43\\u1B44\\u1B82\\u1BA1\\u1BA6\\u1BA7\\u1BAA\\u1C24-\\u1C2B\\u1C34\\u1C35\\u1CE1\\u1CF2\\uA823\\uA824\\uA827\\uA880\\uA881\\uA8B4-\\uA8C3\\uA952\\uA953\\uA983\\uA9B4\\uA9B5\\uA9BA\\uA9BB\\uA9BD-\\uA9C0\\uAA2F\\uAA30\\uAA33\\uAA34\\uAA4D\\uAA7B\\uABE3\\uABE4\\uABE6\\uABE7\\uABE9\\uABEA\\uABEC]"),
connector_punctuation: new RegExp("[\\u005F\\u203F\\u2040\\u2054\\uFE33\\uFE34\\uFE4D-\\uFE4F\\uFF3F]")
};
IMPORTED = {};
BASELIB = {};
function is_letter(code) {
return code >= 97 && code <= 122 || code >= 65 && code <= 90 || code >= 170 && UNICODE.letter.test(String.fromCharCode(code));
}
function is_digit(code) {
return code >= 48 && code <= 57;
}
function is_alphanumeric_char(code) {
return is_digit(code) || is_letter(code);
}
function is_unicode_combining_mark(ch) {
return UNICODE.non_spacing_mark.test(ch) || UNICODE.space_combining_mark.test(ch);
}
function is_unicode_connector_punctuation(ch) {
return UNICODE.connector_punctuation.test(ch);
}
function is_identifier(name) {
return !RESERVED_WORDS(name) && /^[a-z_$][a-z0-9_$]*$/i.test(name);
}
function is_identifier_start(code) {
return code === 36 || code === 95 || is_letter(code);
}
function is_identifier_char(ch) {
var code;
code = ch.charCodeAt(0);
return is_identifier_start(code) || is_digit(code) || code === 8204 || code === 8205 || is_unicode_combining_mark(ch) || is_unicode_connector_punctuation(ch);
}
function parse_js_number(num) {
if (RE_HEX_NUMBER.test(num)) {
return parseInt(num.substr(2), 16);
} else if (RE_OCT_NUMBER.test(num)) {
return parseInt(num.substr(1), 8);
} else if (RE_DEC_NUMBER.test(num)) {
return parseFloat(num);
}
}
function JS_Parse_Error(message, line, col, pos) {
this.message = message;
this.line = line;
this.col = col;
this.pos = pos;
this.stack = new Error().stack;
}
JS_Parse_Error.prototype.toString = function() {
return this.message + " (line: " + this.line + ", col: " + this.col + ", pos: " + this.pos + ")" + "\n\n" + this.stack;
};
function js_error(message, filename, line, col, pos) {
AST_Node.warn("ERROR: {message} [{file}:{line},{col}]", {
message: message,
file: filename,
line: line,
col: col
});
throw new JS_Parse_Error(message, line, col, pos);
}
function is_token(token, type, val) {
return token.type === type && (val === null || val === undefined || token.value === val);
}
EX_EOF = {};
function tokenizer($TEXT, filename) {
var S, read_string, read_multiline_comment, read_regexp;
S = {
text: $TEXT.replace(/\r\n?|[\n\u2028\u2029]/g, "\n").replace(/\uFEFF/g, ""),
filename: filename,
pos: 0,
tokpos: 0,
line: 1,
tokline: 0,
col: 0,
tokcol: 0,
newline_before: false,
regex_allowed: false,
comments_before: [],
whitespace_before: [],
newblock: false,
endblock: false,
indentation_matters: [ true ],
cached_whitespace: "",
prev: undefined,
index_or_slice: [ false ]
};
function peek() {
return S.text.charAt(S.pos);
}
function prevChar() {
return S.text.charAt(S.tokpos - 1);
}
function next(signal_eof, in_string) {
var ch;
ch = S.text.charAt(S.pos);
S.pos += 1;
if (signal_eof && !ch) {
throw EX_EOF;
}
if (ch === "\n") {
S.newline_before = S.newline_before || !in_string;
S.line += 1;
S.col = 0;
} else {
S.col += 1;
}
return ch;
}
function find(what, signal_eof) {
var pos;
pos = S.text.indexOf(what, S.pos);
if (signal_eof && pos === -1) {
throw EX_EOF;
}
return pos;
}
function start_token() {
S.tokline = S.line;
S.tokcol = S.col;
S.tokpos = S.pos;
}
function token(type, value, is_comment, keep_newline) {
var ret, i;
S.regex_allowed = type === "operator" && !UNARY_POSTFIX[value] || type === "keyword" && KEYWORDS_BEFORE_EXPRESSION(value) || type === "punc" && PUNC_BEFORE_EXPRESSION(value);
if (type === "operator" && value === "is" && S.text.substr(S.pos).trimLeft().substr(0, 4).trimRight() === "not") {
next_token();
value = "!==";
}
if (type === "operator" && OP_MAP[value]) {
value = OP_MAP[value];
}
ret = {
type: type,
value: value,
line: S.tokline,
col: S.tokcol,
pos: S.tokpos,
endpos: S.pos,
nlb: S.newline_before,
file: filename
};
if (!is_comment) {
ret.comments_before = S.comments_before;
S.comments_before = [];
for (i = 0; i < len(ret.comments_before); i++) {
ret.nlb = ret.nlb || ret.comments_before[i].nlb;
}
}
if (!keep_newline) {
S.newline_before = false;
}
if (type === "punc") {
if (value === ":" && !S.index_or_slice.slice(-1)[0] && (!S.text.substring(S.pos + 1, find("\n")).trim() || !S.text.substring(S.pos + 1, find("#")).trim())) {
S.newblock = true;
S.indentation_matters.push(true);
}
if (value === "[") {
if (S.prev && S.prev.type === "name") {
S.index_or_slice.push(true);
} else {
S.index_or_slice.push(false);
}
S.indentation_matters.push(false);
} else if (value === "{" || value === "(") {
S.indentation_matters.push(false);
} else if (value === "]") {
S.index_or_slice.pop();
S.indentation_matters.pop();
} else if (value === "}" || value === ")") {
S.indentation_matters.pop();
}
}
S.prev = new AST_Token(ret);
return S.prev;
}
function parse_whitespace() {
var whitespace_exists, ch, leading_whitespace;
leading_whitespace = "";
whitespace_exists = false;
while (WHITESPACE_CHARS(peek())) {
whitespace_exists = true;
ch = next();
if (ch === "\n") {
leading_whitespace = "";
} else {
leading_whitespace += ch;
}
}
if (peek() !== "#") {
if (!whitespace_exists) {
leading_whitespace = S.cached_whitespace;
} else {
S.cached_whitespace = leading_whitespace;
}
if (S.newline_before || S.endblock) {
return test_indent_token(leading_whitespace);
}
}
}
function test_indent_token(leading_whitespace) {
var most_recent;
most_recent = S.whitespace_before[S.whitespace_before.length - 1] || "";
S.endblock = false;
if (S.indentation_matters.slice(-1)[0] && leading_whitespace !== most_recent) {
if (S.newblock && leading_whitespace && leading_whitespace.indexOf(most_recent) === 0) {
S.newblock = false;
S.whitespace_before.push(leading_whitespace);
return 1;
} else if (most_recent && most_recent.indexOf(leading_whitespace) === 0) {
S.endblock = true;
S.whitespace_before.pop();
return -1;
} else {
parse_error("Inconsistent indentation");
}
} else {
return 0;
}
}
function read_while(pred) {
var i, ret;
ret = "";
i = 0;
while ((ch = peek()) && pred(ch, i)) {
i += 1;
ret += next();
}
return ret;
}
function parse_error(err) {
js_error(err, filename, S.tokline, S.tokcol, S.tokpos);
}
function read_num(prefix) {
var has_e, after_e, has_x, has_dot, num, valid;
has_e = false;
after_e = false;
has_x = false;
has_dot = prefix === ".";
num = read_while(function(ch, i) {
var code, tmp_;
code = ch.charCodeAt(0);
tmp_ = code;
if (tmp_ === 120 || tmp_ === 88) {
return has_x ? false : has_x = true;
} else if (tmp_ === 101 || tmp_ === 69) {
return has_x ? true : has_e ? false : has_e = after_e = true;
} else if (tmp_ === 45) {
return after_e || i === 0 && !prefix;
} else if (tmp_ === 43) {
return after_e;
} else if (tmp_ === 46) {
after_e = false;
return !has_dot && !has_x && !has_e ? has_dot = true : false;
}
return is_alphanumeric_char(code);
});
if (prefix) {
num = prefix + num;
}
valid = parse_js_number(num);
if (!isNaN(valid)) {
return token("num", valid);
} else {
parse_error("Invalid syntax: " + num);
}
}
function read_escaped_char(in_string, digester) {
var ch, tmp_;
digester = digester || function(in_str) {
return next(true, in_str);
};
ch = digester(in_string);
tmp_ = ch.charCodeAt(0);
if (tmp_ === 110) {
return "\n";
} else if (tmp_ === 114) {
return "\r";
} else if (tmp_ === 116) {
return "\t";
} else if (tmp_ === 98) {
return "\b";
} else if (tmp_ === 118) {
return " ";
} else if (tmp_ === 102) {
return "\f";
} else if (tmp_ === 48) {
return "\0";
} else if (tmp_ === 120) {
return String.fromCharCode(hex_bytes(2, digester));
} else if (tmp_ === 117) {
return String.fromCharCode(hex_bytes(4, digester));
} else if (tmp_ === 10) {
return "";
} else {
return ch;
}
}
function hex_bytes(n, digester) {
var digit, num, i;
num = 0;
for (i = 0; i < n; i++) {
digit = parseInt(digester(), 16);
if (isNaN(digit)) {
parse_error("Invalid hex-character pattern in string");
}
num = num << 4 | digit;
}
return num;
}
read_string = with_eof_error("Unterminated string constant", function() {
var quote, i, tmp, find_newlines, octal_len, first, ch, ret;
quote = next();
ret = "";
if (peek() === quote) {
next(true);
if (peek() === quote) {
next(true);
i = find(quote + quote + quote, true);
if (i !== -1) {
tmp = S.text.substring(S.pos, i);
S.pos = i + 3;
while (tmp.length) {
if (tmp[0] === "\\") {
tmp = tmp.substr(1);
ret += read_escaped_char(true, function() {
var ch;
ch = tmp[0];
tmp = tmp.substr(1);
return ch;
});
} else {
ret += tmp[0];
tmp = tmp.substr(1);
}
}
find_newlines = ret.match(/\n/g);
if (find_newlines) {
S.line += find_newlines.length;
}
return token("string", ret);
}
} else {
return token("string", "");
}
}
while (true) {
ch = next(true);
if (ch === "\n") {
parse_error("End of line while scanning string literal.");
}
if (ch === "\\") {
octal_len = 0;
first = null;
ch = read_while(function(ch) {
if (ch >= "0" && ch <= "7") {
if (!first) {
first = ch;
return octal_len += 1;
} else if (first <= "3" && octal_len <= 2) {
return octal_len += 1;
} else if (first >= "4" && octal_len <= 1) {
return octal_len += 1;
}
}
return false;
});
if (octal_len > 0) {
ch = String.fromCharCode(parseInt(ch, 8));
} else if (peek() === "\n") {
next(true);
continue;
} else {
ch = read_escaped_char(true);
}
} else if (ch === quote) {
break;
}
ret += ch;
}
return token("string", ret);
});
function read_line_comment(shebang) {
if (typeof shebang === "undefined") shebang = false;
var i, ret;
if (!shebang) {
next();
}
i = find("\n");
if (i === -1) {
ret = S.text.substr(S.pos);
S.pos = S.text.length;
} else {
ret = S.text.substring(S.pos, i);
S.pos = i;
}
return token(shebang ? "shebang" : "comment1", ret, true);
}
read_multiline_comment = with_eof_error("Unterminated multiline comment", function() {
var i, text, a, n;
next();
i = find("*/", true);
text = S.text.substring(S.pos, i);
a = text.split("\n");
n = a.length;
S.pos = i + 2;
S.line += n - 1;
if (n > 1) {
S.col = a[n - 1].length;
} else {
S.col += a[n - 1].length;
}
S.col += 2;
S.newline_before = S.newline_before || text.indexOf("\n") >= 0;
return token("comment2", text, true);
});
function read_name() {
var escaped, ch, backslash, hex, name;
backslash = false;
name = "";
escaped = false;
while ((ch = peek()) !== null) {
if (!backslash) {
if (ch === "\\") {
if (S.text.charAt(S.pos + 1) === "\n") {
S.pos += 2;
continue;
} else {
escaped = [backslash = true, next()];
}
} else if (is_identifier_char(ch)) {
name += next();
} else {
break;
}
} else {
if (ch !== "u") {
parse_error("Expecting UnicodeEscapeSequence -- uXXXX");
}
ch = read_escaped_char();
if (!is_identifier_char(ch)) {
parse_error("Unicode char: " + ch.charCodeAt(0) + " is not valid in identifier");
}
name += ch;
backslash = false;
}
}
if (KEYWORDS(name) && escaped) {
hex = name.charCodeAt(0).toString(16).toUpperCase();
name = "\\u" + "0000".substr(hex.length) + hex + name.slice(1);
}
return name;
}
read_regexp = with_eof_error("Unterminated regular expression", function(regexp) {
var in_class, prev_backslash, mods;
prev_backslash = false;
in_class = false;
while (ch = next(true)) {
if (prev_backslash) {
regexp += "\\" + ch;
prev_backslash = false;
} else if (ch === "[") {
in_class = true;
regexp += ch;
} else if (ch === "]" && in_class) {
in_class = false;
regexp += ch;
} else if (ch === "/" && !in_class) {
break;
} else if (ch === "\\") {
prev_backslash = true;
} else {
regexp += ch;
}
}
mods = read_name();
return token("regexp", new RegExp(regexp, mods));
});
function read_operator(prefix) {
var op;
function grow(op) {
var bigger;
if (!peek()) {
return op;
}
bigger = op + peek();
if (OPERATORS(bigger)) {
next();
return grow(bigger);
} else {
return op;
}
}
op = grow(prefix || next());
if (_$rapyd$_in(op, [ "++", "--", "===", "!==" ])) {
parse_error("Invalid operator «" + op + "»");
}
return token("operator", op);
}
function handle_slash() {
next();
return S.regex_allowed ? read_regexp("") : read_operator("/");
}
function handle_dot() {
next();
return is_digit(peek().charCodeAt(0)) ? read_num(".") : token("punc", ".");
}
function read_word() {
var word;
word = read_name();
return KEYWORDS_ATOM(word) ? token("atom", word) : !KEYWORDS(word) ? token("name", word) : OPERATORS(word) && prevChar() !== "." ? token("operator", word) : token("keyword", word);
}
function with_eof_error(eof_error, cont) {
return function(x) {
try {
return cont(x);
} catch (_$rapyd$_Exception) {
var ex = _$rapyd$_Exception;
if (ex === EX_EOF) {
parse_error(eof_error);
} else {
throw _$rapyd$_Exception;
}
}
};
}
function next_token(force_regexp) {
var indent, ch, code, tmp_, regex_allowed;
if (!(_$rapyd$_in(force_regexp, [null, undefined]))) {
return read_regexp(force_regexp);
}
indent = parse_whitespace();
if (indent === -1) {
return token("punc", "}", false, true);
}
start_token();
ch = peek();
if (!ch) {
return token("eof");
}
code = ch.charCodeAt(0);
tmp_ = code;
if (tmp_ === 34 || tmp_ === 39) {
return read_string();
} else if (tmp_ === 35) {
if (S.pos === 0 && S.text.charAt(1) === "!") {
return read_line_comment(true);
}
regex_allowed = S.regex_allowed;
S.comments_before.push(read_line_comment());
S.regex_allowed = regex_allowed;
return next_token();
} else if (tmp_ === 46) {
return handle_dot();
} else if (tmp_ === 47) {
return handle_slash();
}
if (is_digit(code)) {
return read_num();
}
if (PUNC_CHARS(ch)) {
return token("punc", next());
}
if (OPERATOR_CHARS(ch)) {
return read_operator();
}
if (code === 92 && S.text.charAt(S.pos + 1) === "\n") {
next();
next();
S.newline_before = false;
return next_token();
}
if (code === 92 || is_identifier_start(code)) {
return read_word();
}
parse_error("Unexpected character «" + ch + "»");
}
next_token.context = function(nc) {
if (nc) {
S = nc;
}
return S;
};
return next_token;
}
UNARY_PREFIX = makePredicate([ "typeof", "void", "delete", "--", "++", "!", "~", "-", "+", "@" ]);
UNARY_POSTFIX = makePredicate([ "--", "++" ]);
ASSIGNMENT = makePredicate([ "=", "+=", "-=", "/=", "*=", "%=", ">>=", "<<=", ">>>=", "|=", "^=", "&=" ]);
PRECEDENCE = function(a, ret) {
var b, j, i;
for (i = 0; i < a.length; i++) {
b = a[i];
for (j = 0; j < b.length; j++) {
ret[b[j]] = i + 1;
}
}
return ret;
}.call(this, [ [ "||" ], [ "&&" ], [ "|" ], [ "^" ], [ "&" ], [ "==", "===", "!=", "!==" ], [ "<", ">", "<=", ">=", "in", "instanceof" ], [ ">>", "<<", ">>>" ], [ "+", "-" ], [ "*", "/", "%" ], [ "**" ] ], {});
STATEMENTS_WITH_LABELS = array_to_hash([ "for", "do", "while", "switch" ]);
ATOMIC_START_TOKEN = array_to_hash([ "atom", "num", "string", "regexp", "name" ]);
function parse($TEXT, options) {
var S, statement, import_, from_import_, ModuleTreeNode, module_, class_, function_, nonlocal_, const_, new_, expr_atom, array_, object_, subscripts, maybe_unary, expr_op, maybe_conditional, maybe_assign, expression;
options = defaults(options, {
strict: false,
filename: null,
auto_bind: false,
toplevel: null
});
S = {
input: typeof $TEXT === "string" ? tokenizer($TEXT, options.filename) : $TEXT,
token: null,
prev: null,
peeked: null,
in_function: 0,
in_directives: true,
in_loop: 0,
in_class: [ false ],
classes: [ {} ],
labels: [],
decorators: [],
module_tree: {},
module_stack: []
};
S.token = next();
function is_(type, value) {
return is_token(S.token, type, value);
}
function peek() {
return S.peeked || (S.peeked = S.input());
}
function next() {
S.prev = S.token;
if (S.peeked) {
S.token = S.peeked;
S.peeked = null;
} else {
S.token = S.input();
}
S.in_directives = S.in_directives && (S.token.type === "string" || is_("punc", ";"));
return S.token;
}
function prev() {
return S.prev;
}
function croak(msg, line, col, pos) {
var ctx;
ctx = S.input.context();
js_error(msg, ctx.filename, line !== undefined ? line : ctx.tokline, col !== undefined ? col : ctx.tokcol, pos !== undefined ? pos : ctx.tokpos);
}
function token_error(token, msg) {
croak(msg, token.line, token.col);
}
function unexpected(token) {
if (token === undefined) {
token = S.token;
}
token_error(token, "Unexpected token: " + token.type + " «" + token.value + "»");
}
function expect_token(type, val) {
if (is_(type, val)) {
return next();
}
token_error(S.token, "Unexpected token " + S.token.type + " «" + S.token.value + "»" + ", expected " + type + " «" + val + "»");
}
function expect(punc) {
return expect_token("punc", punc);
}
function can_insert_semicolon() {
return !options.strict && (S.token.nlb || is_("eof") || is_("punc", "}"));
}
function semicolon() {
if (is_("punc", ";")) {
next();
S.token.nlb = true;
}
}
function parenthesised() {
var exp;
expect("(");
exp = expression(true);
expect(")");
return exp;
}
function embed_tokens(parser) {
return function() {
var start, expr, end;
start = S.token;
expr = parser();
end = prev();
expr.start = start;
expr.end = end;
return expr;
};
}
function is_nested_comparison(stmt) {
var comparators;
"\n Check if the statement is a nested comparison\n ";
comparators = {
"<": true,
">": true,
"<=": true,
">=": true,
"==": true,
"!=": true,
"===": true,
"!==": true
};
if (stmt instanceof AST_Binary && _$rapyd$_in(stmt.operator, comparators) && stmt.left instanceof AST_Binary && _$rapyd$_in(stmt.left.operator, comparators)) {
return true;
} else {
return false;
}
}
function scan_for_local_vars(body, is_module) {
var stmt, vars;
"\n Pick out all variables being assigned to from within this scope, we'll mark them as local\n\n body body to be scanned\n is_module if this body belongs to a module object and variables should be exposed\n ";
vars = [];
if (body instanceof Array) {
for (stmt in body) {
if (body[stmt] instanceof AST_Scope) {
if (is_module && body[stmt].name) {
vars.push(body[stmt].name);
}
continue;
}
[ "body", "alternative" ].forEach(function(option) {
var opt;
opt = body[stmt][option];
if (opt) {
vars = vars.concat(scan_for_local_vars(opt, is_module));
}
if (opt instanceof AST_Assign && !(opt.right instanceof AST_Scope)) {
vars = vars.concat(scan_for_local_vars(opt.right, is_module));
}
});
if (!is_module) {
if (body[stmt] instanceof AST_ForIn) {
if (body[stmt].init instanceof AST_Array) {
vars.push("_$rapyd$_Unpack");
body[stmt].init.elements.forEach(function(elem) {
if (vars.indexOf(elem.name) === -1) {
vars.push(elem.name);
}
});
} else if (vars.indexOf(body[stmt].init.name) === -1) {
vars.push(body[stmt].init.name);
}
} else if (body[stmt] instanceof AST_DWLoop) {
vars = vars.concat(scan_for_local_vars(body[stmt], is_module));
} else if (body[stmt] instanceof AST_If && is_nested_comparison(body[stmt].condition)) {
vars.push("_$rapyd$_Temp");
} else if (body[stmt] instanceof AST_Exit && is_nested_comparison(body[stmt].value)) {
vars.push("_$rapyd$_Temp");
}
}
}
} else if (body.body) {
vars = vars.concat(scan_for_local_vars(body.body, is_module));
if (body.alternative) {
vars = vars.concat(scan_for_local_vars(body.alternative, is_module));
}
} else if (body instanceof AST_Assign) {
if (body.left instanceof AST_Array) {
vars.push("_$rapyd$_Unpack");
body.left.elements.forEach(function(elem) {
if (!(elem instanceof AST_PropAccess) && vars.indexOf(elem.name) === -1) {
vars.push(elem.name);
}
});
} else if (body.left.name && vars.indexOf(body.left.name) === -1) {
vars.push(body.left.name);
}
if (is_nested_comparison(body.right)) {
vars.push("_$rapyd$_Temp");
} else if (body.right instanceof AST_Conditional && is_nested_comparison(body.right.condition)) {
vars.push("_$rapyd$_Temp");
}
} else if (body instanceof AST_Conditional && is_nested_comparison(body.condition)) {
vars.push("_$rapyd$_Temp");
} else if (is_nested_comparison(body)) {
vars.push("_$rapyd$_Temp");
}
return vars;
}
function scan_for_nonlocal_defs(body) {
var stmt, vars;
vars = [];
if (body instanceof Array) {
for (stmt in body) {
if (body[stmt] instanceof AST_Scope) {
continue;
}
if (body[stmt] instanceof AST_Definitions) {
body[stmt].definitions.forEach(function(vardef) {
vars.push(vardef.name.name);
});
}
[ "body", "alternative" ].forEach(function(option) {
var opt;
opt = body[stmt][option];
if (opt) {
vars = vars.concat(scan_for_nonlocal_defs(opt));
}
});
}
} else if (body.body) {
vars = vars.concat(scan_for_nonlocal_defs(body.body));
if (body.alternative) {
vars = vars.concat(scan_for_nonlocal_defs(body.alternative));
}
}
return vars;
}
function finalize_import(imp) {
var classes, c, key;
classes = scan_for_classes(imp.body.body);
for (c in classes) {
if (classes[c] instanceof ModuleTreeNode) {
S.module_tree[c] = classes[c];
} else {
S.classes[0][c] = classes[c];
}
}
key = "";
while (imp instanceof AST_Dot) {
key = "." + imp.property + key;
imp = imp.expression;
}
key = imp.name + key;
IMPORTED[key] = true;
return imp;
}
statement = embed_tokens(function() {
var dir, stat, tmp_, start, func, chain, tmp;
if (is_("operator", "/") || is_("operator", "/=")) {
S.peeked = null;
S.token = S.input(S.token.value.substr(1));
}
tmp_ = S.token.type;
if (tmp_ === "string") {
dir = S.in_directives;
stat = simple_statement();
if (dir && stat.body instanceof AST_String && !is_("punc", ",")) {
return new AST_Directive({
value: stat.body.value
});
}
return stat;
} else if (tmp_ === "shebang") {
tmp_ = S.token.value;
next();
return new AST_Directive({
value: tmp_
});
} else if (tmp_ === "num" || tmp_ === "regexp" || tmp_ === "operator" || tmp_ === "atom") {
return simple_statement();
} else if (tmp_ === "punc") {
tmp_ = S.token.value;
if (tmp_ === ":") {
return new AST_BlockStatement({
start: S.token,
body: block_(),
end: prev()
});
} else if (tmp_ === "{" || tmp_ === "[" || tmp_ === "(") {
return simple_statement();
} else if (tmp_ === ";") {
next();
return new AST_EmptyStatement();
} else {
unexpected();
}
} else if (tmp_ === "name") {
return is_token(peek(), "punc", ":") ? labeled_statement() : simple_statement();
} else if (tmp_ === "keyword") {
tmp_ = S.token.value;
next();
if (tmp_ === "break") {
return break_cont(AST_Break);
} else if (tmp_ === "continue") {
return break_cont(AST_Continue);
} else if (tmp_ === "debugger") {
semicolon();
return new AST_Debugger();
} else if (tmp_ === "do") {
return new AST_Do({
body: in_loop(statement),
condition: function() {
var tmp;
expect(".");
expect_token("keyword", "while");
tmp = expression(true);
semicolon();
return tmp;
}.call(this)
});
} else if (tmp_ === "while") {
return new AST_While({
condition: expression(true),
body: in_loop(statement)
});
} else if (tmp_ === "for") {
if (is_("name", "JS")) {
return for_js();
}
return for_();
} else if (tmp_ === "from") {
return finalize_import(from_import_());
} else if (tmp_ === "import") {
return finalize_import(import_());
} else if (tmp_ === "class") {
BASELIB["extends"] = true;
if (options.auto_bind) {
BASELIB["rebind_all"] = true;
}
return class_();
} else if (tmp_ === "module") {
return module_();
} else if (tmp_ === "def") {
start = prev();
func = function_(S.in_class.slice(-1)[0]);
func.start = start;
func.end = prev();
chain = subscripts(func, true);
if (chain === func) {
return func;
} else {
return new AST_SimpleStatement({
start: start,
body: chain,
end: prev()
});
}
} else if (tmp_ === "if") {
return if_();
} else if (tmp_ === "pass") {
semicolon();
return new AST_EmptyStatement();
} else if (tmp_ === "return") {
if (S.in_function === 0) {
croak("'return' outside of function");
}
return new AST_Return({
value: is_("punc", ";") ? function() {
semicolon();
return null;
}.call(this) : can_insert_semicolon() ? null : function() {
var tmp;
tmp = expression(true);
semicolon();
return tmp;
}.call(this)
});
} else if (tmp_ === "switch") {
return new AST_Switch({
expression: parenthesised(),
body: in_loop(switch_body_)
});
} else if (tmp_ === "raise") {
if (S.token.nlb) {
return new AST_Throw({
value: new AST_SymbolCatch({
name: "_$rapyd$_Exception"
})
});
}
tmp = expression(true);
semicolon();
return new AST_Throw({
value: tmp
});
} else if (tmp_ === "try") {
return try_();
} else if (tmp_ === "nonlocal") {
tmp = nonlocal_();
semicolon();
return tmp;
} else if (tmp_ === "const") {
tmp = const_();
semicolon();
return tmp;
} else if (tmp_ === "with") {
return new AST_With({
expression: parenthesised(),
body: statement()
});
} else {
unexpected();
}
}
});
function labeled_statement() {
var label, stat;
label = as_symbol(AST_Label);
if (find_if(function(l) {
return l.name === label.name;
}, S.labels)) {
croak("Label " + label.name + " defined twice");
}
expect(":");
S.labels.push(label);
stat = statement();
S.labels.pop();
return new AST_LabeledStatement({
body: stat,
label: label
});
}
function simple_statement(tmp) {
tmp = expression(true);
semicolon();
return new AST_SimpleStatement({
body: tmp
});
}
function break_cont(type) {
var label;
label = null;
if (!can_insert_semicolon()) {
label = as_symbol(AST_LabelRef, true);
}
if (label !== null) {
if (!find_if(function(l) {
return l.name === label.name;
}, S.labels)) {
croak("Undefined label " + label.name);
}
} else if (S.in_loop === 0) {
croak(type.TYPE + " not inside a loop or switch");
}
semicolon();
return new type({
label: label
});
}
function for_(list_comp) {
var tmp, iter, init;
init = null;
if (!is_("punc", ";")) {
init = expression(true, true);
if (init instanceof AST_Seq) {
tmp = [];
iter = init;
while (iter && iter.car) {
tmp.push(iter.car);
iter = iter.cdr;
}
tmp.push(iter);
init = new AST_Array({
start: init.start,
elements: tmp,
end: init.end
});
}
if (is_("operator", "in")) {
if (init instanceof AST_Var && init.definitions.length > 1) {
croak("Only one variable declaration allowed in for..in loop");
}
next();
return for_in(init, list_comp);
}
}
unexpected();
}
function for_in(init, list_comp) {
var lhs, obj;
lhs = init instanceof AST_Var ? init.definitions[0].name : null;
obj = expression(true);
BASELIB["iterable"] = true;
if (list_comp) {
return {
init: init,
name: lhs,
object: obj
};
}
return new AST_ForIn({
init: init,
name: lhs,
object: obj,
body: in_loop(statement)
});
}
function for_js() {
var condition;
condition = expression(true, true);
return new AST_ForJS({
condition: condition,
body: in_loop(statement)
});
}
function scan_for_classes(body) {
var classes, stmt, i;
classes = new ModuleTreeNode();
for (i in body) {
stmt = body[i];
if (stmt instanceof AST_Class) {
classes[stmt.name.name] = {
"static": stmt.static,
bound: stmt.bound
};
} else if (stmt instanceof AST_Module) {
classes[stmt.name.name] = scan_for_classes(stmt.body);
}
}
return classes;
}
function get_class_in_scope(expr) {
var s, referenced_path, current_scope, traversed_path, visible_scope;
if (expr instanceof AST_SymbolRef) {
if (NATIVE_CLASSES.hasOwnProperty(expr.name)) {
return NATIVE_CLASSES[expr.name];
}
for (s = S.classes.length - 1; s > -1; s-=1) {
if (S.classes[s].hasOwnProperty(expr.name)) {
return S.classes[s][expr.name];
}
}
} else if (expr instanceof AST_Dot) {
referenced_path = [];
while (expr instanceof AST_Dot) {
referenced_path.unshift(expr.property);
expr = expr.expression;
}
if (expr instanceof AST_SymbolRef) {
referenced_path.unshift(expr.name);
current_scope = S.module_stack.slice();
current_scope.unshift("");
while (current_scope.length) {
visible_scope = S.module_tree;
current_scope.forEach(function(module__) {
if (_$rapyd$_in(module__, visible_scope)) {
visible_scope = visible_scope[module__];
}
});
traversed_path = referenced_path.slice();
while (traversed_path && visible_scope[traversed_path[0]]) {
visible_scope = visible_scope[traversed_path[0]];
traversed_path.shift();
}
if (!traversed_path.length) {
if (!(visible_scope instanceof ModuleTreeNode)) {
return visible_scope;
} else {
return false;
}
}
current_scope.pop();
}
}
}
return false;
}
import_ = function() {
var name, tmp, file, contents;
tmp = name = expression(false);
file = ".pyj";
while (tmp instanceof AST_Dot) {
file = "/" + tmp.property + file;
tmp = tmp.expression;
}
file = tmp.name + file;
contents = null;
try {
contents = parse(options.readfile(options.basedir + "/" + file, "utf-8"), {
filename: file,
toplevel: contents,
readfile: options.readfile,
basedir: options.basedir,
libdir: options.libdir
});
} catch (_$rapyd$_Exception) {
var e = _$rapyd$_Exception;
if (!e.message.search("no such file or directory")) {
throw _$rapyd$_Exception;
}
try {
contents = parse(options.readfile(options.libdir + "/" + file, "utf-8"), {
filename: file,
toplevel: contents,
readfile: options.readfile,
basedir: options.libdir,
libdir: options.libdir
});
} catch (_$rapyd$_Exception) {
var e = _$rapyd$_Exception;
if (e.message.search("no such file or directory")) {
throw "Failed Import: '" + tmp.name + "' module doesn't exist in either '" + options.basedir + "' or '" + options.libdir + "'";
} else {
throw _$rapyd$_Exception;
}
}
}
return new AST_Import({
"module": name,
argnames: null,
body: contents,
variables: function() {
return scan_for_local_vars(contents, true).filter(function(element, index, arr) {
return arr.lastIndexOf(element) === index;
});
}.call(this)
});
};
from_import_ = function() {
var name, file, contents;
name = expression(false);
file = ".pyj";
while (name instanceof AST_Dot) {
file = "/" + name.property + file;
name = name.expression;
}
file = name.name + file;
expect_token("keyword", "import");
contents = null;
try {
contents = parse(options.readfile(options.basedir + "/" + file, "utf-8"), {
filename: file,
toplevel: contents,
readfile: options.readfile,
basedir: options.basedir,
libdir: options.libdir
});
} catch (_$rapyd$_Exception) {
contents = parse(options.readfile(options.libdir + "/" + file, "utf-8"), {
filename: file,
toplevel: contents,
readfile: options.readfile,
basedir: options.libdir,
libdir: options.libdir
});
}
return new AST_Import({
"module": name,
argnames: function(a) {
a.push(as_symbol(AST_SymbolVar));
while (is_("punc", ",")) {
next();
a.push(as_symbol(AST_SymbolVar));
}
return a;
}.call(this, []),
body: contents
});
};
ModuleTreeNode = function() {
};
module_ = function(use_name) {
var name, externaldecorator, definition;
name = use_name ? use_name : as_symbol(AST_SymbolDefun);
if (!name) {
unexpected();
}
externaldecorator = S.decorators.indexOf("external");
if (externaldecorator !== -1) {
S.decorators.splice(externaldecorator, 1);
}
definition = new AST_Module({
name: name,
body: function() {
var module_tree, a;
module_tree = S.module_tree;
S.module_stack.forEach(function(module__) {
module_tree = module_tree[module__];
});
module_tree[name.name] = new ModuleTreeNode();
S.module_stack.push(name.name);
a = block_();
S.module_stack.pop();
return a;
}.call(this),
external: externaldecorator !== -1,
decorators: function() {
var d;
d = [];
S.decorators.forEach(function(decorator) {
d.push(new AST_Decorator({
name: decorator
}));
});
S.decorators = [];
return d;
}.call(this),
variables: [],
localvars: []
});
definition.variables = scan_for_local_vars(definition.body, true).filter(function(element, index, arr) {
return arr.lastIndexOf(element) === index;
});
definition.localvars = scan_for_local_vars(definition.body, false).filter(function(element, index, arr) {
return arr.lastIndexOf(element) === index;
}).map(function(element) {
return new_symbol(AST_SymbolVar, element);
});
return definition;
};
class_ = function() {
var name, externaldecorator, class_details, definition, stmt, i;
name = as_symbol(AST_SymbolDefun);
if (!name) {
unexpected();
}
externaldecorator = S.decorators.indexOf("external");
if (externaldecorator !== -1) {
S.decorators.splice(externaldecorator, 1);
}
class_details = {
"static": [],
bound: {}
};
definition = new AST_Class({
name: name,
parent: function() {
var a;
if (is_("punc", "(")) {
next();
a = expr_atom(false);
expect(")");
return a;
} else {
return null;
}
}.call(this),
modules: S.module_stack.slice(),
localvars: [],
"static": class_details.static,
external: externaldecorator !== -1,
bound: class_details.bound,
decorators: function() {
var d;
d = [];
S.decorators.forEach(function(decorator) {
d.push(new AST_Decorator({
name: decorator
}));
});
S.decorators = [];
return d;
}.call(this),
body: function(loop, labels) {
var module_tree, a;
module_tree = S.module_tree;
S.module_stack.forEach(function(module__) {
module_tree = module_tree[module__];
});
module_tree[name.name] = class_details;
S.in_class.push(name.name);
S.classes[S.classes.length - 1][name.name] = class_details;
S.classes.push({});
S.in_function += 1;
S.in_directives = true;
S.in_loop = 0;
S.labels = [];
a = block_();
S.in_function -= 1;
S.classes.pop();
S.in_class.pop();
S.in_loop = loop;
S.labels = labels;
return a;
}.call(this, S.in_loop, S.labels)
});
for (i in definition.body) {
stmt = definition.body[i];
if (stmt instanceof AST_Method && stmt.name.name === "__init__") {
definition.init = stmt;
break;
}
}
return definition;
};
function_ = function(in_class, ctor) {
var is_accessor, name, staticloc, staticmethod, definition, assignments, j, i, nonlocals;
is_accessor = ctor === AST_Accessor;
name = is_("name") ? as_symbol(in_class ? AST_SymbolDefun : is_accessor ? AST_SymbolAccessor : AST_SymbolLambda) : is_accessor && (is_("string") || is_("num")) ? as_atom_node() : null;
if (in_class && !name) {
unexpected();
}
staticmethod = false;
if (in_class) {
staticloc = S.decorators.indexOf("staticmethod");
if (staticloc !== -1) {
S.decorators.splice(staticloc, 1);
S.classes[S.classes.length - 2][in_class].static.push(name.name);
staticmethod = true;
} else if (name.name !== "__init__" && options.auto_bind) {
BASELIB["bind"] = true;
S.classes[S.classes.length - 2][in_class].bound[name.name] = true;
}
}
expect("(");
if (!ctor) {
ctor = in_class ? AST_Method : AST_Function;
}
definition = new ctor({
name: name,
argnames: function(a) {
var defaults, first, val;
defaults = {};
first = true;
while (!is_("punc", ")")) {
if (first) {
first = false;
} else {
expect(",");
}
if (a.starargs) {
token_error(prev(), "Can't define multiple *args in function definition");
} else if (is_("operator", "*")) {
next();
a.starargs = as_symbol(AST_SymbolFunarg);
} else {
a.push(as_symbol(AST_SymbolFunarg));
if (is_("operator", "=")) {
val = prev().value;
next();
defaults[val] = expression(false);
}
}
}
next();
a.defaults = defaults;
return a;
}.call(this, []),
localvars: [],
decorators: function() {
var d;
d = [];
S.decorators.forEach(function(decorator) {
d.push(new AST_Decorator({
name: decorator
}));
});
S.decorators = [];
return d;
}.call(this),
body: function(loop, labels) {
var a;
S.in_class.push(false);
S.classes.push({});
S.in_function += 1;
S.in_directives = true;
S.in_loop = 0;
S.labels = [];
a = block_();
S.in_function -= 1;
S.classes.pop();
S.in_class.pop();
S.in_loop = loop;
S.labels = labels;
return a;
}.call(this, S.in_loop, S.labels)
});
if (definition instanceof AST_Method) {
definition.static = staticmethod;
}
assignments = scan_for_local_vars(definition.body, false).filter(function(element, index, arr) {
return arr.lastIndexOf(element) === index;
});
for (i = 0; i < assignments.length; i++) {
for (j = 0; j < definition.argnames.length + 1; j++) {
if (j === definition.argnames.length) {
definition.localvars.push(new_symbol(AST_SymbolVar, assignments[i]));
} else if (j < definition.argnames.length && assignments[i] === definition.argnames[j].name) {
break;
}
}
}
nonlocals = scan_for_nonlocal_defs(definition.body);
nonlocals.forEach(function(variable) {
var i;
var _$rapyd$_Iter0 = _$rapyd$_Iterable(dir(definition.localvars).reverse());
for (var _$rapyd$_Index0 = 0; _$rapyd$_Index0 < _$rapyd$_Iter0.length; _$rapyd$_Index0++) {
i = _$rapyd$_Iter0[_$rapyd$_Index0];
if (definition.localvars[i].name === variable) {
definition.localvars.splice(i, 1);
}
}
});
return definition;
};
function if_() {
var cond, body, belse;
cond = expression(true);
body = statement();
belse = null;
if (is_("keyword", "elif") || is_("keyword", "else")) {
if (is_("keyword", "else")) {
next();
} else {
S.token.value = "if";
}
belse = statement();
}
return new AST_If({
condition: cond,
body: body,
alternative: belse
});
}
function block_() {
var a;
expect(":");
a = [];
if (!S.token.nlb) {
while (!S.token.nlb) {
if (is_("eof")) {
unexpected();
}
a.push(statement());
}
} else {
while (!is_("punc", "}")) {
if (is_("eof")) {
return a;
}
a.push(statement());
}
next();
}
return a;
}
function switch_body_() {
var a, cur, branch;
expect("{");
a = [];
cur = null;
branch = null;
while (!is_("punc", "}")) {
if (is_("eof")) {
unexpected();
}
if (is_("keyword", "case")) {
if (branch) {
branch.end = prev();
}
cur = [];
branch = new AST_Case({
start: tmp = [S.token, next(), tmp],
expression: expression(true),
body: cur
});
a.push(branch);
expect(":");
} else if (is_("keyword", "default")) {
if (branch) {
branch.end = prev();
}
cur = [];
branch = new AST_Default({
start: tmp = [S.token, next(), expect(":"), tmp],
body: cur
});
a.push(branch);
} else {
if (!cur) {
unexpected();
}
cur.push(statement());
}
}
if (branch) {
branch.end = prev();
}
next();
return a;
}
function try_() {
var body, bcatch, exceptions, name, start, bfinally;
body = block_();
bcatch = [];
bfinally = null;
while (is_("keyword", "except")) {
start = S.token;
next();
exceptions = [];
if (!is_("punc", ":") && !is_("keyword", "as")) {
exceptions.push(as_symbol(AST_SymbolVar));
while (is_("punc", ",")) {
next();
exceptions.push(as_symbol(AST_SymbolVar));
}
}
name = null;
if (is_("keyword", "as")) {
next();
name = as_symbol(AST_SymbolCatch);
}
bcatch.push(new AST_Except({
start: start,
argname: name,
errors: exceptions,
body: block_(),
end: prev()
}));
}
if (is_("keyword", "finally")) {
start = S.token;
next();
bfinally = new AST_Finally({
start: start,
body: block_(),
end: prev()
});
}
if (!bcatch.length && !bfinally) {
croak("Missing except/finally blocks");
}
return new AST_Try({
body: body,
bcatch: bcatch.length ? new AST_Catch({
body: bcatch
}) : null,
bfinally: bfinally
});
}
function vardefs(no_in, in_const) {
var a;
a = [];
while (true) {
a.push(new AST_VarDef({
start: S.token,
name: as_symbol(in_const ? AST_SymbolConst : AST_SymbolVar),
value: is_("operator", "=") ? (next(), expression(false, no_in)) : null,
end: prev()
}));
if (!is_("punc", ",")) {
break;
}
next();
}
return a;
}
function new_vardefs(no_in, in_const) {
var a;
a = [];
while (true) {
a.push(new AST_VarDef({
start: S.token,
name: new_symbol(in_const ? AST_SymbolConst : AST_SymbolVar),
value: is_("operator", "=") ? (next(), expression(false, no_in)) : null,
end: prev()
}));
if (!is_("punc", ",")) {
break;
}
next();
}
return a;
}
nonlocal_ = function(no_in) {
return new AST_Var({
start: prev(),
definitions: vardefs(no_in, false),
end: prev()
});
};
const_ = function() {
return new AST_Const({
start: prev(),
definitions: vardefs(false, true),
end: prev()
});
};
new_ = function() {
var start, newexp, args;
start = S.token;
expect_token("operator", "new");
newexp = expr_atom(false);
if (is_("punc", "(")) {
next();
args = expr_list(")");
} else {
args = [];
}
return subscripts(new AST_New({
start: start,
expression: newexp,
args: args,
end: prev()
}), true);
};
function as_atom_node() {
var tok, tmp_, tmp__, ret;
tok = S.token;
tmp_ = tok.type;
if (tmp_ === "name") {
return as_symbol(AST_SymbolRef);
} else if (tmp_ === "num") {
ret = new AST_Number({
start: tok,
end: tok,
value: tok.value
});
} else if (tmp_ === "string") {
ret = new AST_String({
start: tok,
end: tok,
value: tok.value
});
} else if (tmp_ === "regexp") {
ret = new AST_RegExp({
start: tok,
end: tok,
value: tok.value
});
} else if (tmp_ === "atom") {
tmp__ = tok.value;
if (tmp__ === "False") {
ret = new AST_False({
start: tok,
end: tok
});
} else if (tmp__ === "True") {
ret = new AST_True({
start: tok,
end: tok
});
} else if (tmp__ === "None") {
ret = new AST_Null({
start: tok,
end: tok
});
}
}
next();
return ret;
}
expr_atom = function(allow_calls) {
var start, tmp_, ex, cls, func;
if (is_("operator", "new")) {
return new_();
}
start = S.token;
if (is_("punc")) {
tmp_ = start.value;
if (tmp_ === "(") {
next();
ex = expression(true);
ex.start = start;
ex.end = S.token;
if (ex instanceof AST_SymbolRef) {
ex.parens = true;
}
expect(")");
return subscripts(ex, allow_calls);
} else if (tmp_ === "[") {
return subscripts(array_(), allow_calls);
} else if (tmp_ === "{") {
return subscripts(object_(), allow_calls);
}
unexpected();
}
if (is_("keyword", "class")) {
next();
cls = class_();
cls.start = start;
cls.end = prev();
return subscripts(cls, allow_calls);
}
if (is_("keyword", "def")) {
next();
func = function_(false);
func.start = start;
func.end = prev();
return subscripts(func, allow_calls);
}
if (ATOMIC_START_TOKEN[S.token.type]) {
return subscripts(as_atom_node(), allow_calls);
}
unexpected();
};
function expr_list(closing, allow_trailing_comma, allow_empty, func_call) {
var first, saw_starargs, tmp, _$rapyd$_Unpack, i, arg, a;
first = true;
a = [];
saw_starargs = false;
while (!is_("punc", closing)) {
if (saw_starargs) {
token_error(prev(), "*args must be the last argument in a function call");
}
if (first) {
first = false;
} else {
expect(",");
}
if (allow_trailing_comma && is_("punc", closing)) {
break;
}
if (is_("operator", "*") && func_call) {
saw_starargs = true;
next();
}
if (is_("punc", ",") && allow_empty) {
a.push(new AST_Hole({
start: S.token,
end: S.token
}));
} else {
a.push(expression(false));
}
}
if (func_call) {
tmp = [];
tmp.kwargs = [];
var _$rapyd$_Iter1 = _$rapyd$_Iterable(enumerate(a));
for (var _$rapyd$_Index1 = 0; _$rapyd$_Index1 < _$rapyd$_Iter1.length; _$rapyd$_Index1++) {
_$rapyd$_Unpack = _$rapyd$_Iter1[_$rapyd$_Index1];
i = _$rapyd$_Unpack[0];
arg = _$rapyd$_Unpack[1];
if (arg instanceof AST_Assign) {
tmp.kwargs.push([ arg.left, arg.right ]);
} else {
tmp.push(arg);
}
}
a = tmp;
}
next();
if (saw_starargs) {
a.starargs = true;
}
return a;
}
function func_call_list() {
return expr_list(")", false, false, true);
}
array_ = embed_tokens(function() {
var expr, forloop, ret;
expect("[");
expr = [];
if (!is_("punc", "]")) {
expr.push(expression(false));
if (is_("keyword", "for")) {
next();
forloop = for_(true);
BASELIB["iterable"] = true;
ret = new AST_ListComprehension({
statement: expr[0],
init: forloop.init,
name: forloop.name,
object: forloop.object,
condition: is_("punc", "]") ? null : (expect_token("keyword", "if"), expression(true))
});
expect("]");
return ret;
}
if (is_("operator", "til")) {
BASELIB["range"] = true;
next();
expr.push(expression(false));
ret = subscripts(new AST_Call({
start: S.token,
expression: new AST_SymbolRef({
name: "range"
}),
args: expr,
end: prev()
}), true);
expect("]");
return ret;
} else if (is_("operator", "to")) {
BASELIB["range"] = true;
next();
expr.push(new AST_Binary({
left: expression(false),
operator: "+",
right: new AST_Number({
value: 1e-6
})
}));
ret = subscripts(new AST_Call({
start: S.token,
expression: new AST_SymbolRef({
name: "range"
}),
args: expr,
end: prev()
}), true);
expect("]");
return ret;
} else if (!is_("punc", "]")) {
expect(",");
}
}
return new AST_Array({
elements: expr.concat(expr_list("]", !options.strict, true))
});
});
object_ = embed_tokens(function() {
var a, first, start, type, key, name, quoted;
expect("{");
first = true;
a = [];
while (!is_("punc", "}")) {
if (first) {
first = false;
} else {
expect(",");
}
if (!options.strict && is_("punc", "}")) {
break;
}
start = S.token;
type = start.type;
key = as_property_name();
name = key.value;
quoted = key.type === "string" ? true : false;
if (type === "name" && !is_("punc", ":")) {
if (name === "get") {
a.push(new AST_ObjectGetter({
start: start,
key: name,
quoted: quoted,
value: function_(false, AST_Accessor),
end: prev()
}));
continue;
}
if (name === "set") {
a.push(new AST_ObjectSetter({
start: start,
key: name,
quoted: quoted,
value: function_(false, AST_Accessor),
end: prev()
}));
continue;
}
}
expect(":");
a.push(new AST_ObjectKeyVal({
start: start,
key: name,
quoted: quoted,
value: expression(false),
end: prev()
}));
}
next();
return new AST_Object({
properties: a
});
});
function as_property_name() {
var tmp, tmp_;
tmp = S.token;
next();
tmp_ = tmp.type;
if (tmp_ === "num" || tmp_ === "string" || tmp_ === "name" || tmp_ === "operator" || tmp_ === "keyword" || tmp_ === "atom") {
return tmp;
} else {
unexpected();
}
}
function as_name() {
var tmp, tmp_;
tmp = S.token;
next();
tmp_ = tmp.type;
if (tmp_ === "name" || tmp_ === "operator" || tmp_ === "keyword" || tmp_ === "atom") {
return tmp.value;
} else {
unexpected();
}
}
function as_symbol(type, noerror) {
var name, sym;
if (!is_("name")) {
if (!noerror) {
croak("Name expected");
}
return null;
}
name = S.token.value;
sym = new (name === "this" ? AST_This : type)({
name: String(S.token.value),
start: S.token,
end: S.token
});
next();
return sym;
}
function new_symbol(type, name) {
var sym;
sym = new (name === "this" ? AST_This : type)({
name: String(name),
start: null,
end: null
});
return sym;
}
function is_static_method(cls, method) {
if (COMMON_STATIC.indexOf(method) !== -1 || cls.static && cls.static.indexOf(method) !== -1) {
return true;
} else {
return false;
}
}
subscripts = function(expr, allow_calls) {
var start, is_slice, slice_bounds, str_, ret, c, funcname, tmp_, args;
start = expr.start;
if (is_("punc", ".")) {
next();
return subscripts(new AST_Dot({
start: start,
expression: expr,
property: as_name(),
end: prev()
}), allow_calls);
}
if (is_("punc", "[") && !S.token.nlb) {
next();
slice_bounds = [];
is_slice = false;
if (is_("punc", ":")) {
slice_bounds.push(null);
} else {
slice_bounds.push(expression(false));
}
if (is_("punc", ":")) {
is_slice = true;
next();
if (is_("punc", ":")) {
slice_bounds.push(null);
} else if (!is_("punc", "]")) {
slice_bounds.push(expression(false));
}
}
if (is_("punc", ":")) {
BASELIB["eslice"] = true;
next();
if (is_("punc", "]")) {
unexpected();
} else {
slice_bounds.push(expression(false));
}
}
expect("]");
if (is_slice) {
if (is_("operator") && S.token.value === "=") {
next();
return subscripts(new AST_Splice({
start: start,
expression: expr,
property: slice_bounds[0] || new AST_Number({
value: 0
}),
property2: slice_bounds[1],
assignment: expression(true),
end: prev()
}), allow_calls);
} else if (slice_bounds.length === 3) {
slice_bounds.unshift(slice_bounds.pop());
if (!slice_bounds[slice_bounds.length-1]) {
slice_bounds.pop();
if (!slice_bounds[slice_bounds.length-1]) {
slice_bounds.pop();
}
} else if (!slice_bounds[slice_bounds.length-2]) {
slice_bounds[slice_bounds.length-2] = new AST_Undefined();
}
return subscripts(new AST_Call({
start: start,
expression: new AST_SymbolRef({
name: "eslice"
}),
args: [ expr ].concat(slice_bounds),
end: prev()
}), allow_calls);
} else {
slice_bounds = (function() {
var _$rapyd$_Iter = _$rapyd$_Iterable(slice_bounds), _$rapyd$_Result = [], i;
for (var _$rapyd$_Index = 0; _$rapyd$_Index < _$rapyd$_Iter.length; _$rapyd$_Index++) {
i = _$rapyd$_Iter[_$rapyd$_Index];
_$rapyd$_Result.push(i === null ? new AST_Number({
value: 0
}) : i);
}
return _$rapyd$_Result;
})();
return subscripts(new AST_Call({
start: start,
expression: new AST_Dot({
start: start,
expression: expr,
property: "slice",
end: prev()
}),
args: slice_bounds,
end: prev()
}), allow_calls);
}
} else {
return subscripts(new AST_Sub({
start: start,
expression: expr,
property: slice_bounds[0] || new AST_Number({
value: 0
}),
end: prev()
}), allow_calls);
}
}
if (allow_calls && is_("punc", "(") && !S.token.nlb) {
next();
if (expr instanceof AST_SymbolRef && expr.name === "JS") {
str_ = expression(false);
if (!(str_ instanceof AST_String)) {
token_error(prev(), "Compile-time function JS() can't process variables or expressions");
}
ret = new AST_Verbatim({
start: start,
value: str_.value,
end: prev()
});
expect(")");
return subscripts(ret, true);
} else if (!expr.parens && get_class_in_scope(expr)) {
return subscripts(new AST_New({
start: start,
expression: expr,
args: func_call_list(),
end: prev()
}), true);
} else {
if (expr instanceof AST_Dot) {
c = get_class_in_scope(expr.expression);
}
if (c) {
funcname = expr;
if (funcname.property === "__init__") {
funcname.property = "constructor";
}
return subscripts(new AST_ClassCall({
start: start,
"class": expr.expression,
method: funcname.property,
"static": is_static_method(c, funcname.property),
args: func_call_list(),
end: prev()
}), true);
} else if (expr instanceof AST_SymbolRef) {
tmp_ = expr.name;
if (tmp_ === "abs" || tmp_ === "bind" || tmp_ === "rebind_all" || tmp_ === "dir" || tmp_ === "enumerate" || tmp_ === "len" || tmp_ === "mixin" || tmp_ === "print" || tmp_ === "range" || tmp_ === "reversed" || tmp_ === "sum" || tmp_ === "getattr" || tmp_ === "setattr" || tmp_ === "hasattr") {
BASELIB[expr.name] = true;
} else if (tmp_ === "type") {
return new AST_UnaryPrefix({
start: start,
operator: "typeof",
expression: func_call_list()[0],
end: prev()
});
} else if (tmp_ === "isinstance") {
args = func_call_list();
return new AST_Binary({
start: start,
operator: "instanceof",
left: args[0],
right: args[1],
end: prev()
});
}
}
return subscripts(new AST_Call({
start: start,
expression: expr,
args: func_call_list(),
end: prev()
}), true);
}
}
return expr;
};
maybe_unary = function(allow_calls) {
var start, ex, val;
start = S.token;
if (is_("operator") && UNARY_PREFIX(start.value)) {
next();
if (start.value === "@") {
if (is_("name") && (peek().value === "@" || peek().value === "def" || peek().value === "class" || peek().value === "module")) {
S.decorators.push(S.token.value);
next();
return new AST_EmptyStatement();
} else {
unexpected();
}
}
ex = make_unary(AST_UnaryPrefix, start.value, maybe_unary(allow_calls));
ex.start = start;
ex.end = prev();
return ex;
}
val = expr_atom(allow_calls);
while (is_("operator") && UNARY_POSTFIX(S.token.value) && !S.token.nlb) {
val = make_unary(AST_UnaryPostfix, S.token.value, val);
val.start = start;
val.end = S.token;
next();
}
return val;
};
function make_unary(ctor, op, expr) {
return new ctor({
operator: op,
expression: expr
});
}
expr_op = function(left, min_prec, no_in) {
var not_in, op, prec, right, ret;
op = is_("operator") ? S.token.value : null;
not_in = false;
if (op === "!" && peek().type === "operator" && peek().value === "in") {
next();
op = "in";
not_in = true;
}
if (op === "in") {
if (no_in) {
op = null;
} else {
BASELIB[op] = true;
}
}
prec = op !== null ? PRECEDENCE[op] : null;
if (prec !== null && prec > min_prec) {
next();
right = expr_op(maybe_unary(true), prec, no_in);
ret = new AST_Binary({
start: left.start,
left: left,
operator: op,
right: right,
end: right.end
});
if (not_in) {
ret = new AST_UnaryPrefix({
start: left.start,
operator: "!",
expression: ret,
end: right.end
});
}
return expr_op(ret, min_prec, no_in);
}
return left;
};
function expr_ops(no_in) {
return expr_op(maybe_unary(true), 0, no_in);
}
maybe_conditional = function(no_in) {
var start, expr, yes;
start = S.token;
expr = expr_ops(no_in);
if (is_("operator", "?")) {
next();
yes = expression(false);
expect(":");
return new AST_Conditional({
start: start,
condition: expr,
consequent: yes,
alternative: expression(false, no_in),
end: peek()
});
}
return expr;
};
function is_assignable(expr) {
var tmp_;
if (!options.strict) {
return true;
}
tmp_ = expr[0] + "";
if (tmp_ === "dot" || tmp_ === "sub" || tmp_ === "new" || tmp_ === "call") {
return true;
} else if (tmp_ === "name") {
return expr[1] !== "this";
}
}
maybe_assign = function(no_in) {
var start, left, val;
start = S.token;
left = maybe_conditional(no_in);
val = S.token.value;
if (is_("operator") && ASSIGNMENT(val)) {
if (is_assignable(left)) {
next();
return new AST_Assign({
start: start,
left: left,
operator: val,
right: maybe_assign(no_in),
end: prev()
});
}
croak("Invalid assignment");
}
return left;
};
expression = function(commas, no_in) {
var start, left, right, expr;
start = S.token;
expr = maybe_assign(no_in);
if (commas) {
left = [ expr ];
right = [];
while (is_("punc", ",") && !peek().nlb) {
next();
if (expr instanceof AST_Assign) {
left[left.length - 1] = left.slice(-1)[0].left;
return new AST_Assign({
start: start,
left: left.length === 1 ? left[0] : new AST_Array({
elements: left
}),
operator: expr.operator,
right: new AST_Seq({
car: expr.right,
cdr: expression(true, no_in)
}),
end: peek()
});
}
expr = maybe_assign(no_in);
left.push(expr);
}
if (left.length > 1 && left.slice(-1)[0] instanceof AST_Assign) {
left[left.length - 1] = left.slice(-1)[0].left;
return new AST_Assign({
start: start,
left: new AST_Array({
elements: left
}),
operator: expr.operator,
right: expr.right,
end: peek()
});
}
return function build_seq(a) {
if (a.length === 1) {
return a[0];
}
return new AST_Seq({
start: start,
car: a.shift(),
cdr: build_seq(a),
end: peek()
});
}.call(this, left);
}
return expr;
};
function in_loop(cont) {
var ret;
S.in_loop += 1;
ret = cont();
S.in_loop -= 1;
return ret;
}
return function() {
var start, body, element, shebang, first_token, end, toplevel, assignments;
start = S.token;
body = [];
first_token = true;
while (!is_("eof")) {
element = statement();
if (first_token && element instanceof AST_Directive && element.value.indexOf("#!") === 0) {
shebang = element.value;
} else {
body.push(element);
}
first_token = false;
}
end = prev();
toplevel = options.toplevel;
if (toplevel) {
toplevel.body = toplevel.body.concat(body);
toplevel.end = end;
} else {
toplevel = new AST_Toplevel({
start: start,
body: body,
strict: function() {
var stmt;
var _$rapyd$_Iter2 = _$rapyd$_Iterable(body);
for (var _$rapyd$_Index2 = 0; _$rapyd$_Index2 < _$rapyd$_Iter2.length; _$rapyd$_Index2++) {
stmt = _$rapyd$_Iter2[_$rapyd$_Index2];
if (stmt instanceof AST_Directive && stmt.value === "use strict") {
return true;
}
}
return false;
}.call(this),
shebang: shebang,
end: end
});
}
assignments = scan_for_local_vars(toplevel.body, false).filter(function(element, index, arr) {
return arr.lastIndexOf(element) === index;
});
toplevel.localvars = [];
assignments.forEach(function(item) {
toplevel.localvars.push(new_symbol(AST_SymbolVar, item));
});
toplevel.imports = IMPORTED;
toplevel.baselib = BASELIB;
return toplevel;
}.call(this);
}
"\n**********************************************************************\n\n A RapydScript to JavaScript compiler.\n https://github.com/atsepkov/RapydScript2\n\n -------------------------------- (C) ---------------------------------\n\n Author: Alexander Tsepkov\n <atsepkov@pyjeon.com>\n http://www.pyjeon.com\n\n Distributed under Apache 2.0 license:\n Copyright 2013 (c) Alexander Tsepkov <atsepkov@pyjeon.com>\n\n RapydScript source code is originally based on UglifyJS2 (covered\n by BSD license). UglifyJS2 was written by Mihai Bazon\n <mihai.bazon@gmail.com>, who is its respective copyright holder.\n\n Redistribution and use in source and binary forms, with or without\n modification, are permitted provided that the following conditions\n are met:\n\n * Redistributions of source code must retain the above\n copyright notice, this list of conditions and the following\n disclaimer.\n\n * Redistributions in binary form must reproduce the above\n copyright notice, this list of conditions and the following\n disclaimer in the documentation and/or other materials\n provided with the distribution.\n\n THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDER “AS IS” AND ANY\n EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE\n IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR\n PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER BE\n LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,\n OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,\n PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR\n PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY\n THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR\n TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF\n THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF\n SUCH DAMAGE.\n\n **********************************************************************\n";
"use strict";
function OutputStream(options) {
var indentation, current_col, current_line, current_pos, OUTPUT, IMPORTED, might_need_space, might_need_semicolon, last, requireSemicolonChars, space, indent, with_indent, newline, semicolon, add_mapping, stack;
options = defaults(options, {
indent_start: 0,
indent_level: 4,
quote_keys: false,
space_colon: true,
ascii_only: false,
inline_script: false,
width: 80,
max_line_len: 32e3,
ie_proof: true,
beautify: false,
source_map: null,
bracketize: false,
semicolons: true,
comments: false,
preserve_line: false,
namespace_imports: false,
omit_baselib: false,
baselib: null,
private_scope: true,
auto_bind: false
}, true);
indentation = 0;
current_col = 0;
current_line = 1;
current_pos = 0;
OUTPUT = "";
IMPORTED = {};
function to_ascii(str_, identifier) {
return str_.replace(/[\u0080-\uffff]/g, function(ch) {
var code;
code = ch.charCodeAt(0).toString(16);
if (code.length <= 2 && !identifier) {
while (code.length < 2) {
code = "0" + code;
}
return "\\x" + code;
} else {
while (code.length < 4) {
code = "0" + code;
}
return "\\u" + code;
}
});
}
function make_string(str_) {
var dq, sq;
dq = 0;
sq = 0;
str_ = str_.replace(/[\\\b\f\n\r\t\x22\x27\u2028\u2029\0]/g, function(s) {
var tmp_, dq, sq;
tmp_ = s;
if (tmp_ === "\\") {
return "\\\\";
} else if (tmp_ === "\b") {
return "\\b";
} else if (tmp_ === "\f") {
return "\\f";
} else if (tmp_ === "\n") {
return "\\n";
} else if (tmp_ === "\t") {
return "\\t";
} else if (tmp_ === "\r") {
return "\\r";
} else if (tmp_ === "\u2028") {
return "\\u2028";
} else if (tmp_ === "\u2029") {
return "\\u2029";
} else if (tmp_ === "\"") {
dq += 1;
return "\"";
} else if (tmp_ === "'") {
sq += 1;
return "'";
} else if (tmp_ === "\0") {
return "\\0";
}
return s;
});
if (options.ascii_only) {
str_ = to_ascii(str_);
}
if (dq > sq) {
return "'" + str_.replace(/\x27/g, "\\'") + "'";
} else {
return "\"" + str_.replace(/\x22/g, "\\\"") + "\"";
}
}
function encode_string(str_) {
var ret;
ret = make_string(str_);
if (options.inline_script) {
ret = ret.replace(/<\x2fscript([>\/\t\n\f\r ])/gi, "<\\/script$1");
}
return ret;
}
function make_name(name) {
name = name.toString();
if (options.ascii_only) {
name = to_ascii(name, true);
}
return name;
}
function make_indent(back) {
return repeat_string(" ", options.indent_start + indentation - back * options.indent_level);
}
might_need_space = false;
might_need_semicolon = false;
last = null;
function last_char() {
return last.charAt(last.length - 1);
}
function maybe_newline() {
if (options.max_line_len && current_col > options.max_line_len) {
print_("\n");
}
}
requireSemicolonChars = makePredicate("( [ + * / - , .");
function print_(str_) {
var ch, target_line, prev, a, n;
str_ = String(str_);
ch = str_.charAt(0);
if (might_need_semicolon) {
if ((!ch || ";}".indexOf(ch) < 0) && !/[;]$/.test(last)) {
if (options.semicolons || requireSemicolonChars(ch)) {
OUTPUT += ";";
current_col += 1;
current_pos += 1;
} else {
OUTPUT += "\n";
current_pos += 1;
current_line += 1;
current_col = 0;
}
if (!options.beautify) {
might_need_space = false;
}
}
might_need_semicolon = false;
maybe_newline();
}
if (!options.beautify && options.preserve_line && stack[stack.length - 1]) {
target_line = stack[stack.length - 1].start.line;
while (current_line < target_line) {
OUTPUT += "\n";
current_pos += 1;
current_line += 1;
current_col = 0;
might_need_space = false;
}
}
if (might_need_space) {
prev = last_char();
if (is_identifier_char(prev) && (is_identifier_char(ch) || ch === "\\") || /^[\+\-\/]$/.test(ch) && ch === prev) {
OUTPUT += " ";
current_col += 1;
current_pos += 1;
}
might_need_space = false;
}
a = str_.split(/\r?\n/);
n = a.length - 1;
current_line += n;
if (n === 0) {
current_col += a[n].length;
} else {
current_col = a[n].length;
}
current_pos += str_.length;
last = str_;
OUTPUT += str_;
}
space = options.beautify ? function() {
print_(" ");
} : function() {
might_need_space = true;
};
indent = options.beautify ? function(half) {
if (options.beautify) {
print_(make_indent(half ? .5 : 0));
}
} : noop;
with_indent = options.beautify ? function(col, cont) {
var save_indentation, ret;
if (col === true) {
col = next_indent();
}
save_indentation = indentation;
indentation = col;
ret = cont();
indentation = save_indentation;
return ret;
} : function(col, cont) {
return cont();
};
newline = options.beautify ? function() {
print_("\n");
} : noop;
semicolon = options.beautify ? function() {
print_(";");
} : function() {
might_need_semicolon = true;
};
function force_semicolon() {
might_need_semicolon = false;
print_(";");
}
function next_indent() {
return indentation + options.indent_level;
}
function with_block(cont) {
var ret;
ret = null;
print_("{");
newline();
with_indent(next_indent(), function() {
ret = cont();
});
indent();
print_("}");
return ret;
}
function with_parens(cont) {
var ret;
print_("(");
ret = cont();
print_(")");
return ret;
}
function with_square(cont) {
var ret;
print_("[");
ret = cont();
print_("]");
return ret;
}
function comma() {
print_(",");
space();
}
function colon() {
print_(":");
if (options.space_colon) {
space();
}
}
add_mapping = options.source_map ? function(token, name) {
try {
if (token) {
options.source_map.add(token.file || "?", current_line, current_col, token.line, token.col, !name && token.type === "name" ? token.value : name);
}
} catch (_$rapyd$_Exception) {
var ex = _$rapyd$_Exception;
AST_Node.warn("Couldn't figure out mapping for {file}:{line},{col} → {cline},{ccol} [{name}]", {
file: token.file,
line: token.line,
col: token.col,
cline: current_line,
ccol: current_col,
name: name || ""
});
}
} : noop;
function dump_baselib(key) {
indent();
print_(options.baselib[key]);
newline();
}
function prologue(module_) {
var lib;
if (!options.omit_baselib) {
var _$rapyd$_Iter0 = _$rapyd$_Iterable(module_.baselib);
for (var _$rapyd$_Index0 = 0; _$rapyd$_Index0 < _$rapyd$_Iter0.length; _$rapyd$_Index0++) {
lib = _$rapyd$_Iter0[_$rapyd$_Index0];
dump_baselib(lib);
}
}
}
function get() {
return OUTPUT;
}
function assign_var(name) {
if (typeof name === "string") {
print_(name);
} else {
name.print(this);
}
space();
print_("=");
space();
}
stack = [];
return {
get: get,
toString: get,
indent: indent,
indentation: function() {
return indentation;
},
current_width: function() {
return current_col - indentation;
},
should_break: function() {
return options.width && this.current_width() >= options.width;
},
newline: newline,
print: print_,
space: space,
comma: comma,
colon: colon,
last: function() {
return last;
},
semicolon: semicolon,
force_semicolon: force_semicolon,
to_ascii: to_ascii,
print_name: function(name) {
print_(make_name(name));
},
print_string: function(str_) {
print_(encode_string(str_));
},
next_indent: next_indent,
with_indent: with_indent,
with_block: with_block,
with_parens: with_parens,
with_square: with_square,
add_mapping: add_mapping,
assign: assign_var,
prologue: prologue,
"import": function(module_) {
var key, should_import;
key = "";
while (module_ instanceof AST_Dot) {
key = "." + module_.property + key;
module_ = module_.expression;
}
key = module_.name + key;
should_import = !IMPORTED[key];
IMPORTED[key] = true;
return should_import;
},
is_main: function() {
return OUTPUT.length === 0;
},
option: function(opt) {
return options[opt];
},
line: function() {
return current_line;
},
col: function() {
return current_col;
},
pos: function() {
return current_pos;
},
push_node: function(node) {
stack.push(node);
},
pop_node: function() {
return stack.pop();
},
stack: function() {
return stack;
},
parent: function(n) {
return stack[stack.length - 2 - (n || 0)];
}
};
}
(function() {
var SPECIAL_METHODS, INDEX_COUNTER;
SPECIAL_METHODS = {
bind: "_$rapyd$_bind",
rebind_all: "_$rapyd$_rebindAll",
bool: "!!",
"float": "parseFloat",
"int": "parseInt",
mixin: "_$rapyd$_mixin",
print: "_$rapyd$_print",
eslice: "_$rapyd$_eslice"
};
INDEX_COUNTER = 0;
function DEFPRINT(nodetype, generator) {
nodetype.DEFMETHOD("_codegen", generator);
}
AST_Node.DEFMETHOD("print", function(stream, force_parens) {
var self, generator;
self = this;
generator = self._codegen;
stream.push_node(self);
if (force_parens || self.needs_parens(stream)) {
stream.with_parens(function() {
self.add_comments(stream);
self.add_source_map(stream);
generator(self, stream);
});
} else {
self.add_comments(stream);
self.add_source_map(stream);
generator(self, stream);
}
stream.pop_node();
});
AST_Node.DEFMETHOD("print_to_string", function(options) {
var s;
s = OutputStream(options);
this.print(s);
return s.get();
});
AST_Node.DEFMETHOD("add_comments", function(output) {
var c, self, start, comments;
c = output.option("comments");
self = this;
if (c) {
start = self.start;
if (start && !start._comments_dumped) {
start._comments_dumped = true;
comments = start.comments_before;
if (self instanceof AST_Exit && self.value && self.value.start.comments_before.length > 0) {
comments = (comments || []).concat(self.value.start.comments_before);
self.value.start.comments_before = [];
}
if (c.test) {
comments = comments.filter(function(comment) {
return c.test(comment.value);
});
} else if (typeof c === "function") {
comments = comments.filter(function(comment) {
return c(self, comment);
});
}
comments.forEach(function(c) {
if (c.type === "comment1") {
output.print("//" + c.value + "\n");
output.indent();
} else if (c.type === "comment2") {
output.print("/*" + c.value + "*/");
if (start.nlb) {
output.print("\n");
output.indent();
} else {
output.space();
}
}
});
}
}
});
function PARENS(nodetype, func) {
nodetype.DEFMETHOD("needs_parens", func);
}
PARENS(AST_Node, function() {
return false;
});
PARENS(AST_Function, function(output) {
return first_in_statement(output);
});
PARENS(AST_Object, function(output) {
return first_in_statement(output);
});
PARENS(AST_Unary, function(output) {
var p;
p = output.parent();
return p instanceof AST_PropAccess && p.expression === this;
});
PARENS(AST_Seq, function(output) {
var p;
p = output.parent();
return p instanceof AST_Unary || p instanceof AST_VarDef || p instanceof AST_Dot || p instanceof AST_ObjectProperty || p instanceof AST_Conditional;
});
PARENS(AST_Binary, function(output) {
var p, po, pp, so, sp;
p = output.parent();
if (p instanceof AST_BaseCall && p.expression === this) {
return true;
}
if (p instanceof AST_Unary) {
return true;
}
if (p instanceof AST_PropAccess && p.expression === this) {
return true;
}
if (p instanceof AST_Binary) {
po = p.operator;
pp = PRECEDENCE[po];
so = this.operator;
sp = PRECEDENCE[so];
if (pp > sp || pp === sp && this === p.right && !(so === po && (so === "*" || so === "&&" || so === "||"))) {
return true;
}
}
});
PARENS(AST_PropAccess, function(output) {
var p;
p = output.parent();
if (p instanceof AST_New && p.expression === this) {
try {
this.walk(new TreeWalker(function(node) {
if (node instanceof AST_BaseCall) {
throw p;
}
}));
} catch (_$rapyd$_Exception) {
var ex = _$rapyd$_Exception;
if (ex !== p) {
throw ex;
}
return true;
}
}
});
PARENS(AST_BaseCall, function(output) {
var p;
p = output.parent();
return p instanceof AST_New && p.expression === this;
});
PARENS(AST_New, function(output) {
var p;
p = output.parent();
if (no_constructor_parens(this, output) && (p instanceof AST_PropAccess || p instanceof AST_BaseCall && p.expression === this)) {
return true;
}
});
PARENS(AST_Number, function(output) {
var p;
p = output.parent();
if (this.getValue() < 0 && p instanceof AST_PropAccess && p.expression === this) {
return true;
}
});
PARENS(AST_NaN, function(output) {
var p;
p = output.parent();
if (p instanceof AST_PropAccess && p.expression === this) {
return true;
}
});
function assign_and_conditional_paren_rules(output) {
var p;
p = output.parent();
if (p instanceof AST_Unary) {
return true;
}
if (p instanceof AST_Binary && !(p instanceof AST_Assign)) {
return true;
}
if (p instanceof AST_BaseCall && p.expression === this) {
return true;
}
if (p instanceof AST_Conditional && p.condition === this) {
return true;
}
if (p instanceof AST_PropAccess && p.expression === this) {
return true;
}
}
PARENS(AST_Assign, assign_and_conditional_paren_rules);
PARENS(AST_Conditional, assign_and_conditional_paren_rules);
DEFPRINT(AST_Directive, function(self, output) {
output.print_string(self.value);
output.semicolon();
});
DEFPRINT(AST_Debugger, function(self, output) {
output.print("debugger");
output.semicolon();
});
function display_body(body, is_toplevel, output) {
var last;
last = body.length - 1;
body.forEach(function(stmt, i) {
if (!(stmt instanceof AST_EmptyStatement) && !(stmt instanceof AST_Definitions)) {
output.indent();
stmt.print(output);
if (!(i === last && is_toplevel)) {
output.newline();
}
}
});
}
function bind_methods(methods, output) {
var arg;
for (arg in methods) {
output.indent();
output.print("this.");
output.assign(arg);
output.print("_$rapyd$_bind");
output.with_parens(function() {
output.print("this.");
output.print(arg);
output.comma();
output.print("this");
});
output.semicolon();
output.newline();
}
}
function display_complex_body(node, is_toplevel, output) {
var offset, arg;
offset = 0;
if (node instanceof AST_Method && !node.static) {
output.indent();
output.print("var");
output.space();
output.assign(node.argnames[0]);
output.print("this");
output.semicolon();
output.newline();
offset += 1;
}
if (node instanceof AST_Scope) {
if (node.argnames) {
if (node.argnames.starargs) {
node.argnames.forEach(function(arg, i) {
if (i >= offset) {
output.indent();
output.print("var");
output.space();
output.assign(arg);
output.print("arguments");
output.with_square(function() {
output.print(i - offset);
});
output.semicolon();
output.newline();
}
});
output.indent();
output.print("var");
output.space();
output.assign(node.argnames.starargs);
output.print("[].slice.call");
output.with_parens(function() {
output.print("arguments");
output.comma();
output.print(node.argnames.length - offset);
});
output.semicolon();
output.newline();
}
for (arg in node.argnames.defaults) {
output.indent();
output.print("if");
output.space();
output.with_parens(function() {
output.print("typeof " + arg);
output.space();
output.print("===");
output.space();
output.print("\"undefined\"");
});
output.space();
output.assign(arg);
force_statement(node.argnames.defaults[arg], output);
output.semicolon();
output.newline();
}
}
if (output.option("auto_bind") && node.name && node.name.name === "__init__") {
output.indent();
output.print("_$rapyd$_rebindAll");
output.with_parens(function() {
output.print("this");
output.comma();
output.print("true");
});
output.semicolon();
output.newline();
bind_methods(node.bound, output);
}
declare_vars(node.localvars, output);
} else if (node instanceof AST_Except) {
if (node.argname) {
output.indent();
output.print("var");
output.space();
output.assign(node.argname);
output.print("_$rapyd$_Exception");
output.semicolon();
output.newline();
}
}
display_body(node.body, is_toplevel, output);
}
function declare_vars(vars, output) {
if (vars.length) {
output.indent();
output.print("var");
output.space();
vars.forEach(function(arg, i) {
if (i) {
output.comma();
}
arg.print(output);
});
output.semicolon();
output.newline();
}
}
function unpack_tuple(tuple, output, in_statement) {
tuple.elements.forEach(function(elem, i) {
output.indent();
output.assign(elem);
output.print("_$rapyd$_Unpack");
output.with_square(function() {
output.print(i);
});
if (!in_statement || i < tuple.elements.length - 1) {
output.semicolon();
output.newline();
}
});
}
AST_StatementWithBody.DEFMETHOD("_do_print_body", function(output) {
force_statement(this.body, output);
});
DEFPRINT(AST_Statement, function(self, output) {
self.body.print(output);
output.semicolon();
});
DEFPRINT(AST_Toplevel, function(self, output) {
var is_main;
is_main = output.is_main();
if (is_main && self.shebang) {
output.print(self.shebang);
output.newline();
}
if (output.option("private_scope") && is_main) {
output.with_parens(function() {
output.print("function()");
output.with_block(function() {
output.indent();
output.print("\"use strict\"");
output.semicolon();
output.newline();
output.indent();
output.print("var _$rapyd$_Temp");
output.semicolon();
output.newline();
output.prologue(self);
display_complex_body(self, true, output);
output.newline();
});
});
output.print("();");
output.print("");
} else {
if (is_main) {
output.prologue(self);
}
if (self.strict) {
declare_vars(self.localvars, output);
}
display_body(self.body, true, output);
}
});
function print_module(self, variables, output) {
function print_var(name) {
if (typeof name === "string") {
output.print(name);
} else {
name.print(output);
}
}
output.with_parens(function() {
output.print("function()");
output.with_block(function() {
display_complex_body(self, false, output);
output.indent();
output.print("return");
output.space();
output.with_block(function() {
variables.forEach(function(arg, i) {
output.indent();
print_var(arg);
output.print(":");
output.space();
print_var(arg);
if (i < variables.length - 1) {
output.comma();
}
output.newline();
});
});
output.semicolon();
output.newline();
});
});
output.print("()");
}
DEFPRINT(AST_Import, function(self, output) {
if (output.import(self.module)) {
if (!output.option("namespace_imports")) {
self.body.print(output);
} else {
output.print("var");
output.space();
output.assign(self.module);
print_module(self.body, self.variables, output);
output.semicolon();
output.newline();
}
}
if (output.option("namespace_imports") && self.argnames) {
self.variables.forEach(function(arg) {
output.print("var");
output.space();
output.assign(arg);
self.module.print(output);
output.print(".");
arg.print(output);
output.semicolon();
output.newline();
});
}
});
DEFPRINT(AST_LabeledStatement, function(self, output) {
self.label.print(output);
output.colon();
self.body.print(output);
});
DEFPRINT(AST_SimpleStatement, function(self, output) {
if (!(self.body instanceof AST_EmptyStatement)) {
self.body.print(output);
output.semicolon();
}
});
function print_bracketed(node, output, complex) {
if (node.body.length > 0) {
output.with_block(function() {
if (complex) {
display_complex_body(node, false, output);
} else {
display_body(node.body, false, output);
}
});
} else {
output.print("{}");
}
}
DEFPRINT(AST_BlockStatement, function(self, output) {
print_bracketed(self, output);
});
DEFPRINT(AST_EmptyStatement, function(self, output) {
});
DEFPRINT(AST_Do, function(self, output) {
output.print("do");
output.space();
self._do_print_body(output);
output.space();
output.print("while");
output.space();
output.with_parens(function() {
self.condition.print(output);
});
output.semicolon();
});
DEFPRINT(AST_While, function(self, output) {
output.print("while");
output.space();
output.with_parens(function() {
self.condition.print(output);
});
output.space();
self._do_print_body(output);
});
function is_simple_for_in(self) {
if (self.object instanceof AST_BaseCall && self.object.expression instanceof AST_SymbolRef && self.object.expression.name === "dir" && self.object.args.length === 1) {
return true;
}
return false;
}
function is_simple_for(self) {
if (self.object instanceof AST_BaseCall && self.object.expression instanceof AST_SymbolRef && self.object.expression.name === "range" && !(self.init instanceof AST_Array) && (self.object.args.length < 3 || self.object.args.slice(-1)[0] instanceof AST_Number || self.object.args.slice(-1)[0] instanceof AST_Unary && self.object.args.slice(-1)[0].operator === "-" && self.object.args.slice(-1)[0].expression instanceof AST_Number)) {
return true;
}
return false;
}
AST_ForIn.DEFMETHOD("_do_print_body", function(output) {
var self;
self = this;
output.with_block(function() {
if (!(is_simple_for(self) || is_simple_for_in(self))) {
output.indent();
if (self.init instanceof AST_Array) {
output.assign("_$rapyd$_Unpack");
output.print("_$rapyd$_Iter" + INDEX_COUNTER + "[_$rapyd$_Index" + INDEX_COUNTER + "];");
output.newline();
unpack_tuple(self.init, output);
} else {
output.assign(self.init);
output.print("_$rapyd$_Iter" + INDEX_COUNTER + "[_$rapyd$_Index" + INDEX_COUNTER + "];");
output.newline();
}
INDEX_COUNTER += 1;
}
self.body.body.forEach(function(stmt, i) {
output.indent();
stmt.print(output);
output.newline();
});
});
});
DEFPRINT(AST_ForIn, function(self, output) {
var args, tmp_, start, end, increment;
if (is_simple_for(self)) {
increment = null;
args = self.object.args;
tmp_ = args.length;
if (tmp_ === 1) {
start = 0;
end = args[0];
} else if (tmp_ === 2) {
start = args[0];
end = args[1];
} else if (tmp_ === 3) {
start = args[0];
end = args[1];
increment = args[2];
}
output.print("for");
output.space();
output.with_parens(function() {
output.assign(self.init);
start.print ? start.print(output) : output.print(start);
output.semicolon();
output.space();
self.init.print(output);
output.space();
increment instanceof AST_Unary ? output.print(">") : output.print("<");
output.space();
end.print(output);
output.semicolon();
output.space();
self.init.print(output);
if (increment && (!(increment instanceof AST_Unary) || increment.expression.value !== "1")) {
if (increment instanceof AST_Unary) {
output.print("-=");
increment.expression.print(output);
} else {
output.print("+=");
increment.print(output);
}
} else {
if (increment instanceof AST_Unary) {
output.print("--");
} else {
output.print("++");
}
}
});
} else if (is_simple_for_in(self)) {
output.print("for");
output.space();
output.with_parens(function() {
self.init.print(output);
output.space();
output.print("in");
output.space();
self.object.args[0].print(output);
});
} else {
output.assign("var _$rapyd$_Iter" + INDEX_COUNTER);
output.print("_$rapyd$_Iterable");
output.with_parens(function() {
self.object.print(output);
});
output.semicolon();
output.newline();
output.indent();
output.print("for");
output.space();
output.with_parens(function() {
output.print("var");
output.space();
output.assign("_$rapyd$_Index" + INDEX_COUNTER);
output.print("0");
output.semicolon();
output.space();
output.print("_$rapyd$_Index" + INDEX_COUNTER);
output.space();
output.print("<");
output.space();
output.print("_$rapyd$_Iter" + INDEX_COUNTER + ".length");
output.semicolon();
output.space();
output.print("_$rapyd$_Index" + INDEX_COUNTER + "++");
});
}
output.space();
self._do_print_body(output);
});
AST_ForJS.DEFMETHOD("_do_print_body", function(output) {
var self;
self = this;
output.with_block(function() {
self.body.body.forEach(function(stmt, i) {
output.indent();
stmt.print(output);
output.newline();
});
});
});
DEFPRINT(AST_ForJS, function(self, output) {
output.print("for");
output.space();
output.with_parens(function() {
self.condition.print(output);
});
output.space();
self._do_print_body(output);
});
DEFPRINT(AST_ListComprehension, function(self, output) {
output.with_parens(function() {
output.print("function");
output.print("()");
output.space();
output.with_block(function() {
output.indent();
output.assign("var _$rapyd$_Iter");
output.print("_$rapyd$_Iterable");
output.with_parens(function() {
self.object.print(output);
});
output.comma();
output.assign("_$rapyd$_Result");
output.print("[]");
if (self.init instanceof AST_Array) {
self.init.elements.forEach(function(i) {
output.comma();
i.print(output);
});
} else {
output.comma();
self.init.print(output);
}
output.semicolon();
output.newline();
output.indent();
output.print("for");
output.space();
output.with_parens(function() {
output.print("var");
output.space();
output.assign("_$rapyd$_Index");
output.print("0");
output.semicolon();
output.space();
output.print("_$rapyd$_Index");
output.space();
output.print("<");
output.space();
output.print("_$rapyd$_Iter.length");
output.semicolon();
output.space();
output.print("_$rapyd$_Index++");
});
output.space();
output.with_block(function() {
var add_to_list;
output.indent();
if (self.init instanceof AST_Array) {
output.assign("_$rapyd$_Unpack");
output.print("_$rapyd$_Iter[_$rapyd$_Index];");
output.newline();
unpack_tuple(self.init, output);
} else {
output.assign(self.init);
output.print("_$rapyd$_Iter[_$rapyd$_Index];");
output.newline();
}
add_to_list = function() {
output.indent();
output.print("_$rapyd$_Result.push");
output.with_parens(function() {
self.statement.print(output);
});
output.semicolon();
output.newline();
};
if (self.condition) {
output.indent();
output.print("if");
output.space();
output.with_parens(function() {
self.condition.print(output);
});
output.space();
output.with_block(function() {
add_to_list();
});
output.newline();
} else {
add_to_list();
}
});
output.newline();
output.indent();
output.print("return _$rapyd$_Result");
output.semicolon();
output.newline();
});
});
output.print("()");
});
DEFPRINT(AST_With, function(self, output) {
output.print("with");
output.space();
output.with_parens(function() {
self.expression.print(output);
});
output.space();
self._do_print_body(output);
});
function decorate(node, output, internalsub) {
var wrap;
wrap = function(d) {
if (d.length) {
output.print(d.slice(0)[0].name);
output.with_parens(function() {
wrap(d.slice(1));
});
} else {
internalsub();
}
};
wrap(node.decorators);
}
AST_Lambda.DEFMETHOD("_do_print", function(output, nokeyword) {
var self;
self = this;
function internalsub() {
if (!nokeyword) {
output.print("function");
}
if (self.name) {
output.space();
self.name.print(output);
}
output.with_parens(function() {
if (!self.argnames.starargs) {
self.argnames.forEach(function(arg, i) {
if (i) {
output.comma();
}
arg.print(output);
});
}
});
output.space();
print_bracketed(self, output, true);
}
if (self.decorators && self.decorators.length) {
output.print("var");
output.space();
output.assign(self.name.name);
decorate(self, output, internalsub);
output.semicolon();
} else {
internalsub();
}
});
DEFPRINT(AST_Lambda, function(self, output) {
self._do_print(output);
});
AST_Class.DEFMETHOD("_do_print", function(output) {
var self, class_def, define_method;
self = this;
if (self.external) {
return;
}
class_def = function(method) {
output.indent();
self.name.print(output);
if (method && self.static.indexOf(method) !== -1) {
output.assign("." + method);
} else {
output.assign(".prototype" + (method ? "." + method : ""));
}
};
define_method = function(stmt) {
var name;
name = stmt.name.name;
class_def(name);
function internalsub() {
output.print("function");
output.space();
output.print(name);
output.with_parens(function() {
if (!stmt.argnames.starargs) {
stmt.argnames.forEach(function(arg, i) {
if (self.static.indexOf(name) !== -1) {
i += 1;
}
if (i > 1) {
output.comma();
}
if (i) {
arg.print(output);
}
});
}
});
print_bracketed(stmt, output, true);
}
if (stmt.decorators && stmt.decorators.length) {
decorate(stmt, output, internalsub);
} else {
internalsub();
}
output.semicolon();
output.newline();
};
function internalsub() {
if (self.init || self.parent) {
output.print("function");
output.space();
self.name.print(output);
output.print("()");
output.space();
output.with_block(function() {
bind_methods(self.bound, output);
output.indent();
if (self.init) {
self.name.print(output);
} else {
self.parent.print(output);
}
output.print(".prototype.__init__.apply");
output.with_parens(function() {
output.print("this");
output.comma();
output.print("arguments");
});
output.semicolon();
output.newline();
});
} else {
output.print("function");
output.space();
self.name.print(output);
output.print("()");
output.space();
output.with_block(function() {
bind_methods(self.bound, output);
});
}
}
if (self.decorators && self.decorators.length) {
output.print("var ");
output.assign(self.name);
decorate(self, output, internalsub);
output.semicolon();
} else {
internalsub();
}
output.newline();
if (self.parent) {
output.indent();
output.print("_$rapyd$_extends");
output.with_parens(function() {
self.name.print(output);
output.comma();
self.parent.print(output);
});
output.semicolon();
output.newline();
}
self.body.forEach(function(stmt, i) {
if (stmt instanceof AST_Method) {
define_method(stmt);
} else if (stmt instanceof AST_Class) {
console.error("Nested classes aren't supported yet");
}
});
});
DEFPRINT(AST_Class, function(self, output) {
self._do_print(output);
});
AST_Module.DEFMETHOD("_do_print", function(output) {
var self;
self = this;
if (self.external) {
return;
}
output.print("var");
output.space();
output.assign(self.name);
function internalsub() {
print_module(self, self.variables, output);
}
decorate(self, output, internalsub);
output.semicolon();
output.newline();
});
DEFPRINT(AST_Module, function(self, output) {
self._do_print(output);
});
AST_Exit.DEFMETHOD("_do_print", function(output, kind) {
var self;
self = this;
output.print(kind);
if (self.value) {
output.space();
self.value.print(output);
}
output.semicolon();
});
DEFPRINT(AST_Return, function(self, output) {
self._do_print(output, "return");
});
DEFPRINT(AST_Throw, function(self, output) {
self._do_print(output, "throw");
});
AST_LoopControl.DEFMETHOD("_do_print", function(output, kind) {
output.print(kind);
if (this.label) {
output.space();
this.label.print(output);
}
output.semicolon();
});
DEFPRINT(AST_Break, function(self, output) {
self._do_print(output, "break");
});
DEFPRINT(AST_Continue, function(self, output) {
self._do_print(output, "continue");
});
function make_then(self, output) {
var b;
if (output.option("bracketize")) {
make_block(self.body, output);
return;
}
if (!self.body) {
return output.force_semicolon();
}
if (self.body instanceof AST_Do && output.option("ie_proof")) {
make_block(self.body, output);
return;
}
b = self.body;
while (true) {
if (b instanceof AST_If) {
if (!b.alternative) {
make_block(self.body, output);
return;
}
b = b.alternative;
} else if (b instanceof AST_StatementWithBody) {
b = b.body;
} else {
break;
}
}
force_statement(self.body, output);
}
DEFPRINT(AST_If, function(self, output) {
output.print("if");
output.space();
output.with_parens(function() {
self.condition.print(output);
});
output.space();
if (self.alternative) {
make_then(self, output);
output.space();
output.print("else");
output.space();
force_statement(self.alternative, output);
} else {
self._do_print_body(output);
}
});
DEFPRINT(AST_Switch, function(self, output) {
output.print("switch");
output.space();
output.with_parens(function() {
self.expression.print(output);
});
output.space();
if (self.body.length > 0) {
output.with_block(function() {
self.body.forEach(function(stmt, i) {
if (i) {
output.newline();
}
output.indent(true);
stmt.print(output);
});
});
} else {
output.print("{}");
}
});
AST_SwitchBranch.DEFMETHOD("_do_print_body", function(output) {
if (this.body.length > 0) {
output.newline();
this.body.forEach(function(stmt) {
output.indent();
stmt.print(output);
output.newline();
});
}
});
DEFPRINT(AST_Default, function(self, output) {
output.print("default:");
self._do_print_body(output);
});
DEFPRINT(AST_Case, function(self, output) {
output.print("case");
output.space();
self.expression.print(output);
output.print(":");
self._do_print_body(output);
});
DEFPRINT(AST_Try, function(self, output) {
output.print("try");
output.space();
print_bracketed(self, output);
if (self.bcatch) {
output.space();
self.bcatch.print(output);
}
if (self.bfinally) {
output.space();
self.bfinally.print(output);
}
});
DEFPRINT(AST_Catch, function(self, output) {
output.print("catch");
output.space();
output.with_parens(function() {
output.print("_$rapyd$_Exception");
});
output.space();
if (self.body.length > 1 || self.body[0].errors.length) {
output.with_block(function() {
var no_default;
output.indent();
no_default = true;
self.body.forEach(function(exception, i) {
var no_default;
if (i) {
output.print("else ");
}
if (exception.errors.length) {
output.print("if");
output.space();
output.with_parens(function() {
exception.errors.forEach(function(err, i) {
if (i) {
output.newline();
output.indent();
output.print("||");
output.space();
}
output.print("_$rapyd$_Exception");
output.space();
output.print("instanceof");
output.space();
err.print(output);
});
});
output.space();
} else {
no_default = false;
}
print_bracketed(exception, output, true);
output.space();
});
if (no_default) {
output.print("else");
output.space();
output.with_block(function() {
output.indent();
output.print("throw");
output.space();
output.print("_$rapyd$_Exception");
output.semicolon();
output.newline();
});
}
output.newline();
});
} else {
print_bracketed(self.body[0], output, true);
}
});
DEFPRINT(AST_Finally, function(self, output) {
output.print("finally");
output.space();
print_bracketed(self, output);
});
AST_Definitions.DEFMETHOD("_do_print", function(output, kind) {
var p, in_for, avoid_semicolon;
output.print(kind);
output.space();
this.definitions.forEach(function(def_, i) {
if (i) {
output.comma();
}
def_.print(output);
});
p = output.parent();
in_for = p instanceof AST_ForIn;
avoid_semicolon = in_for && p.init === this;
if (!avoid_semicolon) {
output.semicolon();
}
});
DEFPRINT(AST_Var, function(self, output) {
self._do_print(output, "var");
});
DEFPRINT(AST_Const, function(self, output) {
self._do_print(output, "const");
});
function parenthesize_for_noin(node, output, noin) {
if (!noin) {
node.print(output);
} else {
try {
node.walk(new TreeWalker(function(node) {
if (node instanceof AST_Binary && node.operator === "in") {
throw output;
}
}));
node.print(output);
} catch (_$rapyd$_Exception) {
var ex = _$rapyd$_Exception;
if (ex !== output) {
throw ex;
}
node.print(output, true);
}
}
}
DEFPRINT(AST_VarDef, function(self, output) {
var p, noin;
self.name.print(output);
if (self.value) {
output.assign("");
p = output.parent(1);
noin = p instanceof AST_ForIn;
parenthesize_for_noin(self.value, output, noin);
}
});
DEFPRINT(AST_BaseCall, function(self, output) {
var rename, output_kwargs, obj, last;
if (self instanceof AST_ClassCall) {
if (self.static) {
self.class.print(output);
output.print(".");
output.print(self.method);
} else {
self.class.print(output);
output.print(".prototype.");
output.print(self.method);
output.print(".call");
}
} else {
rename = SPECIAL_METHODS.hasOwnProperty(self.expression.name) ? SPECIAL_METHODS[self.expression.name] : undefined;
if (rename) {
output.print(rename);
} else {
self.expression.print(output);
}
}
if (self instanceof AST_New && no_constructor_parens(self, output)) {
return;
}
output_kwargs = function() {
if (self.args.kwargs && self.args.kwargs.length) {
if (self.args.length) {
output.comma();
}
output.print("{");
self.args.kwargs.forEach(function(pair, i) {
if (i) {
output.comma();
}
pair[0].print(output);
output.print(":");
output.space();
pair[1].print(output);
});
output.print("}");
}
};
if (self.args.starargs) {
obj = self.expression.expression ? self.expression.expression.name : "this";
last = self.args.length - 1;
output.print(".apply");
output.with_parens(function() {
output.print(obj);
output.comma();
output.with_square(function() {
self.args.forEach(function(expr, i) {
if (i !== last) {
if (i) {
output.comma();
}
expr.print(output);
}
});
output_kwargs();
});
output.print(".concat");
output.with_parens(function() {
self.args[last].print(output);
});
});
} else {
output.with_parens(function() {
self.args.forEach(function(expr, i) {
if (i) {
output.comma();
}
expr.print(output);
});
output_kwargs();
});
}
});
DEFPRINT(AST_New, function(self, output) {
output.print("new");
output.space();
AST_BaseCall.prototype._codegen(self, output);
});
AST_Seq.DEFMETHOD("_do_print", function(output) {
var self, p, print_seq;
self = this;
p = output.parent();
print_seq = function() {
self.car.print(output);
if (self.cdr) {
output.comma();
if (output.should_break()) {
output.newline();
output.indent();
}
self.cdr.print(output);
}
};
if (p instanceof AST_Binary || p instanceof AST_Return || p instanceof AST_Array || p instanceof AST_BaseCall || p instanceof AST_SimpleStatement) {
output.with_square(print_seq);
} else {
print_seq();
}
});
DEFPRINT(AST_Seq, function(self, output) {
self._do_print(output);
});
DEFPRINT(AST_Dot, function(self, output) {
var expr;
expr = self.expression;
expr.print(output);
if (expr instanceof AST_Number && expr.getValue() >= 0) {
if (!/[xa-f.]/i.test(output.last())) {
output.print(".");
}
}
output.print(".");
output.add_mapping(self.end);
output.print_name(self.property);
});
DEFPRINT(AST_Sub, function(self, output) {
self.expression.print(output);
output.print("[");
if (self.property instanceof AST_Unary && self.property.operator === "-" && self.property.expression instanceof AST_Number) {
self.expression.print(output);
output.print(".length");
}
self.property.print(output);
output.print("]");
});
DEFPRINT(AST_Splice, function(self, output) {
output.print("[].splice.apply");
output.with_parens(function() {
self.expression.print(output);
output.comma();
output.with_square(function() {
self.property.print(output);
output.comma();
self.property2.print(output);
output.print("-");
self.property.print(output);
});
output.print(".concat");
output.with_parens(function() {
self.assignment.print(output);
});
});
});
DEFPRINT(AST_UnaryPrefix, function(self, output) {
var op;
op = self.operator;
output.print(op);
if (/^[a-z]/i.test(op)) {
output.space();
}
self.expression.print(output);
});
DEFPRINT(AST_UnaryPostfix, function(self, output) {
self.expression.print(output);
output.print(self.operator);
});
DEFPRINT(AST_Binary, function(self, output) {
var comparators, function_ops, leftvar;
comparators = {
"<": true,
">": true,
"<=": true,
">=": true,
"==": true,
"!=": true
};
function_ops = {
"in": "_$rapyd$_in",
"**": "Math.pow"
};
if (_$rapyd$_in(self.operator, function_ops)) {
output.print(function_ops[self.operator]);
output.with_parens(function() {
self.left.print(output);
output.comma();
self.right.print(output);
});
} else if (comparators[self.operator] && self.left instanceof AST_Binary && comparators[self.left.operator]) {
if (self.left.right instanceof AST_Symbol) {
self.left.print(output);
leftvar = self.left.right.name;
} else {
self.left.left.print(output);
output.space();
output.print(self.left.operator);
output.space();
output.with_parens(function() {
output.assign("_$rapyd$_Temp");
self.left.right.print(output);
leftvar = "_$rapyd$_Temp";
});
}
output.space();
output.print("&&");
output.space();
output.print(leftvar);
output.space();
output.print(self.operator);
output.space();
self.right.print(output);
} else {
self.left.print(output);
output.space();
output.print(self.operator);
output.space();
self.right.print(output);
}
});
DEFPRINT(AST_Assign, function(self, output) {
if (self.left instanceof AST_Array) {
output.print("_$rapyd$_Unpack");
} else {
self.left.print(output);
}
output.space();
output.print(self.operator);
output.space();
self.right.print(output);
if (self.left instanceof AST_Array) {
output.semicolon();
output.newline();
unpack_tuple(self.left, output, true);
}
});
DEFPRINT(AST_Conditional, function(self, output) {
self.condition.print(output);
output.space();
output.print("?");
output.space();
self.consequent.print(output);
output.space();
output.colon();
self.alternative.print(output);
});
DEFPRINT(AST_Array, function(self, output) {
output.with_square(function() {
var a, len_;
a = self.elements;
len_ = a.length;
if (len_ > 0) {
output.space();
}
a.forEach(function(exp, i) {
if (i) {
output.comma();
}
exp.print(output);
});
if (len_ > 0) {
output.space();
}
});
});
DEFPRINT(AST_Object, function(self, output) {
if (self.properties.length > 0) {
output.with_block(function() {
self.properties.forEach(function(prop, i) {
if (i) {
output.print(",");
output.newline();
}
output.indent();
prop.print(output);
});
output.newline();
});
} else {
output.print("{}");
}
});
DEFPRINT(AST_ObjectKeyVal, function(self, output) {
var key;
key = self.key;
if (self.quoted) {
output.print_string(key + "");
} else if ((typeof key === "number" || !output.option("beautify") && +key + "" === key) && parseFloat(key) >= 0) {
output.print(make_num(key));
} else if (!is_identifier(key)) {
output.print_string(key);
} else {
output.print_name(key);
}
output.colon();
self.value.print(output);
});
DEFPRINT(AST_ObjectSetter, function(self, output) {
output.print("set");
self.value._do_print(output, true);
});
DEFPRINT(AST_ObjectGetter, function(self, output) {
output.print("get");
self.value._do_print(output, true);
});
AST_Symbol.DEFMETHOD("definition", function() {
return this.thedef;
});
DEFPRINT(AST_Symbol, function(self, output) {
var def_;
def_ = self.definition();
output.print_name(def_ ? def_.mangled_name || def_.name : self.name);
});
DEFPRINT(AST_Undefined, function(self, output) {
output.print("void 0");
});
DEFPRINT(AST_Hole, noop);
DEFPRINT(AST_Infinity, function(self, output) {
output.print("1/0");
});
DEFPRINT(AST_NaN, function(self, output) {
output.print("0/0");
});
DEFPRINT(AST_This, function(self, output) {
output.print("this");
});
DEFPRINT(AST_Constant, function(self, output) {
output.print(self.getValue());
});
DEFPRINT(AST_String, function(self, output) {
output.print_string(self.getValue());
});
DEFPRINT(AST_Verbatim, function(self, output) {
output.print(self.getValue());
});
DEFPRINT(AST_Number, function(self, output) {
output.print(make_num(self.getValue()));
});
DEFPRINT(AST_RegExp, function(self, output) {
var str_, p;
str_ = self.getValue().toString();
if (output.option("ascii_only")) {
str_ = output.to_ascii(str_);
}
output.print(str_);
p = output.parent();
if (p instanceof AST_Binary && /^in/.test(p.operator) && p.left === self) {
output.print(" ");
}
});
function force_statement(stat, output) {
if (output.option("bracketize")) {
if (!stat || stat instanceof AST_EmptyStatement) {
output.print("{}");
} else if (stat instanceof AST_BlockStatement) {
stat.print(output);
} else {
output.with_block(function() {
output.indent();
stat.print(output);
output.newline();
});
}
} else {
if (!stat || stat instanceof AST_EmptyStatement) {
output.force_semicolon();
} else {
stat.print(output);
}
}
}
function first_in_statement(output) {
var a, i, node, p;
a = output.stack();
i = a.length;
node = a[i -= 1];
p = a[i -= 1];
while (i > 0) {
if (p instanceof AST_Statement && p.body === node) {
return true;
}
if (p instanceof AST_Seq && p.car === node || p instanceof AST_BaseCall && p.expression === node || p instanceof AST_Dot && p.expression === node || p instanceof AST_Sub && p.expression === node || p instanceof AST_Conditional && p.condition === node || p instanceof AST_Binary && p.left === node || p instanceof AST_UnaryPostfix && p.expression === node) {
node = p;
p = a[i -= 1];
} else {
return false;
}
}
}
function no_constructor_parens(self, output) {
return self.args.length === 0 && !output.option("beautify");
}
function best_of(a) {
var best, len_, i;
best = a[0];
len_ = best.length;
for (i = 1; i < a.length; i++) {
if (a[i].length < len_) {
best = a[i];
len_ = best.length;
}
}
return best;
}
function make_num(num) {
var str_, a, m;
str_ = num.toString(10);
a = [ str_.replace(/^0\./, ".").replace("e+", "e") ];
m = null;
if (Math.floor(num) === num) {
if (num >= 0) {
a.push("0x" + num.toString(16).toLowerCase(), "0" + num.toString(8));
} else {
a.push("-0x" + (-num).toString(16).toLowerCase(), "-0" + (-num).toString(8));
}
if (m = /^(.*?)(0+)$/.exec(num)) {
a.push(m[1] + "e" + m[2].length);
}
} else if (m = /^0?\.(0+)(.*)$/.exec(num)) {
a.push(m[2] + "e-" + (m[1].length + m[2].length), str_.substr(str_.indexOf(".")));
}
return best_of(a);
}
function make_block(stmt, output) {
if (stmt instanceof AST_BlockStatement) {
stmt.print(output);
return;
}
output.with_block(function() {
output.indent();
stmt.print(output);
output.newline();
});
}
function DEFMAP(nodetype, generator) {
nodetype.DEFMETHOD("add_source_map", function(stream) {
generator(this, stream);
});
}
DEFMAP(AST_Node, noop);
function basic_sourcemap_gen(self, output) {
output.add_mapping(self.start);
}
DEFMAP(AST_Directive, basic_sourcemap_gen);
DEFMAP(AST_Debugger, basic_sourcemap_gen);
DEFMAP(AST_Symbol, basic_sourcemap_gen);
DEFMAP(AST_Jump, basic_sourcemap_gen);
DEFMAP(AST_StatementWithBody, basic_sourcemap_gen);
DEFMAP(AST_LabeledStatement, noop);
DEFMAP(AST_Lambda, basic_sourcemap_gen);
DEFMAP(AST_Switch, basic_sourcemap_gen);
DEFMAP(AST_SwitchBranch, basic_sourcemap_gen);
DEFMAP(AST_BlockStatement, basic_sourcemap_gen);
DEFMAP(AST_Toplevel, noop);
DEFMAP(AST_New, basic_sourcemap_gen);
DEFMAP(AST_Try, basic_sourcemap_gen);
DEFMAP(AST_Catch, basic_sourcemap_gen);
DEFMAP(AST_Finally, basic_sourcemap_gen);
DEFMAP(AST_Definitions, basic_sourcemap_gen);
DEFMAP(AST_Constant, basic_sourcemap_gen);
DEFMAP(AST_ObjectProperty, function(self, output) {
output.add_mapping(self.start, self.key);
});
})();
rs_baselib_pyj = "\"\"\"\n**********************************************************************\n\n A RapydScript to JavaScript compiler.\n https://github.com/atsepkov/RapydScript2\n\n -------------------------------- (C) ---------------------------------\n\n Author: Alexander Tsepkov\n <atsepkov@pyjeon.com>\n http://www.pyjeon.com\n\n Distributed under Apache 2.0 license:\n Copyright 2013 (c) Alexander Tsepkov <atsepkov@pyjeon.com>\n\n RapydScript source code is originally based on UglifyJS2 (covered\n by BSD license). UglifyJS2 was written by Mihai Bazon\n <mihai.bazon@gmail.com>, who is its respective copyright holder.\n\n Redistribution and use in source and binary forms, with or without\n modification, are permitted provided that the following conditions\n are met:\n\n * Redistributions of source code must retain the above\n copyright notice, this list of conditions and the following\n disclaimer.\n\n * Redistributions in binary form must reproduce the above\n copyright notice, this list of conditions and the following\n disclaimer in the documentation and/or other materials\n provided with the distribution.\n\n THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDER \u201cAS IS\u201d AND ANY\n EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE\n IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR\n PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER BE\n LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,\n OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,\n PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR\n PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY\n THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR\n TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF\n THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF\n SUCH DAMAGE.\n\n **********************************************************************\n\"\"\"\n\"use strict\"\n\n{\n\"abs\": def abs(n):\n return Math.abs(n)\n,\n\"bind\": def _$rapyd$_bind(fn, thisArg):\n if fn.orig: fn = fn.orig\n if thisArg == False: return fn\n ret = def():\n return fn.apply(thisArg, arguments)\n ret.orig = fn\n return ret\n,\n\"rebind_all\": def _$rapyd$_rebindAll(thisArg, rebind):\n if JS('typeof rebind') == \"undefined\": rebind = True\n for JS('var p in thisArg'):\n if thisArg[p] and thisArg[p].orig:\n if rebind: thisArg[p] = _$rapyd$_bind(thisArg[p], thisArg)\n else: thisArg[p] = thisArg[p].orig\n,\n\"dir\": def dir(item):\n # TODO: this isn't really representative of real Python's dir(), nor is it\n # an intuitive replacement for \"for ... in\" loop, need to update this logic\n # and introduce a different way of achieving \"for ... in\"\n arr = []\n for JS('var i in item'): arr.push(i)\n return arr\n,\n\"enumerate\": def enumerate(item):\n arr = []\n for JS('var i=0;i<item.length;i++'): arr[arr.length] = [i, item[i]]\n return arr\n,\n\"eslice\": def _$rapyd$_eslice(arr, step, start, end):\n arr = arr[:]\n if type(arr) == 'string' or isinstance(arr, String):\n isString = True\n arr = arr.split('')\n\n if step < 0:\n step = -step\n arr.reverse()\n if type(start) != \"undefined\": start = arr.length - start - 1\n if type(end) != \"undefined\": end = arr.length - end - 1\n if type(start) == \"undefined\": start = 0\n if type(end) == \"undefined\": end = arr.length\n\n arr = arr.slice(start, end).filter(def(e, i): return i % step == 0;)\n return isString ? arr.join('') : arr\n,\n\"extends\": def _$rapyd$_extends(child, parent):\n child.prototype = Object.create(parent.prototype)\n child.prototype.constructor = child\n,\n\"in\": def _$rapyd$_in(val, arr):\n if isinstance(arr, Array) or JS('typeof arr') == 'string': return arr.indexOf(val) != -1\n else:\n if arr.hasOwnProperty(val): return True\n return False\n,\n\"iterable\": def _$rapyd$_Iterable(iterable):\n if isinstance(iterable, Array) or isinstance(iterable, String) or JS('typeof iterable') == 'string': return iterable\n return Object.keys(iterable) # so we can use 'for ... in' syntax with hashes\n,\n\"len\": def len(obj):\n if isinstance(obj, Array) or JS('typeof obj') == 'string': return obj.length\n else:\n count = 0\n for JS('var i in obj'):\n if obj.hasOwnProperty(i): count += 1\n return count\n,\n\"mixin\": def _$rapyd$_mixin(target, source, overwrite):\n for JS('var i in source'):\n if source.hasOwnProperty(i) and overwrite or JS('typeof target[i]') == 'undefined': target[i] = source[i]\n,\n\"print\": def _$rapyd$_print(*args):\n output = JSON.stringify(args)\n if JS('typeof console') == 'object': console.log(output.substr(1, output.length-2))\n,\n\"range\": def range(start, stop, step):\n if arguments.length <= 1:\n stop = start or 0\n start = 0\n step = arguments[2] or 1\n\n length = Math.max(Math.ceil((stop - start) / step), 0)\n idx = 0\n range = Array(length)\n\n while idx < length:\n range[JS('idx++')] = start\n start += step\n return range\n,\n\"reversed\": def reversed(arr):\n tmp = arr[:]\n return tmp.reverse()\n,\n\"sum\": def sum(arr, start=0):\n return arr.reduce(\n def(prev, cur): return prev+cur\n ,\n start\n )\n,\n\"getattr\": def getattr(obj, name):\n return obj[name]\n,\n\"setattr\": def setattr(obj, name, value):\n obj[name] = value\n,\n\"hasattr\": def hasattr(obj, name):\n return JS('name in obj')\n}\n"
rs_package_version = "0.3.4"
Reference in New Issue View Git Blame Copy Permalink