1
var jsp = require("./parse-js"),
2
pro = require("./process");
6
function HOP(obj, prop) {
7
return Object.prototype.hasOwnProperty.call(obj, prop);
10
function AST_Node(parent) {
14
AST_Node.prototype.init = function(){};
16
function DEFINE_NODE_CLASS(type, props, methods) {
17
var base = methods && methods.BASE || AST_Node;
18
if (!base) base = AST_Node;
19
function D(parent, data) {
20
base.apply(this, arguments);
21
if (props) props.forEach(function(name, i){
22
this["_" + name] = data[i];
26
var P = D.prototype = new AST_Node;
27
P.node_type = function(){ return type };
28
if (props) props.forEach(function(name){
29
var propname = "_" + name;
30
P["set_" + name] = function(val) {
34
P["get_" + name] = function() {
35
return this[propname];
38
if (type != null) BY_TYPE[type] = D;
39
if (methods) for (var i in methods) if (HOP(methods, i)) {
45
var AST_String_Node = DEFINE_NODE_CLASS("string", ["value"]);
46
var AST_Number_Node = DEFINE_NODE_CLASS("num", ["value"]);
47
var AST_Name_Node = DEFINE_NODE_CLASS("name", ["value"]);
49
var AST_Statlist_Node = DEFINE_NODE_CLASS(null, ["body"]);
50
var AST_Root_Node = DEFINE_NODE_CLASS("toplevel", null, { BASE: AST_Statlist_Node });
51
var AST_Block_Node = DEFINE_NODE_CLASS("block", null, { BASE: AST_Statlist_Node });
52
var AST_Splice_Node = DEFINE_NODE_CLASS("splice", null, { BASE: AST_Statlist_Node });
54
var AST_Var_Node = DEFINE_NODE_CLASS("var", ["definitions"]);
55
var AST_Const_Node = DEFINE_NODE_CLASS("const", ["definitions"]);
57
var AST_Try_Node = DEFINE_NODE_CLASS("try", ["body", "catch", "finally"]);
58
var AST_Throw_Node = DEFINE_NODE_CLASS("throw", ["exception"]);
60
var AST_New_Node = DEFINE_NODE_CLASS("new", ["constructor", "arguments"]);
62
var AST_Switch_Node = DEFINE_NODE_CLASS("switch", ["expression", "branches"]);
63
var AST_Switch_Branch_Node = DEFINE_NODE_CLASS(null, ["expression", "body"]);
65
var AST_Break_Node = DEFINE_NODE_CLASS("break", ["label"]);
66
var AST_Continue_Node = DEFINE_NODE_CLASS("continue", ["label"]);
67
var AST_Assign_Node = DEFINE_NODE_CLASS("assign", ["operator", "lvalue", "rvalue"]);
68
var AST_Dot_Node = DEFINE_NODE_CLASS("dot", ["expression", "name"]);
69
var AST_Call_Node = DEFINE_NODE_CLASS("call", ["function", "arguments"]);
71
var AST_Lambda_Node = DEFINE_NODE_CLASS(null, ["name", "arguments", "body"])
72
var AST_Function_Node = DEFINE_NODE_CLASS("function", null, AST_Lambda_Node);
73
var AST_Defun_Node = DEFINE_NODE_CLASS("defun", null, AST_Lambda_Node);
75
var AST_If_Node = DEFINE_NODE_CLASS("if", ["condition", "then", "else"]);