diff --git a/README-perlito5-js b/README-perlito5-js
index 675765bfe..321b2c426 100644
--- a/README-perlito5-js
+++ b/README-perlito5-js
@@ -72,7 +72,7 @@ Class
- classes inherit from UNIVERSAL
Namespace
-- namespaces are stored in the NAMESPACE global hash
+- namespaces are stored in the p5pkg global hash
- current namespace object is in the PKG variable
- Namespace inherits from from CORE::GLOBAL, which inherits from CORE
- Namespace is a copy of the Class, but with a different inheritance
diff --git a/html/perlito5.html b/html/perlito5.html
index 73268961e..6825ab385 100755
--- a/html/perlito5.html
+++ b/html/perlito5.html
@@ -87,14 +87,14 @@
function execute() {
- NAMESPACE.CORE.print = function(List__) {
+ p5pkg.CORE.print = function(List__) {
var i;
for (i = 0; i < List__.length; i++) {
document.getElementById('print-result').value += p5str(List__[i]);
}
return true;
};
- NAMESPACE.CORE.warn = function(List__) {
+ p5pkg.CORE.warn = function(List__) {
var i;
List__.push("\n");
for (i = 0; i < List__.length; i++) {
@@ -102,9 +102,9 @@
}
return true;
};
- NAMESPACE["main"]["v_^O"] = "browser";
- NAMESPACE["main"]["Hash_INC"]["Perlito5/strict.pm"] = "Perlito5/strict.pm";
- NAMESPACE["main"]["Hash_INC"]["Perlito5/warnings.pm"] = "Perlito5/warnings.pm";
+ p5pkg["main"]["v_^O"] = "browser";
+ p5pkg["main"]["Hash_INC"]["Perlito5/strict.pm"] = "Perlito5/strict.pm";
+ p5pkg["main"]["Hash_INC"]["Perlito5/warnings.pm"] = "Perlito5/warnings.pm";
var source = document.getElementById('source').value;
var pos = 0;
@@ -117,7 +117,7 @@
// compile
document.getElementById('log-result').value += "Compiling.\n";
var start = new Date().getTime();
- var js_source = NAMESPACE["Perlito5"].compile_p5_to_js([source]);
+ var js_source = p5pkg["Perlito5"].compile_p5_to_js([source]);
var end = new Date().getTime();
var time = end - start;
document.getElementById('log-result').value += "Compilation time: " + time + "ms\n";
@@ -129,7 +129,7 @@
end = new Date().getTime();
time = end - start;
document.getElementById('log-result').value += "Running time: " + time + "ms\n";
- NAMESPACE.CORE.print(["\nDone.\n"]);
+ p5pkg.CORE.print(["\nDone.\n"]);
}
catch(err) {
document.getElementById('log-result').value += "Error:\n";
diff --git a/html/perlito5.js b/html/perlito5.js
index ab8aa6a57..28cb5cefc 100644
--- a/html/perlito5.js
+++ b/html/perlito5.js
@@ -19,18 +19,18 @@
var isNode = typeof require != "undefined";
-if (typeof NAMESPACE !== "object") {
- NAMESPACE = {};
+if (typeof p5pkg !== "object") {
+ p5pkg = {};
LOCAL = [];
var universal = function () {};
- NAMESPACE.UNIVERSAL = new universal();
- NAMESPACE.UNIVERSAL._ref_ = "UNIVERSAL";
- NAMESPACE.UNIVERSAL.isa = function (List__) {
+ p5pkg.UNIVERSAL = new universal();
+ p5pkg.UNIVERSAL._ref_ = "UNIVERSAL";
+ p5pkg.UNIVERSAL.isa = function (List__) {
// TODO - use @ISA
return List__[0]._class_._ref_ == List__[1]
};
- NAMESPACE.UNIVERSAL.can = function (List__) {
+ p5pkg.UNIVERSAL.can = function (List__) {
var o = List__[0];
var s = List__[1];
if ( s.indexOf("::") == -1 ) {
@@ -42,16 +42,16 @@ if (typeof NAMESPACE !== "object") {
// TODO - use p5method_lookup
return p5method_lookup(s, c.join("::"), {});
};
- NAMESPACE.UNIVERSAL.DOES = NAMESPACE.UNIVERSAL.can;
+ p5pkg.UNIVERSAL.DOES = p5pkg.UNIVERSAL.can;
var core = function () {};
- NAMESPACE["CORE"] = new core();
- NAMESPACE["CORE"]._ref_ = "CORE";
+ p5pkg["CORE"] = new core();
+ p5pkg["CORE"]._ref_ = "CORE";
var core_global = function () {};
- core_global.prototype = NAMESPACE.CORE;
- NAMESPACE["CORE::GLOBAL"] = new core_global();
- NAMESPACE["CORE::GLOBAL"]._ref_ = "CORE::GLOBAL";
+ core_global.prototype = p5pkg.CORE;
+ p5pkg["CORE::GLOBAL"] = new core_global();
+ p5pkg["CORE::GLOBAL"]._ref_ = "CORE::GLOBAL";
p5_error = function (v) {
this.v = v;
@@ -61,20 +61,20 @@ if (typeof NAMESPACE !== "object") {
}
function p5make_package(pkg_name) {
- if (!NAMESPACE.hasOwnProperty(pkg_name)) {
+ if (!p5pkg.hasOwnProperty(pkg_name)) {
var tmp = function () {};
- tmp.prototype = NAMESPACE["CORE::GLOBAL"];
- NAMESPACE[pkg_name] = new tmp();
- NAMESPACE[pkg_name]._ref_ = pkg_name;
- NAMESPACE[pkg_name]._class_ = NAMESPACE[pkg_name]; // XXX memory leak
+ tmp.prototype = p5pkg["CORE::GLOBAL"];
+ p5pkg[pkg_name] = new tmp();
+ p5pkg[pkg_name]._ref_ = pkg_name;
+ p5pkg[pkg_name]._class_ = p5pkg[pkg_name]; // XXX memory leak
// TODO - add the other package global variables
- NAMESPACE[pkg_name]["List_ISA"] = [];
- NAMESPACE[pkg_name]["v_a"] = null;
- NAMESPACE[pkg_name]["v_b"] = null;
- NAMESPACE[pkg_name]["v__"] = null;
+ p5pkg[pkg_name]["List_ISA"] = [];
+ p5pkg[pkg_name]["v_a"] = null;
+ p5pkg[pkg_name]["v_b"] = null;
+ p5pkg[pkg_name]["v__"] = null;
}
- return NAMESPACE[pkg_name];
+ return p5pkg[pkg_name];
}
function p5code_lookup_by_name(package, sub_name) {
@@ -84,8 +84,8 @@ function p5code_lookup_by_name(package, sub_name) {
sub_name = parts.pop();
package = parts.join("::");
}
- if (NAMESPACE.hasOwnProperty(package)) {
- var c = NAMESPACE[package];
+ if (p5pkg.hasOwnProperty(package)) {
+ var c = p5pkg[package];
if ( c.hasOwnProperty(sub_name) ) {
return c[sub_name]
}
@@ -95,7 +95,7 @@ function p5code_lookup_by_name(package, sub_name) {
function p5method_lookup(method, class_name, seen) {
// default mro
- c = NAMESPACE[class_name];
+ c = p5pkg[class_name];
if ( c.hasOwnProperty(method) ) {
return c[method]
}
@@ -124,8 +124,8 @@ function p5call(invocant, method, list) {
if (m) {
return m(list)
}
- if ( NAMESPACE.UNIVERSAL.hasOwnProperty(method) ) {
- return NAMESPACE.UNIVERSAL[method](list)
+ if ( p5pkg.UNIVERSAL.hasOwnProperty(method) ) {
+ return p5pkg.UNIVERSAL[method](list)
}
// method can have an optional namespace
@@ -138,11 +138,11 @@ function p5call(invocant, method, list) {
if (m) {
return m(list)
}
- NAMESPACE.CORE.die(["method not found: ", name, " in class ", package]);
+ p5pkg.CORE.die(["method not found: ", name, " in class ", package]);
}
// TODO - cache the methods that were already looked up
- NAMESPACE.CORE.die(["method not found: ", method, " in class ", invocant._ref_]);
+ p5pkg.CORE.die(["method not found: ", method, " in class ", invocant._ref_]);
}
@@ -153,23 +153,23 @@ function p5call(invocant, method, list) {
return p5call(aclass, method, list);
}
- NAMESPACE.CORE.die(["Can't call method ", method, " on unblessed reference"]);
+ p5pkg.CORE.die(["Can't call method ", method, " on unblessed reference"]);
}
p5make_package("main");
-NAMESPACE["main"]["v_@"] = []; // $@
-NAMESPACE["main"]["List_#"] = []; // @#
-NAMESPACE["main"]["v_^O"] = isNode ? "node.js" : "javascript";
-NAMESPACE["main"]["List_INC"] = [];
-NAMESPACE["main"]["Hash_INC"] = {};
-NAMESPACE["main"]["List_ARGV"] = [];
-NAMESPACE["main"]["Hash_ENV"] = {};
+p5pkg["main"]["v_@"] = []; // $@
+p5pkg["main"]["List_#"] = []; // @#
+p5pkg["main"]["v_^O"] = isNode ? "node.js" : "javascript";
+p5pkg["main"]["List_INC"] = [];
+p5pkg["main"]["Hash_INC"] = {};
+p5pkg["main"]["List_ARGV"] = [];
+p5pkg["main"]["Hash_ENV"] = {};
if (isNode) {
- NAMESPACE["main"]["List_ARGV"] = process.argv.splice(2);
- NAMESPACE["main"]["Hash_ENV"] = process.env;
+ p5pkg["main"]["List_ARGV"] = process.argv.splice(2);
+ p5pkg["main"]["Hash_ENV"] = process.env;
} else if (typeof arguments === "object") {
- NAMESPACE["main"]["List_ARGV"] = arguments;
+ p5pkg["main"]["List_ARGV"] = arguments;
}
p5make_package("Perlito5");
@@ -178,7 +178,7 @@ p5make_package("Perlito5::Runtime");
p5make_package("Perlito5::Grammar");
function p5make_sub(pkg_name, sub_name, func) {
- NAMESPACE[pkg_name][sub_name] = func;
+ p5pkg[pkg_name][sub_name] = func;
}
function p5set_local(namespace, name, sigil) {
@@ -230,7 +230,7 @@ if (isNode) {
// v8
return read(filename);
}
- NAMESPACE.CORE.die(["Perlito5::IO::slurp() not implemented"]);
+ p5pkg.CORE.die(["Perlito5::IO::slurp() not implemented"]);
});
}
@@ -449,38 +449,38 @@ p5sort = function(namespace, func, args) {
perl5_to_js = function( source, namespace, var_env_js ) {
// say( "source: [" + source + "]" );
- var strict_old = NAMESPACE["Perlito5"].v_STRICT;
- var var_env_js_old = NAMESPACE["Perlito5"].v_VAR;
- NAMESPACE["Perlito5"].v_VAR = var_env_js;
+ var strict_old = p5pkg["Perlito5"].v_STRICT;
+ var var_env_js_old = p5pkg["Perlito5"].v_VAR;
+ p5pkg["Perlito5"].v_VAR = var_env_js;
- var namespace_old = NAMESPACE["Perlito5"].v_PKG_NAME;
- NAMESPACE["Perlito5"].v_PKG_NAME = namespace;
+ var namespace_old = p5pkg["Perlito5"].v_PKG_NAME;
+ p5pkg["Perlito5"].v_PKG_NAME = namespace;
- match = p5call(NAMESPACE["Perlito5::Grammar"], "exp_stmts", [source, 0]);
+ match = p5call(p5pkg["Perlito5::Grammar"], "exp_stmts", [source, 0]);
if ( !match || match._hash_.to != source.length ) {
CORE.die(["Syntax error in eval near pos ", match._hash_.to]);
}
- ast = NAMESPACE.CORE.bless([
+ ast = p5pkg.CORE.bless([
new p5HashRef({
- block: NAMESPACE.CORE.bless([
+ block: p5pkg.CORE.bless([
new p5HashRef({
stmts: p5call(match, "flat", []),
}),
- NAMESPACE["Perlito5::AST::Lit::Block"]
+ p5pkg["Perlito5::AST::Lit::Block"]
]),
}),
- NAMESPACE["Perlito5::AST::Do"]
+ p5pkg["Perlito5::AST::Do"]
]);
// CORE.say( "ast: [" + perl(ast) + "]" );
js_code = p5call(ast, "emit_javascript", []);
// CORE.say( "js-source: [" + js_code + "]" );
- NAMESPACE["Perlito5"].v_PKG_NAME = namespace_old;
- NAMESPACE["Perlito5"].v_VAR = var_env_js_old;
- NAMESPACE["Perlito5"].v_STRICT = strict_old;
+ p5pkg["Perlito5"].v_PKG_NAME = namespace_old;
+ p5pkg["Perlito5"].v_VAR = var_env_js_old;
+ p5pkg["Perlito5"].v_STRICT = strict_old;
return js_code;
}
@@ -503,7 +503,7 @@ perl5_to_js = function( source, namespace, var_env_js ) {
//
// See http://www.perl.com/perl/misc/Artistic.html
-var CORE = NAMESPACE.CORE;
+var CORE = p5pkg.CORE;
var isNode = typeof require != "undefined";
if (isNode) {
@@ -536,7 +536,7 @@ CORE.die = function(List__) {
s = s + List__[i];
// s = s + p5str(List__[i]);
}
- NAMESPACE["main"]["v_@"] = "Died: " + s;
+ p5pkg["main"]["v_@"] = "Died: " + s;
throw(new p5_error("Died: " + s));
};
@@ -558,10 +558,10 @@ CORE.bless = function(List__) {
o._class_ = pkg_name;
return o;
}
- if (!NAMESPACE.hasOwnProperty(pkg_name)) {
+ if (!p5pkg.hasOwnProperty(pkg_name)) {
p5make_package(pkg_name);
}
- o._class_ = NAMESPACE[pkg_name];
+ o._class_ = p5pkg[pkg_name];
return o;
};
@@ -850,7 +850,7 @@ CORE.prototype = function(List__, data) {
var name = List__[0];
// TODO - fully qualify "name" using information from "data"
// XXX - lookup in CORE::GLOBAL?
- NAMESPACE["Perlito5"].v_PROTO._hash_[name] || NAMESPACE["Perlito5"].v_CORE_PROTO._hash_[name]
+ p5pkg["Perlito5"].v_PROTO._hash_[name] || p5pkg["Perlito5"].v_CORE_PROTO._hash_[name]
};
//
@@ -899,16 +899,16 @@ if (isNode) {
}
var p5want = null;
-var p5100 = NAMESPACE['main'];
+var p5100 = p5pkg['main'];
(function () {
var p5101 = p5make_package("Perlito5");
(function () {
var p5102 = p5make_package("Perlito5::strict");
p5make_sub("Perlito5::strict", "import", function (List__, p5want) {
- return (p5context([(NAMESPACE["Perlito5"]["v_STRICT"] = (1))], p5want));
+ return (p5context([(p5pkg["Perlito5"]["v_STRICT"] = (1))], p5want));
});
p5make_sub("Perlito5::strict", "unimport", function (List__, p5want) {
- return (p5context([(NAMESPACE["Perlito5"]["v_STRICT"] = (0))], p5want));
+ return (p5context([(p5pkg["Perlito5"]["v_STRICT"] = (0))], p5want));
});
1;
})()
@@ -918,10 +918,10 @@ var p5100 = NAMESPACE['main'];
(function () {
var p5103 = p5make_package("Perlito5::warnings");
p5make_sub("Perlito5::warnings", "import", function (List__, p5want) {
- return (p5context([(NAMESPACE["Perlito5"]["v_WARNINGS"] = (1))], p5want));
+ return (p5context([(p5pkg["Perlito5"]["v_WARNINGS"] = (1))], p5want));
});
p5make_sub("Perlito5::warnings", "unimport", function (List__, p5want) {
- return (p5context([(NAMESPACE["Perlito5"]["v_WARNINGS"] = (0))], p5want));
+ return (p5context([(p5pkg["Perlito5"]["v_WARNINGS"] = (0))], p5want));
});
1;
})()
@@ -1245,19 +1245,19 @@ var p5100 = NAMESPACE['main'];
(v_tab1 = ((p5str(v_tab) + ' ')));
if ( (p5str(v_ref) == 'ARRAY') ) {
throw(p5context([('[' + String.fromCharCode(10) + p5124.join(['', p5list_to_a(p5map(p5124, function (p5want) {
- return (p5context([(p5str(v_tab1) + p5str(p5124.Dumper(p5list_to_a(NAMESPACE["Perlito5::Dumper"]["v__"], (p5num(v_level) + 1)), 0)) + ',' + String.fromCharCode(10))], p5want));
+ return (p5context([(p5str(v_tab1) + p5str(p5124.Dumper(p5list_to_a(p5pkg["Perlito5::Dumper"]["v__"], (p5num(v_level) + 1)), 0)) + ',' + String.fromCharCode(10))], p5want));
}, p5list_to_a((v_obj || (v_obj = new p5ArrayRef([])))._array_)))], 0) + p5str(v_tab) + ']')], p5want));
}
else {
if ( (p5str(v_ref) == 'HASH') ) {
throw(p5context([('{' + String.fromCharCode(10) + p5124.join(['', p5list_to_a(p5map(p5124, function (p5want) {
- return (p5context([(p5str(v_tab1) + (String.fromCharCode(39) + p5str(NAMESPACE["Perlito5::Dumper"]["v__"]) + String.fromCharCode(39) + ' => ') + p5str(p5124.Dumper(p5list_to_a((v_obj || (v_obj = new p5HashRef({})))._hash_[NAMESPACE["Perlito5::Dumper"]["v__"]], (p5num(v_level) + 1)), 0)) + ',' + String.fromCharCode(10))], p5want));
+ return (p5context([(p5str(v_tab1) + (String.fromCharCode(39) + p5str(p5pkg["Perlito5::Dumper"]["v__"]) + String.fromCharCode(39) + ' => ') + p5str(p5124.Dumper(p5list_to_a((v_obj || (v_obj = new p5HashRef({})))._hash_[p5pkg["Perlito5::Dumper"]["v__"]], (p5num(v_level) + 1)), 0)) + ',' + String.fromCharCode(10))], p5want));
}, p5list_to_a(p5sort(p5124, null, p5list_to_a(p5124.keys([(v_obj)._hash_], 1))))))], 0) + p5str(v_tab) + '}')], p5want));
}
else {
if ( p5bool(v_ref) ) {
throw(p5context([('bless({' + String.fromCharCode(10) + p5124.join(['', p5list_to_a(p5map(p5124, function (p5want) {
- return (p5context([(p5str(v_tab1) + (String.fromCharCode(39) + p5str(NAMESPACE["Perlito5::Dumper"]["v__"]) + String.fromCharCode(39) + ' => ') + p5str(p5124.Dumper(p5list_to_a((v_obj || (v_obj = new p5HashRef({})))._hash_[NAMESPACE["Perlito5::Dumper"]["v__"]], (p5num(v_level) + 1)), 0)) + ',' + String.fromCharCode(10))], p5want));
+ return (p5context([(p5str(v_tab1) + (String.fromCharCode(39) + p5str(p5pkg["Perlito5::Dumper"]["v__"]) + String.fromCharCode(39) + ' => ') + p5str(p5124.Dumper(p5list_to_a((v_obj || (v_obj = new p5HashRef({})))._hash_[p5pkg["Perlito5::Dumper"]["v__"]], (p5num(v_level) + 1)), 0)) + ',' + String.fromCharCode(10))], p5want));
}, p5list_to_a(p5sort(p5124, null, p5list_to_a(p5124.keys([(v_obj)._hash_], 1))))))], 0) + p5str(v_tab) + ('}, ' + String.fromCharCode(39) + p5str(v_ref) + String.fromCharCode(39) + ')'))], p5want));
};
};
@@ -1289,7 +1289,7 @@ var p5100 = NAMESPACE['main'];
(v_label_count = (100));
var Hash_label = {};
p5make_sub("Perlito5::Javascript", "pkg", function (List__, p5want) {
- return (p5context([(Hash_label[NAMESPACE["Perlito5"]["v_PKG_NAME"]] = p5or(Hash_label[NAMESPACE["Perlito5"]["v_PKG_NAME"]], function () { return ('p5' + p5str((v_label_count)++)) }))], p5want));
+ return (p5context([(Hash_label[p5pkg["Perlito5"]["v_PKG_NAME"]] = p5or(Hash_label[p5pkg["Perlito5"]["v_PKG_NAME"]], function () { return ('p5' + p5str((v_label_count)++)) }))], p5want));
});
p5make_sub("Perlito5::Javascript", "get_label", function (List__, p5want) {
return (p5context([(v_label_count)++], p5want));
@@ -1299,23 +1299,23 @@ var p5100 = NAMESPACE['main'];
(v_level = (p5125.shift([List__])));
return (p5context([p5str_replicate(String.fromCharCode(9), v_level)], p5want));
});
- // our NAMESPACE["Perlito5::Javascript"]["Hash_op_prefix_js_str"]
- (NAMESPACE["Perlito5::Javascript"]["Hash_op_prefix_js_str"] = p5a_to_h(p5list_to_a('prefix:<-A>', 'p5atime', 'prefix:<-M>', 'p5mtime', 'prefix:<-C>', 'p5ctime', 'prefix:<-s>', 'p5size', 'prefix:<-f>', 'p5is_file', 'prefix:<-d>', 'p5is_directory')));
- // our NAMESPACE["Perlito5::Javascript"]["Hash_op_infix_js_str"]
- (NAMESPACE["Perlito5::Javascript"]["Hash_op_infix_js_str"] = p5a_to_h(p5list_to_a('infix:', ' == ', 'infix:', ' != ', 'infix:', ' <= ', 'infix:', ' >= ')));
- // our NAMESPACE["Perlito5::Javascript"]["Hash_op_infix_js_num"]
- (NAMESPACE["Perlito5::Javascript"]["Hash_op_infix_js_num"] = p5a_to_h(p5list_to_a('infix:<==>', ' == ', 'infix:', ' != ', 'infix:<+>', ' + ', 'infix:<->', ' - ', 'infix:<*>', ' * ', 'infix:>', ' / ', 'infix:<%>', ' % ', 'infix:<>>', ' > ', 'infix:<<>', ' < ', 'infix:<>=>', ' >= ', 'infix:<<=>', ' <= ', 'infix:<&>', ' & ', 'infix:<|>', ' | ', 'infix:<^>', ' ^ ', 'infix:<>>>', ' >>> ', 'infix:<<<>', ' << ')));
- // our NAMESPACE["Perlito5::Javascript"]["Hash_op_to_bool"]
- (NAMESPACE["Perlito5::Javascript"]["Hash_op_to_bool"] = p5a_to_h(p5list_to_a(p5map(p5125, function (p5want) {
- return (p5context([(p5context([NAMESPACE["Perlito5::Javascript"]["v__"], 1], p5want))], p5want));
+ // our p5pkg["Perlito5::Javascript"]["Hash_op_prefix_js_str"]
+ (p5pkg["Perlito5::Javascript"]["Hash_op_prefix_js_str"] = p5a_to_h(p5list_to_a('prefix:<-A>', 'p5atime', 'prefix:<-M>', 'p5mtime', 'prefix:<-C>', 'p5ctime', 'prefix:<-s>', 'p5size', 'prefix:<-f>', 'p5is_file', 'prefix:<-d>', 'p5is_directory')));
+ // our p5pkg["Perlito5::Javascript"]["Hash_op_infix_js_str"]
+ (p5pkg["Perlito5::Javascript"]["Hash_op_infix_js_str"] = p5a_to_h(p5list_to_a('infix:', ' == ', 'infix:', ' != ', 'infix:', ' <= ', 'infix:', ' >= ')));
+ // our p5pkg["Perlito5::Javascript"]["Hash_op_infix_js_num"]
+ (p5pkg["Perlito5::Javascript"]["Hash_op_infix_js_num"] = p5a_to_h(p5list_to_a('infix:<==>', ' == ', 'infix:', ' != ', 'infix:<+>', ' + ', 'infix:<->', ' - ', 'infix:<*>', ' * ', 'infix:>', ' / ', 'infix:<%>', ' % ', 'infix:<>>', ' > ', 'infix:<<>', ' < ', 'infix:<>=>', ' >= ', 'infix:<<=>', ' <= ', 'infix:<&>', ' & ', 'infix:<|>', ' | ', 'infix:<^>', ' ^ ', 'infix:<>>>', ' >>> ', 'infix:<<<>', ' << ')));
+ // our p5pkg["Perlito5::Javascript"]["Hash_op_to_bool"]
+ (p5pkg["Perlito5::Javascript"]["Hash_op_to_bool"] = p5a_to_h(p5list_to_a(p5map(p5125, function (p5want) {
+ return (p5context([(p5context([p5pkg["Perlito5::Javascript"]["v__"], 1], p5want))], p5want));
}, p5list_to_a('prefix:', 'infix:', 'infix:<==>', 'infix:<<=>', 'infix:<>=>', 'infix:<>>', 'infix:<<>', 'infix:', 'infix:', 'infix:', 'infix:', 'exists')))));
- // our NAMESPACE["Perlito5::Javascript"]["Hash_op_to_str"]
- (NAMESPACE["Perlito5::Javascript"]["Hash_op_to_str"] = p5a_to_h(p5list_to_a(p5map(p5125, function (p5want) {
- return (p5context([(p5context([NAMESPACE["Perlito5::Javascript"]["v__"], 1], p5want))], p5want));
+ // our p5pkg["Perlito5::Javascript"]["Hash_op_to_str"]
+ (p5pkg["Perlito5::Javascript"]["Hash_op_to_str"] = p5a_to_h(p5list_to_a(p5map(p5125, function (p5want) {
+ return (p5context([(p5context([p5pkg["Perlito5::Javascript"]["v__"], 1], p5want))], p5want));
}, p5list_to_a('substr', 'join', 'list:<.>')))));
- // our NAMESPACE["Perlito5::Javascript"]["Hash_op_to_num"]
- (NAMESPACE["Perlito5::Javascript"]["Hash_op_to_num"] = p5a_to_h(p5list_to_a(p5map(p5125, function (p5want) {
- return (p5context([(p5context([NAMESPACE["Perlito5::Javascript"]["v__"], 1], p5want))], p5want));
+ // our p5pkg["Perlito5::Javascript"]["Hash_op_to_num"]
+ (p5pkg["Perlito5::Javascript"]["Hash_op_to_num"] = p5a_to_h(p5list_to_a(p5map(p5125, function (p5want) {
+ return (p5context([(p5context([p5pkg["Perlito5::Javascript"]["v__"], 1], p5want))], p5want));
}, p5list_to_a('length', 'index')))));
var Hash_safe_char = {};
(Hash_safe_char = p5a_to_h(p5list_to_a(' ', 1, '!', 1, '"', 1, '#', 1, '$', 1, '%', 1, '&', 1, '(', 1, ')', 1, '*', 1, '+', 1, ',', 1, '-', 1, '.', 1, '/', 1, ':', 1, ';', 1, '<', 1, '=', 1, '>', 1, '?', 1, '@', 1, '[', 1, ']', 1, '^', 1, '_', 1, '`', 1, '{', 1, '|', 1, '}', 1, '~', 1)));
@@ -1368,7 +1368,7 @@ var p5100 = NAMESPACE['main'];
if ( (((p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Apply'), 0)) && (p5str(p5call(v_cond, "code", [], 0)) == 'circumfix:<( )>')) && p5bool((v_cond || (v_cond = new p5HashRef({})))._hash_['arguments'])) && p5bool(((v_cond || (v_cond = new p5HashRef({})))._hash_['arguments'] || ((v_cond || (v_cond = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)) ) {
throw(p5context([p5125.to_str(p5list_to_a(((v_cond || (v_cond = new p5HashRef({})))._hash_['arguments'] || ((v_cond || (v_cond = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]), p5want)], p5want));
};
- if ( (p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Val::Buf'), 0)) || (p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Apply'), 0)) && (NAMESPACE["Perlito5::Javascript"]["Hash_op_to_str"]).hasOwnProperty(p5call(v_cond, "code", [], p5want)))) ) {
+ if ( (p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Val::Buf'), 0)) || (p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Apply'), 0)) && (p5pkg["Perlito5::Javascript"]["Hash_op_to_str"]).hasOwnProperty(p5call(v_cond, "code", [], p5want)))) ) {
throw(p5context([p5call(v_cond, "emit_javascript", p5list_to_a(v_level, v_wantarray), p5want)], p5want))
}
@@ -1393,7 +1393,7 @@ var p5100 = NAMESPACE['main'];
(v_level = (p5125.shift([List__])));
var v_wantarray = null;
(v_wantarray = ('scalar'));
- if ( ((p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Val::Int'), 0)) || p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Val::Num'), 0))) || (p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Apply'), 0)) && (NAMESPACE["Perlito5::Javascript"]["Hash_op_to_num"]).hasOwnProperty(p5call(v_cond, "code", [], p5want)))) ) {
+ if ( ((p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Val::Int'), 0)) || p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Val::Num'), 0))) || (p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Apply'), 0)) && (p5pkg["Perlito5::Javascript"]["Hash_op_to_num"]).hasOwnProperty(p5call(v_cond, "code", [], p5want)))) ) {
throw(p5context([p5call(v_cond, "emit_javascript", p5list_to_a(v_level, v_wantarray), p5want)], p5want))
}
@@ -1427,7 +1427,7 @@ var p5100 = NAMESPACE['main'];
if ( (p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Apply'), 0)) && ((p5str(p5call(v_cond, "code", [], 0)) == 'infix:<||>') || (p5str(p5call(v_cond, "code", [], 0)) == 'infix:'))) ) {
throw(p5context([('(' + p5str(p5125.to_bool(p5list_to_a(((v_cond || (v_cond = new p5HashRef({})))._hash_['arguments'] || ((v_cond || (v_cond = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]), 0)) + ' || ' + p5str(p5125.to_bool(p5list_to_a(((v_cond || (v_cond = new p5HashRef({})))._hash_['arguments'] || ((v_cond || (v_cond = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[1]), 0)) + ')')], p5want));
};
- if ( ((p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Val::Int'), 0)) || p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Val::Num'), 0))) || (p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Apply'), 0)) && (NAMESPACE["Perlito5::Javascript"]["Hash_op_to_bool"]).hasOwnProperty(p5call(v_cond, "code", [], p5want)))) ) {
+ if ( ((p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Val::Int'), 0)) || p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Val::Num'), 0))) || (p5bool(p5call(v_cond, "isa", p5list_to_a('Perlito5::AST::Apply'), 0)) && (p5pkg["Perlito5::Javascript"]["Hash_op_to_bool"]).hasOwnProperty(p5call(v_cond, "code", [], p5want)))) ) {
throw(p5context([p5call(v_cond, "emit_javascript", p5list_to_a(v_level, v_wantarray), p5want)], p5want))
}
@@ -1452,7 +1452,7 @@ var p5100 = NAMESPACE['main'];
var v_wantarray = null;
(v_wantarray = ('list'));
return (p5context([( p5bool((v_items || (v_items = new p5ArrayRef([])))._array_) ? ('p5list_to_a(' + p5125.join([', ', p5list_to_a(p5map(p5125, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Javascript"]["v__"], "emit_javascript", p5list_to_a(v_level, v_wantarray), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Javascript"]["v__"], "emit_javascript", p5list_to_a(v_level, v_wantarray), p5want)], p5want));
}, p5list_to_a((v_items || (v_items = new p5ArrayRef([])))._array_)))], 0) + ')') : '[]')], p5want));
});
p5make_sub("Perlito5::Javascript", "to_list_preprocess", function (List__, p5want) {
@@ -1477,7 +1477,7 @@ var p5100 = NAMESPACE['main'];
var v_wantarray = null;
(v_wantarray = ('scalar'));
return (p5context([( p5bool((v_items || (v_items = new p5ArrayRef([])))._array_) ? ('(' + p5125.join([', ', p5list_to_a(p5map(p5125, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Javascript"]["v__"], "emit_javascript", p5list_to_a(v_level, v_wantarray), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Javascript"]["v__"], "emit_javascript", p5list_to_a(v_level, v_wantarray), p5want)], p5want));
}, p5list_to_a((v_items || (v_items = new p5ArrayRef([])))._array_)))], 0) + ')') : 'null')], p5want));
});
p5make_sub("Perlito5::Javascript", "to_scalar_preprocess", function (List__, p5want) {
@@ -1502,7 +1502,7 @@ var p5100 = NAMESPACE['main'];
var v_wantarray = null;
(v_wantarray = ('runtime'));
return (p5context([('p5context(' + '[' + p5125.join([', ', p5list_to_a(p5map(p5125, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Javascript"]["v__"], "emit_javascript", p5list_to_a(v_level, v_wantarray), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Javascript"]["v__"], "emit_javascript", p5list_to_a(v_level, v_wantarray), p5want)], p5want));
}, p5list_to_a((v_items || (v_items = new p5ArrayRef([])))._array_)))], 0) + ']' + ', p5want)')], p5want));
});
};
@@ -1563,12 +1563,12 @@ var p5100 = NAMESPACE['main'];
(v_level = (p5126.shift([List__])));
var List_block = [];
p5for(p5126, function () {
- if ( p5bool((NAMESPACE["Perlito5::Javascript::LexicalBlock"]["v__"] != null)) ) {
- p5126.push([List_block, p5list_to_a(NAMESPACE["Perlito5::Javascript::LexicalBlock"]["v__"])], null);
+ if ( p5bool((p5pkg["Perlito5::Javascript::LexicalBlock"]["v__"] != null)) ) {
+ p5126.push([List_block, p5list_to_a(p5pkg["Perlito5::Javascript::LexicalBlock"]["v__"])], null);
};
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['block'] || ((v_self || (v_self = new p5HashRef({})))._hash_['block'] = new p5ArrayRef([])))._array_));
if ( !( p5bool(List_block.length)) ) {
- throw(p5context([(p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + 'null;')], p5want));
+ throw(p5context([(p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + 'null;')], p5want));
};
var v_out = null;
(v_out = (''));
@@ -1578,45 +1578,45 @@ var p5100 = NAMESPACE['main'];
var v_create_context = null;
(v_create_context = (p5and((v_self || (v_self = new p5HashRef({})))._hash_['create_context'], function () { return p5call(v_self, "has_decl", p5list_to_a('my'), 0) })));
var v_outer_pkg = null;
- (v_outer_pkg = (NAMESPACE["Perlito5"]["v_PKG_NAME"]));
+ (v_outer_pkg = (p5pkg["Perlito5"]["v_PKG_NAME"]));
var v_outer_throw = null;
- (v_outer_throw = (NAMESPACE["Perlito5"]["v_THROW"]));
- p5126.unshift([(NAMESPACE["Perlito5"]["v_VAR"] || (NAMESPACE["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_, p5list_to_a((new p5HashRef(p5a_to_h([]))))], null);
+ (v_outer_throw = (p5pkg["Perlito5"]["v_THROW"]));
+ p5126.unshift([(p5pkg["Perlito5"]["v_VAR"] || (p5pkg["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_, p5list_to_a((new p5HashRef(p5a_to_h([]))))], null);
if ( p5bool((v_self || (v_self = new p5HashRef({})))._hash_['top_level']) ) {
- (NAMESPACE["Perlito5"]["v_THROW"] = (0));
+ (p5pkg["Perlito5"]["v_THROW"] = (0));
};
if ( p5bool(v_has_local) ) {
- (v_out = ((p5str(v_out) + (p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + 'var local_idx = LOCAL.length;' + String.fromCharCode(10)))));
+ (v_out = ((p5str(v_out) + (p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + 'var local_idx = LOCAL.length;' + String.fromCharCode(10)))));
};
if ( p5bool((v_self || (v_self = new p5HashRef({})))._hash_['top_level']) ) {
(v_level)++;
};
if ( p5bool(v_create_context) ) {
- (v_out = ((p5str(v_out) + (p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '(function () {' + String.fromCharCode(10)))));
+ (v_out = ((p5str(v_out) + (p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '(function () {' + String.fromCharCode(10)))));
(v_level)++;
};
var v_tab = null;
- (v_tab = (NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)));
+ (v_tab = (p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)));
var v_last_statement = null;
if ( p5bool((v_self || (v_self = new p5HashRef({})))._hash_['needs_return']) ) {
(v_last_statement = (p5126.pop([List_block], 0)));
};
p5for_lex(function (v_decl) {
if ( ((p5str(p5126.ref([v_decl], 0)) == 'Perlito5::AST::Apply') && (p5str(p5call(v_decl, "code", [], 0)) == 'package')) ) {
- (NAMESPACE["Perlito5"]["v_PKG_NAME"] = ((v_decl || (v_decl = new p5HashRef({})))._hash_['namespace']));
- (((NAMESPACE["Perlito5"]["v_VAR"] || (NAMESPACE["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] || ((NAMESPACE["Perlito5"]["v_VAR"] || (NAMESPACE["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] = new p5HashRef({})))._hash_['$_'] = (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', NAMESPACE["Perlito5"]["v_PKG_NAME"])))));
- (((NAMESPACE["Perlito5"]["v_VAR"] || (NAMESPACE["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] || ((NAMESPACE["Perlito5"]["v_VAR"] || (NAMESPACE["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] = new p5HashRef({})))._hash_['$a'] = (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', NAMESPACE["Perlito5"]["v_PKG_NAME"])))));
- (((NAMESPACE["Perlito5"]["v_VAR"] || (NAMESPACE["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] || ((NAMESPACE["Perlito5"]["v_VAR"] || (NAMESPACE["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] = new p5HashRef({})))._hash_['$b'] = (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', NAMESPACE["Perlito5"]["v_PKG_NAME"])))));
+ (p5pkg["Perlito5"]["v_PKG_NAME"] = ((v_decl || (v_decl = new p5HashRef({})))._hash_['namespace']));
+ (((p5pkg["Perlito5"]["v_VAR"] || (p5pkg["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] || ((p5pkg["Perlito5"]["v_VAR"] || (p5pkg["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] = new p5HashRef({})))._hash_['$_'] = (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', p5pkg["Perlito5"]["v_PKG_NAME"])))));
+ (((p5pkg["Perlito5"]["v_VAR"] || (p5pkg["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] || ((p5pkg["Perlito5"]["v_VAR"] || (p5pkg["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] = new p5HashRef({})))._hash_['$a'] = (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', p5pkg["Perlito5"]["v_PKG_NAME"])))));
+ (((p5pkg["Perlito5"]["v_VAR"] || (p5pkg["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] || ((p5pkg["Perlito5"]["v_VAR"] || (p5pkg["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] = new p5HashRef({})))._hash_['$b'] = (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', p5pkg["Perlito5"]["v_PKG_NAME"])))));
};
if ( p5bool(p5call(v_decl, "isa", p5list_to_a('Perlito5::AST::Decl'), 0)) ) {
p5126.push([List_str, p5list_to_a(p5call(v_decl, "emit_javascript_init", [], 1))], null);
};
if ( (p5bool(p5call(v_decl, "isa", p5list_to_a('Perlito5::AST::Apply'), 0)) && (p5str(p5call(v_decl, "code", [], 0)) == 'my')) ) {
p5for(p5126, function () {
- if ( p5bool(p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"]["v__"], "isa", p5list_to_a('Perlito5::AST::Var'), 0)) ) {
+ if ( p5bool(p5call(p5pkg["Perlito5::Javascript::LexicalBlock"]["v__"], "isa", p5list_to_a('Perlito5::AST::Var'), 0)) ) {
(function () {
var v_d = null;
- (v_d = (p5call(NAMESPACE["Perlito5::AST::Decl"], "new", p5list_to_a('decl', p5call(v_decl, "code", [], 1), 'var', NAMESPACE["Perlito5::Javascript::LexicalBlock"]["v__"]), 0)));
+ (v_d = (p5call(p5pkg["Perlito5::AST::Decl"], "new", p5list_to_a('decl', p5call(v_decl, "code", [], 1), 'var', p5pkg["Perlito5::Javascript::LexicalBlock"]["v__"]), 0)));
p5126.push([List_str, p5list_to_a(p5call(v_d, "emit_javascript_init", [], 1))], null);
})();
};
@@ -1631,10 +1631,10 @@ var p5100 = NAMESPACE['main'];
};
if ( (p5bool(p5call(v_arg, "isa", p5list_to_a('Perlito5::AST::Apply'), 0)) && (p5str(p5call(v_arg, "code", [], 0)) == 'my')) ) {
p5for(p5126, function () {
- if ( p5bool(p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"]["v__"], "isa", p5list_to_a('Perlito5::AST::Var'), 0)) ) {
+ if ( p5bool(p5call(p5pkg["Perlito5::Javascript::LexicalBlock"]["v__"], "isa", p5list_to_a('Perlito5::AST::Var'), 0)) ) {
(function () {
var v_d = null;
- (v_d = (p5call(NAMESPACE["Perlito5::AST::Decl"], "new", p5list_to_a('decl', p5call(v_arg, "code", [], 1), 'var', NAMESPACE["Perlito5::Javascript::LexicalBlock"]["v__"]), 0)));
+ (v_d = (p5call(p5pkg["Perlito5::AST::Decl"], "new", p5list_to_a('decl', p5call(v_arg, "code", [], 1), 'var', p5pkg["Perlito5::Javascript::LexicalBlock"]["v__"]), 0)));
p5126.push([List_str, p5list_to_a(p5call(v_d, "emit_javascript_init", [], 1))], null);
})();
};
@@ -1666,11 +1666,11 @@ var p5100 = NAMESPACE['main'];
(v_body = (p5call(v_last_statement, "body", [], 0)));
var v_otherwise = null;
(v_otherwise = (p5call(v_last_statement, "otherwise", [], 0)));
- (v_body = (p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call(v_body, "stmts", [], 1), 'needs_return', 1), 0)));
- p5126.push([List_str, p5list_to_a(('if ( ' + p5str(NAMESPACE["Perlito5::Javascript"].to_bool(p5list_to_a(v_cond), 0)) + ' ) {' + String.fromCharCode(10) + p5str(p5call(v_body, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}'))], null);
+ (v_body = (p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call(v_body, "stmts", [], 1), 'needs_return', 1), 0)));
+ p5126.push([List_str, p5list_to_a(('if ( ' + p5str(p5pkg["Perlito5::Javascript"].to_bool(p5list_to_a(v_cond), 0)) + ' ) {' + String.fromCharCode(10) + p5str(p5call(v_body, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}'))], null);
if ( p5bool(v_otherwise) ) {
- (v_otherwise = (p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call(v_otherwise, "stmts", [], 1), 'needs_return', 1), 0)));
- p5126.push([List_str, p5list_to_a((String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + 'else {' + String.fromCharCode(10) + p5str(p5call(v_otherwise, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}'))], null);
+ (v_otherwise = (p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call(v_otherwise, "stmts", [], 1), 'needs_return', 1), 0)));
+ p5126.push([List_str, p5list_to_a((String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + 'else {' + String.fromCharCode(10) + p5str(p5call(v_otherwise, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}'))], null);
};
})();
}
@@ -1678,8 +1678,8 @@ var p5100 = NAMESPACE['main'];
if ( p5bool(p5call(v_last_statement, "isa", p5list_to_a('Perlito5::AST::Lit::Block'), 0)) ) {
(function () {
var v_body = null;
- (v_body = (p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', (v_last_statement || (v_last_statement = new p5HashRef({})))._hash_['stmts'], 'needs_return', 1), 0)));
- p5126.push([List_str, p5list_to_a(('for (var i_ = 0; i_ < 1 ; i_++) {' + String.fromCharCode(10) + p5str(p5call(v_body, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}'))], null);
+ (v_body = (p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', (v_last_statement || (v_last_statement = new p5HashRef({})))._hash_['stmts'], 'needs_return', 1), 0)));
+ p5126.push([List_str, p5list_to_a(('for (var i_ = 0; i_ < 1 ; i_++) {' + String.fromCharCode(10) + p5str(p5call(v_body, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}'))], null);
})();
}
else {
@@ -1688,10 +1688,10 @@ var p5100 = NAMESPACE['main'];
}
else {
if ( p5bool(v_has_local) ) {
- p5126.push([List_str, p5list_to_a(('return p5cleanup_local(local_idx, (' + p5str(NAMESPACE["Perlito5::Javascript"].to_runtime_context(p5list_to_a((new p5ArrayRef(p5list_to_a(v_last_statement)))), 0)) + '));'))], null);
+ p5126.push([List_str, p5list_to_a(('return p5cleanup_local(local_idx, (' + p5str(p5pkg["Perlito5::Javascript"].to_runtime_context(p5list_to_a((new p5ArrayRef(p5list_to_a(v_last_statement)))), 0)) + '));'))], null);
}
else {
- p5126.push([List_str, p5list_to_a(('return (' + p5str(NAMESPACE["Perlito5::Javascript"].to_runtime_context(p5list_to_a((new p5ArrayRef(p5list_to_a(v_last_statement)))), 0)) + ');'))], null);
+ p5126.push([List_str, p5list_to_a(('return (' + p5str(p5pkg["Perlito5::Javascript"].to_runtime_context(p5list_to_a((new p5ArrayRef(p5list_to_a(v_last_statement)))), 0)) + ');'))], null);
};
};
};
@@ -1704,22 +1704,22 @@ var p5100 = NAMESPACE['main'];
(v_level)--;
p5126.push([List_str, p5list_to_a('})();')], null);
};
- if ( (p5bool((v_self || (v_self = new p5HashRef({})))._hash_['top_level']) && p5bool(NAMESPACE["Perlito5"]["v_THROW"])) ) {
+ if ( (p5bool((v_self || (v_self = new p5HashRef({})))._hash_['top_level']) && p5bool(p5pkg["Perlito5"]["v_THROW"])) ) {
(v_level)--;
- (v_out = ((p5str(v_out) + (p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + 'try {' + String.fromCharCode(10) + p5126.join([String.fromCharCode(10), p5list_to_a(p5map(p5126, function (p5want) {
- return (p5context([(p5str(v_tab) + p5str(NAMESPACE["Perlito5::Javascript::LexicalBlock"]["v__"]))], p5want));
-}, p5list_to_a(List_str)))], 0) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}' + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + 'catch(err) {' + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a((p5num(v_level) + 1)), 0)) + 'if ( err instanceof Error ) {' + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a((p5num(v_level) + 2)), 0)) + 'throw(err);' + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a((p5num(v_level) + 1)), 0)) + '}' + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a((p5num(v_level) + 1)), 0)) + 'else {' + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a((p5num(v_level) + 2)), 0)) + p5str(( p5bool(v_has_local) ? 'return p5cleanup_local(local_idx, err)' : 'return(err)')) + ';' + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a((p5num(v_level) + 1)), 0)) + '}' + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}'))));
+ (v_out = ((p5str(v_out) + (p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + 'try {' + String.fromCharCode(10) + p5126.join([String.fromCharCode(10), p5list_to_a(p5map(p5126, function (p5want) {
+ return (p5context([(p5str(v_tab) + p5str(p5pkg["Perlito5::Javascript::LexicalBlock"]["v__"]))], p5want));
+}, p5list_to_a(List_str)))], 0) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}' + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + 'catch(err) {' + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a((p5num(v_level) + 1)), 0)) + 'if ( err instanceof Error ) {' + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a((p5num(v_level) + 2)), 0)) + 'throw(err);' + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a((p5num(v_level) + 1)), 0)) + '}' + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a((p5num(v_level) + 1)), 0)) + 'else {' + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a((p5num(v_level) + 2)), 0)) + p5str(( p5bool(v_has_local) ? 'return p5cleanup_local(local_idx, err)' : 'return(err)')) + ';' + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a((p5num(v_level) + 1)), 0)) + '}' + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}'))));
}
else {
(v_out = ((p5str(v_out) + p5126.join([String.fromCharCode(10), p5list_to_a(p5map(p5126, function (p5want) {
- return (p5context([(p5str(v_tab) + p5str(NAMESPACE["Perlito5::Javascript::LexicalBlock"]["v__"]))], p5want));
+ return (p5context([(p5str(v_tab) + p5str(p5pkg["Perlito5::Javascript::LexicalBlock"]["v__"]))], p5want));
}, p5list_to_a(List_str)))], 0))));
};
- (NAMESPACE["Perlito5"]["v_PKG_NAME"] = (v_outer_pkg));
+ (p5pkg["Perlito5"]["v_PKG_NAME"] = (v_outer_pkg));
if ( p5bool((v_self || (v_self = new p5HashRef({})))._hash_['top_level']) ) {
- (NAMESPACE["Perlito5"]["v_THROW"] = (v_outer_throw));
+ (p5pkg["Perlito5"]["v_THROW"] = (v_outer_throw));
};
- p5126.shift([(NAMESPACE["Perlito5"]["v_VAR"] || (NAMESPACE["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_]);
+ p5126.shift([(p5pkg["Perlito5"]["v_VAR"] || (p5pkg["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_]);
return (p5context([v_out], p5want));
}
catch(err) {
@@ -1740,16 +1740,16 @@ var p5100 = NAMESPACE['main'];
var v_level = null;
(v_level = (List__[1]));
var v_str = null;
- (v_str = (('(function () {' + String.fromCharCode(10) + p5str(p5call(p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', (v_self || (v_self = new p5HashRef({})))._hash_['body'], 'needs_return', 0), p5want), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '})()' + String.fromCharCode(10))));
+ (v_str = (('(function () {' + String.fromCharCode(10) + p5str(p5call(p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', (v_self || (v_self = new p5HashRef({})))._hash_['body'], 'needs_return', 0), p5want), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '})()' + String.fromCharCode(10))));
return (p5context([v_str], p5want));
});
p5make_sub("Perlito5::AST::CompUnit", "emit_javascript_program", function (List__, p5want) {
var v_comp_units = null;
(v_comp_units = (p5105.shift([List__])));
- (NAMESPACE["Perlito5"]["v_PKG_NAME"] = ('main'));
+ (p5pkg["Perlito5"]["v_PKG_NAME"] = ('main'));
var v_str = null;
- (v_str = (('' + 'var p5want = null;' + String.fromCharCode(10) + 'var ' + p5str(NAMESPACE["Perlito5::Javascript"].pkg([], 0)) + ' = NAMESPACE[' + String.fromCharCode(39) + p5str(NAMESPACE["Perlito5"]["v_PKG_NAME"]) + String.fromCharCode(39) + '];' + String.fromCharCode(10))));
- (NAMESPACE["Perlito5"]["v_VAR"] = ((new p5ArrayRef(p5list_to_a((new p5HashRef(p5a_to_h(p5list_to_a('@_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))), '$@', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$^O', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '%ENV', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '%INC', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@#', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@ARGV', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@INC', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', NAMESPACE["Perlito5"]["v_PKG_NAME"])))), '$a', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', NAMESPACE["Perlito5"]["v_PKG_NAME"])))), '$b', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', NAMESPACE["Perlito5"]["v_PKG_NAME"])))))))))))));
+ (v_str = (('' + 'var p5want = null;' + String.fromCharCode(10) + 'var ' + p5str(p5pkg["Perlito5::Javascript"].pkg([], 0)) + ' = p5pkg[' + String.fromCharCode(39) + p5str(p5pkg["Perlito5"]["v_PKG_NAME"]) + String.fromCharCode(39) + '];' + String.fromCharCode(10))));
+ (p5pkg["Perlito5"]["v_VAR"] = ((new p5ArrayRef(p5list_to_a((new p5HashRef(p5a_to_h(p5list_to_a('@_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))), '$@', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$^O', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '%ENV', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '%INC', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@#', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@ARGV', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@INC', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', p5pkg["Perlito5"]["v_PKG_NAME"])))), '$a', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', p5pkg["Perlito5"]["v_PKG_NAME"])))), '$b', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', p5pkg["Perlito5"]["v_PKG_NAME"])))))))))))));
p5for_lex(function (v_comp_unit) {
(v_str = ((p5str(v_str) + p5str(p5call(v_comp_unit, "emit_javascript", [], 0)) + String.fromCharCode(10))));
}, p5list_to_a((v_comp_units || (v_comp_units = new p5ArrayRef([])))._array_));
@@ -1783,7 +1783,7 @@ var p5100 = NAMESPACE['main'];
(v_self = (p5108.shift([List__])));
var v_level = null;
(v_level = (p5108.shift([List__])));
- return (p5context([NAMESPACE["Perlito5::Javascript"].escape_string(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['buf']), p5want)], p5want));
+ return (p5context([p5pkg["Perlito5::Javascript"].escape_string(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['buf']), p5want)], p5want));
});
};
var p5109 = p5make_package("Perlito5::AST::Lit::Block");
@@ -1794,8 +1794,8 @@ var p5100 = NAMESPACE['main'];
var v_level = null;
(v_level = (p5109.shift([List__])));
var v_body = null;
- (v_body = (p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', (v_self || (v_self = new p5HashRef({})))._hash_['stmts'], 'needs_return', 0), 0)));
- return (p5context([('for (var i_ = 0; i_ < 1 ; i_++) {' + String.fromCharCode(10) + p5str(p5call(v_body, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}')], p5want));
+ (v_body = (p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', (v_self || (v_self = new p5HashRef({})))._hash_['stmts'], 'needs_return', 0), 0)));
+ return (p5context([('for (var i_ = 0; i_ < 1 ; i_++) {' + String.fromCharCode(10) + p5str(p5call(v_body, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}')], p5want));
});
};
var p5110 = p5make_package("Perlito5::AST::Index");
@@ -1809,7 +1809,7 @@ var p5100 = NAMESPACE['main'];
if ( (p5bool(p5call((v_self || (v_self = new p5HashRef({})))._hash_['obj'], "isa", p5list_to_a('Perlito5::AST::Var'), 0)) && (p5str(p5call((v_self || (v_self = new p5HashRef({})))._hash_['obj'], "sigil", [], 0)) == '$')) ) {
(function () {
var v_v = null;
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '@', 'namespace', p5call((v_self || (v_self = new p5HashRef({})))._hash_['obj'], "namespace", [], 1), 'name', p5call((v_self || (v_self = new p5HashRef({})))._hash_['obj'], "name", [], 1)), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '@', 'namespace', p5call((v_self || (v_self = new p5HashRef({})))._hash_['obj'], "namespace", [], 1), 'name', p5call((v_self || (v_self = new p5HashRef({})))._hash_['obj'], "name", [], 1)), 0)));
throw(p5context([(p5str(p5call(v_v, "emit_javascript", p5list_to_a(v_level), 0)) + '[' + p5str(p5call((v_self || (v_self = new p5HashRef({})))._hash_['index_exp'], "emit_javascript", [], 0)) + ']')], p5want));
})();
};
@@ -1836,7 +1836,7 @@ var p5100 = NAMESPACE['main'];
if ( (p5bool(p5call((v_self || (v_self = new p5HashRef({})))._hash_['obj'], "isa", p5list_to_a('Perlito5::AST::Var'), 0)) && (p5str(p5call((v_self || (v_self = new p5HashRef({})))._hash_['obj'], "sigil", [], 0)) == '$')) ) {
(function () {
var v_v = null;
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '%', 'namespace', p5call((v_self || (v_self = new p5HashRef({})))._hash_['obj'], "namespace", [], 1), 'name', p5call((v_self || (v_self = new p5HashRef({})))._hash_['obj'], "name", [], 1)), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '%', 'namespace', p5call((v_self || (v_self = new p5HashRef({})))._hash_['obj'], "namespace", [], 1), 'name', p5call((v_self || (v_self = new p5HashRef({})))._hash_['obj'], "name", [], 1)), 0)));
throw(p5context([(p5str(p5call(v_v, "emit_javascript", p5list_to_a(v_level), 0)) + '[' + p5str(p5call((v_self || (v_self = new p5HashRef({})))._hash_['index_exp'], "emit_javascript", [], 0)) + ']')], p5want));
})();
};
@@ -1875,18 +1875,18 @@ var p5100 = NAMESPACE['main'];
else {
if ( (!( p5bool((v_self || (v_self = new p5HashRef({})))._hash_['namespace'])) && (p5str((v_self || (v_self = new p5HashRef({})))._hash_['sigil']) != '*')) ) {
(function () {
- if ( p5bool(NAMESPACE["Perlito5"]["v_STRICT"]) ) {
+ if ( p5bool(p5pkg["Perlito5"]["v_STRICT"]) ) {
p5112.die([p5list_to_a(('Global symbol "' + p5str(v_perl5_name) + '" requires explicit package name'))], null);
};
(v_decl_type = ('our'));
- ((v_self || (v_self = new p5HashRef({})))._hash_['namespace'] = NAMESPACE["Perlito5"]["v_PKG_NAME"]);
+ ((v_self || (v_self = new p5HashRef({})))._hash_['namespace'] = p5pkg["Perlito5"]["v_PKG_NAME"]);
var v_sigil = null;
(v_sigil = (( (p5str((v_self || (v_self = new p5HashRef({})))._hash_['sigil']) == '$#') ? '@' : (v_self || (v_self = new p5HashRef({})))._hash_['sigil'])));
var v_s = null;
- (v_s = (('NAMESPACE["' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['namespace']) + '"]["' + p5str((v_table || (v_table = new p5HashRef({})))._hash_[v_sigil]) + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '"]')));
+ (v_s = (('p5pkg["' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['namespace']) + '"]["' + p5str((v_table || (v_table = new p5HashRef({})))._hash_[v_sigil]) + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '"]')));
if ( (p5str(v_sigil) == '@') ) {
(v_s = ((p5str(v_s) + ' || (' + p5str(v_s) + ' = [])')));
- (v_s = (('NAMESPACE[' + p5str(v_s) + ', "' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['namespace']) + '"]["' + p5str((v_table || (v_table = new p5HashRef({})))._hash_[v_sigil]) + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '"]')));
+ (v_s = (('p5pkg[' + p5str(v_s) + ', "' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['namespace']) + '"]["' + p5str((v_table || (v_table = new p5HashRef({})))._hash_[v_sigil]) + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '"]')));
};
if ( (p5str((v_self || (v_self = new p5HashRef({})))._hash_['sigil']) == '$#') ) {
throw(p5context([('(' + p5str(v_s) + '.length - 1)')], p5want));
@@ -1904,17 +1904,17 @@ var p5100 = NAMESPACE['main'];
};
};
if ( (p5str((v_self || (v_self = new p5HashRef({})))._hash_['sigil']) == '&') ) {
- throw(p5context([('NAMESPACE["' + p5str(p5or((v_self || (v_self = new p5HashRef({})))._hash_['namespace'], function () { return NAMESPACE["Perlito5"]["v_PKG_NAME"] })) + '"]["' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '"]')], p5want));
+ throw(p5context([('p5pkg["' + p5str(p5or((v_self || (v_self = new p5HashRef({})))._hash_['namespace'], function () { return p5pkg["Perlito5"]["v_PKG_NAME"] })) + '"]["' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '"]')], p5want));
};
if ( (p5str((v_self || (v_self = new p5HashRef({})))._hash_['sigil']) == '*') ) {
- throw(p5context([('NAMESPACE["' + p5str(p5or((v_self || (v_self = new p5HashRef({})))._hash_['namespace'], function () { return NAMESPACE["Perlito5"]["v_PKG_NAME"] })) + '"]["' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '"]')], p5want));
+ throw(p5context([('p5pkg["' + p5str(p5or((v_self || (v_self = new p5HashRef({})))._hash_['namespace'], function () { return p5pkg["Perlito5"]["v_PKG_NAME"] })) + '"]["' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '"]')], p5want));
};
if ( (p5str(v_decl_type) == 'our') ) {
(function () {
var v_sigil = null;
(v_sigil = (( (p5str((v_self || (v_self = new p5HashRef({})))._hash_['sigil']) == '$#') ? '@' : (v_self || (v_self = new p5HashRef({})))._hash_['sigil'])));
var v_s = null;
- (v_s = (('NAMESPACE["' + p5str(p5or((v_self || (v_self = new p5HashRef({})))._hash_['namespace'], function () { return (v_decl || (v_decl = new p5HashRef({})))._hash_['namespace'] })) + '"]["' + p5str((v_table || (v_table = new p5HashRef({})))._hash_[v_sigil]) + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '"]')));
+ (v_s = (('p5pkg["' + p5str(p5or((v_self || (v_self = new p5HashRef({})))._hash_['namespace'], function () { return (v_decl || (v_decl = new p5HashRef({})))._hash_['namespace'] })) + '"]["' + p5str((v_table || (v_table = new p5HashRef({})))._hash_[v_sigil]) + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '"]')));
if ( (p5str((v_self || (v_self = new p5HashRef({})))._hash_['sigil']) == '$#') ) {
throw(p5context([('(' + p5str(v_s) + '.length - 1)')], p5want));
};
@@ -1924,7 +1924,7 @@ var p5100 = NAMESPACE['main'];
var v_ns = null;
(v_ns = (''));
if ( p5bool((v_self || (v_self = new p5HashRef({})))._hash_['namespace']) ) {
- (v_ns = (('NAMESPACE["' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['namespace']) + '"]')));
+ (v_ns = (('p5pkg["' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['namespace']) + '"]')));
if ( (p5str((v_self || (v_self = new p5HashRef({})))._hash_['sigil']) == '$#') ) {
throw(p5context([('(' + p5str(v_ns) + '["' + p5str((v_table || (v_table = new p5HashRef({})))._hash_['@']) + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '"].length - 1)')], p5want));
};
@@ -1961,10 +1961,10 @@ var p5100 = NAMESPACE['main'];
var v_perl5_name = null;
(v_perl5_name = (p5112.shift([List__])));
p5for(p5112, function () {
- if ( (NAMESPACE["Perlito5::AST::Var"]["v__"])._hash_.hasOwnProperty(v_perl5_name) ) {
- throw(p5context([(NAMESPACE["Perlito5::AST::Var"]["v__"] || (NAMESPACE["Perlito5::AST::Var"]["v__"] = new p5HashRef({})))._hash_[v_perl5_name]], p5want));
+ if ( (p5pkg["Perlito5::AST::Var"]["v__"])._hash_.hasOwnProperty(v_perl5_name) ) {
+ throw(p5context([(p5pkg["Perlito5::AST::Var"]["v__"] || (p5pkg["Perlito5::AST::Var"]["v__"] = new p5HashRef({})))._hash_[v_perl5_name]], p5want));
};
- }, p5list_to_a((NAMESPACE["Perlito5"]["v_VAR"] || (NAMESPACE["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_));
+ }, p5list_to_a((p5pkg["Perlito5"]["v_VAR"] || (p5pkg["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_));
return (p5context([null], p5want));
}
catch(err) {
@@ -2007,11 +2007,11 @@ var p5100 = NAMESPACE['main'];
if ( (((p5str((v_self || (v_self = new p5HashRef({})))._hash_['decl']) == 'local') && p5bool(v_decl)) && ((p5str((v_decl || (v_decl = new p5HashRef({})))._hash_['decl']) == 'our') || (p5str((v_decl || (v_decl = new p5HashRef({})))._hash_['decl']) == 'local'))) ) {
(v_decl_namespace = ((v_decl || (v_decl = new p5HashRef({})))._hash_['namespace']));
};
- ((v_env || (v_env = new p5HashRef({})))._hash_['namespace'] = p5or(v_decl_namespace, function () { return NAMESPACE["Perlito5"]["v_PKG_NAME"] }));
+ ((v_env || (v_env = new p5HashRef({})))._hash_['namespace'] = p5or(v_decl_namespace, function () { return p5pkg["Perlito5"]["v_PKG_NAME"] }));
})();
};
};
- (((NAMESPACE["Perlito5"]["v_VAR"] || (NAMESPACE["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] || ((NAMESPACE["Perlito5"]["v_VAR"] || (NAMESPACE["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] = new p5HashRef({})))._hash_[v_perl5_name] = v_env);
+ (((p5pkg["Perlito5"]["v_VAR"] || (p5pkg["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] || ((p5pkg["Perlito5"]["v_VAR"] || (p5pkg["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] = new p5HashRef({})))._hash_[v_perl5_name] = v_env);
if ( (p5str((v_self || (v_self = new p5HashRef({})))._hash_['decl']) == 'my') ) {
var v_str = null;
(v_str = (''));
@@ -2047,8 +2047,8 @@ var p5100 = NAMESPACE['main'];
(v_decl_namespace = ((v_decl || (v_decl = new p5HashRef({})))._hash_['namespace']));
};
var v_ns = null;
- (v_ns = (('NAMESPACE["' + p5str(p5or(p5or(((v_self || (v_self = new p5HashRef({})))._hash_['var'] || ((v_self || (v_self = new p5HashRef({})))._hash_['var'] = new p5HashRef({})))._hash_['namespace'], function () { return v_decl_namespace }), function () { return NAMESPACE["Perlito5"]["v_PKG_NAME"] })) + '"]')));
- throw(p5context([('p5set_local(' + p5str(v_ns) + ',' + p5str(NAMESPACE["Perlito5::Javascript"].escape_string(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['var'] || ((v_self || (v_self = new p5HashRef({})))._hash_['var'] = new p5HashRef({})))._hash_['name']), 0)) + ',' + p5str(NAMESPACE["Perlito5::Javascript"].escape_string(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['var'] || ((v_self || (v_self = new p5HashRef({})))._hash_['var'] = new p5HashRef({})))._hash_['sigil']), 0)) + '); ')], p5want))
+ (v_ns = (('p5pkg["' + p5str(p5or(p5or(((v_self || (v_self = new p5HashRef({})))._hash_['var'] || ((v_self || (v_self = new p5HashRef({})))._hash_['var'] = new p5HashRef({})))._hash_['namespace'], function () { return v_decl_namespace }), function () { return p5pkg["Perlito5"]["v_PKG_NAME"] })) + '"]')));
+ throw(p5context([('p5set_local(' + p5str(v_ns) + ',' + p5str(p5pkg["Perlito5::Javascript"].escape_string(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['var'] || ((v_self || (v_self = new p5HashRef({})))._hash_['var'] = new p5HashRef({})))._hash_['name']), 0)) + ',' + p5str(p5pkg["Perlito5::Javascript"].escape_string(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['var'] || ((v_self || (v_self = new p5HashRef({})))._hash_['var'] = new p5HashRef({})))._hash_['sigil']), 0)) + '); ')], p5want))
}
else {
@@ -2082,9 +2082,9 @@ var p5100 = NAMESPACE['main'];
var v_level = null;
(v_level = (p5113.shift([List__])));
if ( (p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) == '__PACKAGE__') ) {
- throw(p5context([NAMESPACE["Perlito5::Javascript"].pkg([], p5want)], p5want));
+ throw(p5context([p5pkg["Perlito5::Javascript"].pkg([], p5want)], p5want));
};
- return (p5context([('NAMESPACE["' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '"]')], p5want));
+ return (p5context([('p5pkg["' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '"]')], p5want));
}
catch(err) {
if ( err instanceof Error ) {
@@ -2117,7 +2117,7 @@ var p5100 = NAMESPACE['main'];
throw(p5context([('(' + p5str(v_invocant) + ' || (' + p5str(v_invocant) + ' = new p5HashRef({}))' + ')._hash_[' + p5str(p5call((v_self || (v_self = new p5HashRef({})))._hash_['arguments'], "emit_javascript", p5list_to_a(v_level, 'list'), 0)) + ']')], p5want));
};
if ( (p5str(v_meth) == 'postcircumfix:<( )>') ) {
- throw(p5context([('(' + p5str(v_invocant) + ')(' + p5str(NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 0)) + ')')], p5want));
+ throw(p5context([('(' + p5str(v_invocant) + ')(' + p5str(p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 0)) + ')')], p5want));
};
if ( (p5str(p5114.ref([v_meth], 0)) == 'Perlito5::AST::Var') ) {
(v_meth = (p5call(v_meth, "emit_javascript", [], 0)));
@@ -2125,7 +2125,7 @@ var p5100 = NAMESPACE['main'];
else {
(v_meth = (('"' + p5str(v_meth) + '"')));
};
- return (p5context([('p5call(' + p5str(v_invocant) + ', ' + p5str(v_meth) + ', ' + p5str(NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 0)) + ', ' + p5str(( (p5str(v_wantarray) == 'list') ? '1' : ( (p5str(v_wantarray) == 'scalar') ? '0' : ( (p5str(v_wantarray) == 'void') ? 'null' : 'p5want')))) + ')')], p5want));
+ return (p5context([('p5call(' + p5str(v_invocant) + ', ' + p5str(v_meth) + ', ' + p5str(p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 0)) + ', ' + p5str(( (p5str(v_wantarray) == 'list') ? '1' : ( (p5str(v_wantarray) == 'scalar') ? '0' : ( (p5str(v_wantarray) == 'void') ? 'null' : 'p5want')))) + ')')], p5want));
}
catch(err) {
if ( err instanceof Error ) {
@@ -2216,15 +2216,15 @@ var p5100 = NAMESPACE['main'];
}, 'p5:s', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
- return (p5context([p5115.emit_regex_javascript(p5list_to_a('=~', p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '$', 'namespace', '', 'name', '_'), 1), v_self), p5want)], p5want));
+ return (p5context([p5115.emit_regex_javascript(p5list_to_a('=~', p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '$', 'namespace', '', 'name', '_'), 1), v_self), p5want)], p5want));
}, 'p5:m', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
- return (p5context([p5115.emit_regex_javascript(p5list_to_a('=~', p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '$', 'namespace', '', 'name', '_'), 1), v_self), p5want)], p5want));
+ return (p5context([p5115.emit_regex_javascript(p5list_to_a('=~', p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '$', 'namespace', '', 'name', '_'), 1), v_self), p5want)], p5want));
}, '__PACKAGE__', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
- return (p5context([('"' + p5str(NAMESPACE["Perlito5"]["v_PKG_NAME"]) + '"')], p5want));
+ return (p5context([('"' + p5str(p5pkg["Perlito5"]["v_PKG_NAME"]) + '"')], p5want));
}, 'wantarray', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
@@ -2232,7 +2232,7 @@ var p5100 = NAMESPACE['main'];
}, 'package', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
- return (p5context([('var ' + p5str(NAMESPACE["Perlito5::Javascript"].pkg([], 0)) + ' = p5make_package("' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['namespace']) + '")')], p5want));
+ return (p5context([('var ' + p5str(p5pkg["Perlito5::Javascript"].pkg([], 0)) + ' = p5make_package("' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['namespace']) + '")')], p5want));
}, 'infix:<=>>', function (List__, p5want) {
var v_self = null;
(v_self = (p5115.shift([List__])));
@@ -2241,28 +2241,28 @@ var p5100 = NAMESPACE['main'];
var v_wantarray = null;
(v_wantarray = (p5115.shift([List__])));
return (p5context([p5115.join([', ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level), p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], p5want)], p5want));
}, 'infix:', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
return (p5context([('p5cmp(' + p5115.join([', ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([NAMESPACE["Perlito5::Javascript"].to_str(p5list_to_a(NAMESPACE["Perlito5::AST::Apply"]["v__"]), p5want)], p5want));
+ return (p5context([p5pkg["Perlito5::Javascript"].to_str(p5list_to_a(p5pkg["Perlito5::AST::Apply"]["v__"]), p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + ')')], p5want));
}, 'infix:<<=>>', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
return (p5context([('p5cmp(' + p5115.join([', ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([NAMESPACE["Perlito5::Javascript"].to_num(p5list_to_a(NAMESPACE["Perlito5::AST::Apply"]["v__"]), p5want)], p5want));
+ return (p5context([p5pkg["Perlito5::Javascript"].to_num(p5list_to_a(p5pkg["Perlito5::AST::Apply"]["v__"]), p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + ')')], p5want));
}, 'prefix:', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
- return (p5context([('!( ' + p5str(NAMESPACE["Perlito5::Javascript"].to_bool(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]), 0)) + ')')], p5want));
+ return (p5context([('!( ' + p5str(p5pkg["Perlito5::Javascript"].to_bool(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]), 0)) + ')')], p5want));
}, 'prefix:<~>', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
- return (p5context([('~( ' + p5str(NAMESPACE["Perlito5::Javascript"].to_num(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]), 0)) + ')')], p5want));
+ return (p5context([('~( ' + p5str(p5pkg["Perlito5::Javascript"].to_num(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]), 0)) + ')')], p5want));
}, 'prefix:<->', function (List__, p5want) {
var v_self = null;
(v_self = (p5115.shift([List__])));
@@ -2282,7 +2282,7 @@ var p5100 = NAMESPACE['main'];
}, 'require', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
- return (p5context([('NAMESPACE["Perlito5::Grammar::Use"]["require"]([' + p5str(NAMESPACE["Perlito5::Javascript"].to_str(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]), 0)) + '])')], p5want));
+ return (p5context([('p5pkg["Perlito5::Grammar::Use"]["require"]([' + p5str(p5pkg["Perlito5::Javascript"].to_str(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]), 0)) + '])')], p5want));
}, 'prefix:<$>', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
@@ -2320,15 +2320,15 @@ var p5100 = NAMESPACE['main'];
(v_level = (List__[1]));
var v_arg = null;
(v_arg = (((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]));
- return (p5context([('p5code_lookup_by_name("' + p5str(NAMESPACE["Perlito5"]["v_PKG_NAME"]) + '", ' + p5str(p5call(v_arg, "emit_javascript", p5list_to_a(v_level), 0)) + ')')], p5want));
+ return (p5context([('p5code_lookup_by_name("' + p5str(p5pkg["Perlito5"]["v_PKG_NAME"]) + '", ' + p5str(p5call(v_arg, "emit_javascript", p5list_to_a(v_level), 0)) + ')')], p5want));
}, 'circumfix:<[ ]>', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
- return (p5context([('(new p5ArrayRef(' + p5str(NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 0)) + '))')], p5want));
+ return (p5context([('(new p5ArrayRef(' + p5str(p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 0)) + '))')], p5want));
}, 'circumfix:<{ }>', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
- return (p5context([('(new p5HashRef(p5a_to_h(' + p5str(NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 0)) + ')))')], p5want));
+ return (p5context([('(new p5HashRef(p5a_to_h(' + p5str(p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 0)) + ')))')], p5want));
}, 'prefix:<' + String.fromCharCode(92) + '>', function (List__, p5want) {
try {
var v_self = null;
@@ -2346,10 +2346,10 @@ var p5100 = NAMESPACE['main'];
};
if ( (p5str(p5call(v_arg, "sigil", [], 0)) == '&') ) {
if ( p5bool((v_arg || (v_arg = new p5HashRef({})))._hash_['namespace']) ) {
- throw(p5context([('NAMESPACE["' + p5str((v_arg || (v_arg = new p5HashRef({})))._hash_['namespace']) + '"].' + p5str((v_arg || (v_arg = new p5HashRef({})))._hash_['name']))], p5want));
+ throw(p5context([('p5pkg["' + p5str((v_arg || (v_arg = new p5HashRef({})))._hash_['namespace']) + '"].' + p5str((v_arg || (v_arg = new p5HashRef({})))._hash_['name']))], p5want));
}
else {
- throw(p5context([(p5str(NAMESPACE["Perlito5::Javascript"].pkg([], 0)) + '.' + p5str((v_arg || (v_arg = new p5HashRef({})))._hash_['name']))], p5want));
+ throw(p5context([(p5str(p5pkg["Perlito5::Javascript"].pkg([], 0)) + '.' + p5str((v_arg || (v_arg = new p5HashRef({})))._hash_['name']))], p5want));
};
};
};
@@ -2367,42 +2367,42 @@ var p5100 = NAMESPACE['main'];
var v_self = null;
(v_self = (List__[0]));
return (p5context([('(' + p5115.join([' ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + ')++')], p5want));
}, 'postfix:<-->', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
return (p5context([('(' + p5115.join([' ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + ')--')], p5want));
}, 'prefix:<++>', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
return (p5context([('++(' + p5115.join([' ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + ')')], p5want));
}, 'prefix:<-->', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
return (p5context([('--(' + p5115.join([' ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + ')')], p5want));
}, 'infix:', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
return (p5context([('p5str_replicate(' + p5115.join([', ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + ')')], p5want));
}, 'list:<.>', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
return (p5context([('(' + p5115.join([' + ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([NAMESPACE["Perlito5::Javascript"].to_str(p5list_to_a(NAMESPACE["Perlito5::AST::Apply"]["v__"]), p5want)], p5want));
+ return (p5context([p5pkg["Perlito5::Javascript"].to_str(p5list_to_a(p5pkg["Perlito5::AST::Apply"]["v__"]), p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + ')')], p5want));
}, 'list:<,>', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
- return (p5context([NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), p5want)], p5want));
+ return (p5context([p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), p5want)], p5want));
}, 'infix:<..>', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
@@ -2418,7 +2418,7 @@ var p5100 = NAMESPACE['main'];
(v_level = (p5115.shift([List__])));
var v_wantarray = null;
(v_wantarray = (p5115.shift([List__])));
- return (p5context([('( ' + p5str(NAMESPACE["Perlito5::Javascript"].to_bool(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]), 0)) + ' ? ' + p5str(p5call(p5context([((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[1]], 0), "emit_javascript", p5list_to_a(v_level, v_wantarray), 0)) + ' : ' + p5str(p5call(p5context([((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[2]], 0), "emit_javascript", p5list_to_a(v_level, v_wantarray), 0)) + ')')], p5want));
+ return (p5context([('( ' + p5str(p5pkg["Perlito5::Javascript"].to_bool(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]), 0)) + ' ? ' + p5str(p5call(p5context([((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[1]], 0), "emit_javascript", p5list_to_a(v_level, v_wantarray), 0)) + ' : ' + p5str(p5call(p5context([((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[2]], 0), "emit_javascript", p5list_to_a(v_level, v_wantarray), 0)) + ')')], p5want));
}, 'my', function (List__, p5want) {
var v_self = null;
(v_self = (p5115.shift([List__])));
@@ -2427,7 +2427,7 @@ var p5100 = NAMESPACE['main'];
var v_wantarray = null;
(v_wantarray = (p5115.shift([List__])));
return (p5context([('p5context(' + '[' + p5115.join([', ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level, v_wantarray), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level, v_wantarray), p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + '], ' + p5str(( (p5str(v_wantarray) == 'runtime') ? 'p5want' : ( (p5str(v_wantarray) == 'list') ? 1 : 0))) + ')')], p5want));
}, 'circumfix:<( )>', function (List__, p5want) {
var v_self = null;
@@ -2437,7 +2437,7 @@ var p5100 = NAMESPACE['main'];
var v_wantarray = null;
(v_wantarray = (p5115.shift([List__])));
return (p5context([('p5context(' + '[' + p5115.join([', ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level, v_wantarray), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level, v_wantarray), p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + '], ' + p5str(( (p5str(v_wantarray) == 'runtime') ? 'p5want' : ( (p5str(v_wantarray) == 'list') ? 1 : 0))) + ')')], p5want));
}, 'infix:<=>', function (List__, p5want) {
var v_self = null;
@@ -2450,12 +2450,12 @@ var p5100 = NAMESPACE['main'];
}, 'return', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
- (NAMESPACE["Perlito5"]["v_THROW"] = (1));
- return (p5context([('throw(' + p5str(NAMESPACE["Perlito5::Javascript"].to_runtime_context(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 0)) + ')')], p5want));
+ (p5pkg["Perlito5"]["v_THROW"] = (1));
+ return (p5context([('throw(' + p5str(p5pkg["Perlito5::Javascript"].to_runtime_context(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 0)) + ')')], p5want));
}, 'goto', function (List__, p5want) {
var v_self = null;
(v_self = (List__[0]));
- (NAMESPACE["Perlito5"]["v_THROW"] = (1));
+ (p5pkg["Perlito5"]["v_THROW"] = (1));
return (p5context([('throw((' + p5str(p5call(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0], "emit_javascript", [], 0)) + ')([List__, p5want]))')], p5want));
}, 'do', function (List__, p5want) {
var v_self = null;
@@ -2465,7 +2465,7 @@ var p5100 = NAMESPACE['main'];
var v_wantarray = null;
(v_wantarray = (p5115.shift([List__])));
var v_ast = null;
- (v_ast = (p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'eval', 'namespace', '', 'arguments', (new p5ArrayRef(p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'slurp', 'namespace', 'Perlito5::IO', 'arguments', (v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 1))))), 0)));
+ (v_ast = (p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'eval', 'namespace', '', 'arguments', (new p5ArrayRef(p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'slurp', 'namespace', 'Perlito5::IO', 'arguments', (v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 1))))), 0)));
return (p5context([p5call(v_ast, "emit_javascript", p5list_to_a(v_level), p5want)], p5want));
}, 'eval', function (List__, p5want) {
var v_self = null;
@@ -2474,7 +2474,7 @@ var p5100 = NAMESPACE['main'];
(v_level = (p5115.shift([List__])));
var v_wantarray = null;
(v_wantarray = (p5115.shift([List__])));
- (NAMESPACE["Perlito5"]["v_THROW"] = (1));
+ (p5pkg["Perlito5"]["v_THROW"] = (1));
var v_arg = null;
(v_arg = (((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]));
var v_eval = null;
@@ -2484,16 +2484,16 @@ var p5100 = NAMESPACE['main'];
else {
(function () {
var v_var_env_perl5 = null;
- (v_var_env_perl5 = (NAMESPACE["Perlito5::Dumper"].Dumper(p5list_to_a(NAMESPACE["Perlito5"]["v_VAR"]), 0)));
+ (v_var_env_perl5 = (p5pkg["Perlito5::Dumper"].Dumper(p5list_to_a(p5pkg["Perlito5"]["v_VAR"]), 0)));
var v_m = null;
- (v_m = (p5call(NAMESPACE["Perlito5::Expression"], "term_square", p5list_to_a(v_var_env_perl5, 0), 0)));
- (v_m = (NAMESPACE["Perlito5::Expression"].expand_list(p5list_to_a((p5call(v_m, "flat", [], p5want) || (p5call(v_m, "flat", [], p5want) = new p5ArrayRef([])))._array_[2]), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Expression"], "term_square", p5list_to_a(v_var_env_perl5, 0), 0)));
+ (v_m = (p5pkg["Perlito5::Expression"].expand_list(p5list_to_a((p5call(v_m, "flat", [], p5want) || (p5call(v_m, "flat", [], p5want) = new p5ArrayRef([])))._array_[2]), 0)));
var v_var_env_js = null;
- (v_var_env_js = (('(new p5ArrayRef(' + p5str(NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a(v_m), 0)) + '))')));
- (v_eval = (('eval(perl5_to_js(' + p5str(NAMESPACE["Perlito5::Javascript"].to_str(p5list_to_a(v_arg), 0)) + ', ' + '"' + p5str(NAMESPACE["Perlito5"]["v_PKG_NAME"]) + '", ' + p5str(v_var_env_js) + '))')));
+ (v_var_env_js = (('(new p5ArrayRef(' + p5str(p5pkg["Perlito5::Javascript"].to_list(p5list_to_a(v_m), 0)) + '))')));
+ (v_eval = (('eval(perl5_to_js(' + p5str(p5pkg["Perlito5::Javascript"].to_str(p5list_to_a(v_arg), 0)) + ', ' + '"' + p5str(p5pkg["Perlito5"]["v_PKG_NAME"]) + '", ' + p5str(v_var_env_js) + '))')));
})();
};
- return (p5context([('(function () {' + String.fromCharCode(10) + 'var r = null;' + String.fromCharCode(10) + 'NAMESPACE["main"]["v_@"] = "";' + String.fromCharCode(10) + 'try {' + String.fromCharCode(10) + 'r = ' + p5str(v_eval) + String.fromCharCode(10) + '}' + String.fromCharCode(10) + 'catch(err) {' + String.fromCharCode(10) + 'if ( err instanceof p5_error ) {' + String.fromCharCode(10) + '}' + String.fromCharCode(10) + 'else if ( err instanceof Error ) {' + String.fromCharCode(10) + 'NAMESPACE["main"]["v_@"] = err;' + String.fromCharCode(10) + '}' + String.fromCharCode(10) + 'else {' + String.fromCharCode(10) + 'throw(err);' + String.fromCharCode(10) + '}' + String.fromCharCode(10) + '}' + String.fromCharCode(10) + 'return r;' + String.fromCharCode(10) + '})()')], p5want));
+ return (p5context([('(function () {' + String.fromCharCode(10) + 'var r = null;' + String.fromCharCode(10) + 'p5pkg["main"]["v_@"] = "";' + String.fromCharCode(10) + 'try {' + String.fromCharCode(10) + 'r = ' + p5str(v_eval) + String.fromCharCode(10) + '}' + String.fromCharCode(10) + 'catch(err) {' + String.fromCharCode(10) + 'if ( err instanceof p5_error ) {' + String.fromCharCode(10) + '}' + String.fromCharCode(10) + 'else if ( err instanceof Error ) {' + String.fromCharCode(10) + 'p5pkg["main"]["v_@"] = err;' + String.fromCharCode(10) + '}' + String.fromCharCode(10) + 'else {' + String.fromCharCode(10) + 'throw(err);' + String.fromCharCode(10) + '}' + String.fromCharCode(10) + '}' + String.fromCharCode(10) + 'return r;' + String.fromCharCode(10) + '})()')], p5want));
}, 'undef', function (List__, p5want) {
try {
var v_self = null;
@@ -2523,7 +2523,7 @@ var p5100 = NAMESPACE['main'];
var v_wantarray = null;
(v_wantarray = (p5115.shift([List__])));
return (p5context([('(' + p5115.join([' ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level), p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + ' != null)')], p5want));
}, 'shift', function (List__, p5want) {
try {
@@ -2534,11 +2534,11 @@ var p5100 = NAMESPACE['main'];
var v_wantarray = null;
(v_wantarray = (p5115.shift([List__])));
if ( (p5bool((v_self || (v_self = new p5HashRef({})))._hash_['arguments']) && p5bool(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)) ) {
- throw(p5context([(p5str(NAMESPACE["Perlito5::Javascript"].pkg([], 0)) + '.shift([' + p5115.join([', ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level), p5want)], p5want));
+ throw(p5context([(p5str(p5pkg["Perlito5::Javascript"].pkg([], 0)) + '.shift([' + p5115.join([', ', p5list_to_a(p5map(p5115, function (p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level), p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + '])')], p5want));
};
- return (p5context([(p5str(NAMESPACE["Perlito5::Javascript"].pkg([], 0)) + '.shift([List__])')], p5want));
+ return (p5context([(p5str(p5pkg["Perlito5::Javascript"].pkg([], 0)) + '.shift([List__])')], p5want));
}
catch(err) {
if ( err instanceof Error ) {
@@ -2560,14 +2560,14 @@ var p5100 = NAMESPACE['main'];
var v_fun = null;
(v_fun = (p5115.shift([List_in])));
var v_list = null;
- (v_list = (NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 0)));
+ (v_list = (p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 0)));
if ( (p5str(p5115.ref([v_fun], 0)) == 'Perlito5::AST::Lit::Block') ) {
(v_fun = ((v_fun || (v_fun = new p5HashRef({})))._hash_['stmts']));
}
else {
(v_fun = ((new p5ArrayRef(p5list_to_a(v_fun)))));
};
- return (p5context([('p5map(' + p5str(NAMESPACE["Perlito5::Javascript"].pkg([], 0)) + ', ' + 'function (p5want) {' + String.fromCharCode(10) + p5str(p5call(p5context([p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', v_fun, 'needs_return', 1, 'top_level', 0), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}, ' + p5str(v_list) + ')')], p5want));
+ return (p5context([('p5map(' + p5str(p5pkg["Perlito5::Javascript"].pkg([], 0)) + ', ' + 'function (p5want) {' + String.fromCharCode(10) + p5str(p5call(p5context([p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', v_fun, 'needs_return', 1, 'top_level', 0), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}, ' + p5str(v_list) + ')')], p5want));
}, 'grep', function (List__, p5want) {
var v_self = null;
(v_self = (p5115.shift([List__])));
@@ -2580,14 +2580,14 @@ var p5100 = NAMESPACE['main'];
var v_fun = null;
(v_fun = (p5115.shift([List_in])));
var v_list = null;
- (v_list = (NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 0)));
+ (v_list = (p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 0)));
if ( (p5str(p5115.ref([v_fun], 0)) == 'Perlito5::AST::Lit::Block') ) {
(v_fun = ((v_fun || (v_fun = new p5HashRef({})))._hash_['stmts']));
}
else {
(v_fun = ((new p5ArrayRef(p5list_to_a(v_fun)))));
};
- return (p5context([('p5grep(' + p5str(NAMESPACE["Perlito5::Javascript"].pkg([], 0)) + ', ' + 'function (p5want) {' + String.fromCharCode(10) + p5str(p5call(p5context([p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', v_fun, 'needs_return', 1, 'top_level', 0), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}, ' + p5str(v_list) + ')')], p5want));
+ return (p5context([('p5grep(' + p5str(p5pkg["Perlito5::Javascript"].pkg([], 0)) + ', ' + 'function (p5want) {' + String.fromCharCode(10) + p5str(p5call(p5context([p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', v_fun, 'needs_return', 1, 'top_level', 0), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}, ' + p5str(v_list) + ')')], p5want));
}, 'sort', function (List__, p5want) {
var v_self = null;
(v_self = (p5115.shift([List__])));
@@ -2601,13 +2601,13 @@ var p5100 = NAMESPACE['main'];
var v_list = null;
if ( (p5str(p5115.ref([List_in[0]], 0)) == 'Perlito5::AST::Lit::Block') ) {
(v_fun = (p5115.shift([List_in])));
- (v_fun = (('function (p5want) {' + String.fromCharCode(10) + p5str(p5call(p5context([p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', (v_fun || (v_fun = new p5HashRef({})))._hash_['stmts'], 'needs_return', 1, 'top_level', 0), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}')));
+ (v_fun = (('function (p5want) {' + String.fromCharCode(10) + p5str(p5call(p5context([p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', (v_fun || (v_fun = new p5HashRef({})))._hash_['stmts'], 'needs_return', 1, 'top_level', 0), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}')));
}
else {
(v_fun = ('null'));
};
- (v_list = (NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 0)));
- return (p5context([('p5sort(' + p5str(NAMESPACE["Perlito5::Javascript"].pkg([], 0)) + ', ' + p5str(v_fun) + ', ' + p5str(v_list) + ')')], p5want));
+ (v_list = (p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 0)));
+ return (p5context([('p5sort(' + p5str(p5pkg["Perlito5::Javascript"].pkg([], 0)) + ', ' + p5str(v_fun) + ', ' + p5str(v_list) + ')')], p5want));
}, 'infix:/>', function (List__, p5want) {
var v_self = null;
(v_self = (p5115.shift([List__])));
@@ -2631,7 +2631,7 @@ var p5100 = NAMESPACE['main'];
var v_v = null;
(v_v = (p5call(v_arg, "obj", [], 0)));
if ( (p5bool(p5call(v_v, "isa", p5list_to_a('Perlito5::AST::Var'), 0)) && (p5str(p5call(v_v, "sigil", [], 0)) == '$')) ) {
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '%', 'namespace', p5call(v_v, "namespace", [], 1), 'name', p5call(v_v, "name", [], 1)), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '%', 'namespace', p5call(v_v, "namespace", [], 1), 'name', p5call(v_v, "name", [], 1)), 0)));
throw(p5context([('(' + p5str(p5call(v_v, "emit_javascript", [], 0)) + ').hasOwnProperty(' + p5str(p5call(p5context([p5call(v_arg, "index_exp", [], p5want)], 0), "emit_javascript", [], 0)) + ')')], p5want));
};
throw(p5context([('(' + p5str(p5call(v_v, "emit_javascript", [], 0)) + ')._hash_.hasOwnProperty(' + p5str(p5call(p5context([p5call(v_arg, "index_exp", [], p5want)], 0), "emit_javascript", [], 0)) + ')')], p5want));
@@ -2680,7 +2680,7 @@ var p5100 = NAMESPACE['main'];
var List_args = [];
(List_args = []);
p5for(p5115, function () {
- p5115.push([List_args, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], 1))], null);
+ p5115.push([List_args, p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], 1))], null);
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_));
throw(p5context([('(' + p5str(p5call((v_self || (v_self = new p5HashRef({})))._hash_['code'], "emit_javascript", p5list_to_a(v_level), 0)) + ')(' + p5115.join([',', p5list_to_a(List_args)], 0) + ')')], p5want));
})();
@@ -2688,18 +2688,18 @@ var p5100 = NAMESPACE['main'];
if ( (Hash_emit_js).hasOwnProperty(v_code) ) {
throw(p5context([(Hash_emit_js[v_code])(p5list_to_a(v_self, v_level, v_wantarray))], p5want));
};
- if ( (NAMESPACE["Perlito5::Javascript"]["Hash_op_infix_js_str"]).hasOwnProperty(v_code) ) {
- throw(p5context([('(' + p5115.join([NAMESPACE["Perlito5::Javascript"]["Hash_op_infix_js_str"][v_code], p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([NAMESPACE["Perlito5::Javascript"].to_str(p5list_to_a(NAMESPACE["Perlito5::AST::Apply"]["v__"]), p5want)], p5want));
+ if ( (p5pkg["Perlito5::Javascript"]["Hash_op_infix_js_str"]).hasOwnProperty(v_code) ) {
+ throw(p5context([('(' + p5115.join([p5pkg["Perlito5::Javascript"]["Hash_op_infix_js_str"][v_code], p5list_to_a(p5map(p5115, function (p5want) {
+ return (p5context([p5pkg["Perlito5::Javascript"].to_str(p5list_to_a(p5pkg["Perlito5::AST::Apply"]["v__"]), p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + ')')], p5want));
};
- if ( (NAMESPACE["Perlito5::Javascript"]["Hash_op_infix_js_num"]).hasOwnProperty(v_code) ) {
- throw(p5context([('(' + p5115.join([NAMESPACE["Perlito5::Javascript"]["Hash_op_infix_js_num"][v_code], p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([NAMESPACE["Perlito5::Javascript"].to_num(p5list_to_a(NAMESPACE["Perlito5::AST::Apply"]["v__"]), p5want)], p5want));
+ if ( (p5pkg["Perlito5::Javascript"]["Hash_op_infix_js_num"]).hasOwnProperty(v_code) ) {
+ throw(p5context([('(' + p5115.join([p5pkg["Perlito5::Javascript"]["Hash_op_infix_js_num"][v_code], p5list_to_a(p5map(p5115, function (p5want) {
+ return (p5context([p5pkg["Perlito5::Javascript"].to_num(p5list_to_a(p5pkg["Perlito5::AST::Apply"]["v__"]), p5want)], p5want));
}, p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_)))], 0) + ')')], p5want));
};
- if ( (NAMESPACE["Perlito5::Javascript"]["Hash_op_prefix_js_str"]).hasOwnProperty(v_code) ) {
- throw(p5context([(p5str(NAMESPACE["Perlito5::Javascript"]["Hash_op_prefix_js_str"][v_code]) + '(' + p5str(NAMESPACE["Perlito5::Javascript"].to_str(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]), 0)) + ')')], p5want));
+ if ( (p5pkg["Perlito5::Javascript"]["Hash_op_prefix_js_str"]).hasOwnProperty(v_code) ) {
+ throw(p5context([(p5str(p5pkg["Perlito5::Javascript"]["Hash_op_prefix_js_str"][v_code]) + '(' + p5str(p5pkg["Perlito5::Javascript"].to_str(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0]), 0)) + ')')], p5want));
};
if ( ((p5str(v_code) == 'infix:<&&>') || (p5str(v_code) == 'infix:')) ) {
throw(p5context([('p5and' + '(' + p5str(p5call(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0], "emit_javascript", p5list_to_a(v_level, v_wantarray), 0)) + ', ' + p5str(p5call(v_self, "emit_function_javascript", p5list_to_a(v_level, v_wantarray, ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[1]), 0)) + ')')], p5want));
@@ -2716,25 +2716,25 @@ var p5100 = NAMESPACE['main'];
p5115.die([p5list_to_a('JS::inline needs a string constant')], null);
};
};
- (v_code = (('NAMESPACE["' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['namespace']) + '"].' + p5str(v_code))));
+ (v_code = (('p5pkg["' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['namespace']) + '"].' + p5str(v_code))));
}
else {
- (v_code = ((p5str(NAMESPACE["Perlito5::Javascript"].pkg([], 0)) + '.' + p5str(v_code))));
+ (v_code = ((p5str(p5pkg["Perlito5::Javascript"].pkg([], 0)) + '.' + p5str(v_code))));
};
var v_sig = null;
for (var i_ = 0; i_ < 1 ; i_++) {
var v_name = null;
(v_name = ((v_self || (v_self = new p5HashRef({})))._hash_['code']));
- ((NAMESPACE["Perlito5::AST::Apply"]["v_namespace"]) = (v_self || (v_self = new p5HashRef({})))._hash_['namespace']);
+ ((p5pkg["Perlito5::AST::Apply"]["v_namespace"]) = (v_self || (v_self = new p5HashRef({})))._hash_['namespace']);
var v_effective_name = null;
(v_effective_name = ((p5str((v_self || (v_self = new p5HashRef({})))._hash_['code']) + '::' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['namespace']))));
- if ( (NAMESPACE["Perlito5"]["v_PROTO"])._hash_.hasOwnProperty(v_effective_name) ) {
- (v_sig = ((NAMESPACE["Perlito5"]["v_PROTO"] || (NAMESPACE["Perlito5"]["v_PROTO"] = new p5HashRef({})))._hash_[v_effective_name]));
+ if ( (p5pkg["Perlito5"]["v_PROTO"])._hash_.hasOwnProperty(v_effective_name) ) {
+ (v_sig = ((p5pkg["Perlito5"]["v_PROTO"] || (p5pkg["Perlito5"]["v_PROTO"] = new p5HashRef({})))._hash_[v_effective_name]));
}
else {
- if ( ((!( p5bool(NAMESPACE["Perlito5::AST::Apply"]["v_namespace"])) || (p5str(NAMESPACE["Perlito5::AST::Apply"]["v_namespace"]) == 'CORE')) && (NAMESPACE["Perlito5"]["v_CORE_PROTO"])._hash_.hasOwnProperty(('CORE::' + p5str(v_name)))) ) {
+ if ( ((!( p5bool(p5pkg["Perlito5::AST::Apply"]["v_namespace"])) || (p5str(p5pkg["Perlito5::AST::Apply"]["v_namespace"]) == 'CORE')) && (p5pkg["Perlito5"]["v_CORE_PROTO"])._hash_.hasOwnProperty(('CORE::' + p5str(v_name)))) ) {
(v_effective_name = (('CORE::' + p5str(v_name))));
- (v_sig = ((NAMESPACE["Perlito5"]["v_CORE_PROTO"] || (NAMESPACE["Perlito5"]["v_CORE_PROTO"] = new p5HashRef({})))._hash_[v_effective_name]));
+ (v_sig = ((p5pkg["Perlito5"]["v_CORE_PROTO"] || (p5pkg["Perlito5"]["v_CORE_PROTO"] = new p5HashRef({})))._hash_[v_effective_name]));
};
};
};
@@ -2746,7 +2746,7 @@ var p5100 = NAMESPACE['main'];
(List_in = p5list_to_a((p5or((v_self || (v_self = new p5HashRef({})))._hash_['arguments'], function () { return (new p5ArrayRef([])) }) || (p5or((v_self || (v_self = new p5HashRef({})))._hash_['arguments'], function () { return (new p5ArrayRef([])) }) = new p5ArrayRef([])))._array_));
if ( (p5str(v_sig) == String.fromCharCode(92) + '@@') ) {
p5115.push([List_out, p5list_to_a(p5call(p5115.shift([List_in]), "emit_javascript", p5list_to_a(v_level, 'list'), 1))], null);
- p5115.push([List_out, p5list_to_a(NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 1))], null);
+ p5115.push([List_out, p5list_to_a(p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 1))], null);
}
else {
if ( ((p5str(v_sig) == String.fromCharCode(92) + '[@%]') || (p5str(v_sig) == ';' + String.fromCharCode(92) + '@')) ) {
@@ -2762,21 +2762,21 @@ var p5100 = NAMESPACE['main'];
p5115.push([List_out, p5list_to_a(p5call(p5115.shift([List_in]), "emit_javascript", p5list_to_a(v_level, 'scalar'), 1))], null);
};
if ( p5bool(List_in.length) ) {
- p5115.push([List_out, p5list_to_a(NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 1))], null);
+ p5115.push([List_out, p5list_to_a(p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 1))], null);
};
}
else {
if ( (p5str(v_sig) == '$@') ) {
p5115.push([List_out, p5list_to_a(p5call(p5115.shift([List_in]), "emit_javascript", p5list_to_a(v_level, 'scalar'), 1))], null);
- p5115.push([List_out, p5list_to_a(NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 1))], null);
+ p5115.push([List_out, p5list_to_a(p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 1))], null);
}
else {
if ( (p5str(v_sig) == '@') ) {
- p5115.push([List_out, p5list_to_a(NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 1))], null);
+ p5115.push([List_out, p5list_to_a(p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(List_in))), 1))], null);
}
else {
p5for(p5115, function () {
- p5115.push([List_out, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level, 'scalar'), 1))], null);
+ p5115.push([List_out, p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level, 'scalar'), 1))], null);
}, p5list_to_a(List_in));
};
};
@@ -2789,12 +2789,12 @@ var p5100 = NAMESPACE['main'];
var List_args = [];
(List_args = []);
var v_arg_list = null;
- (v_arg_list = (NAMESPACE["Perlito5::Javascript"].to_list_preprocess(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 0)));
+ (v_arg_list = (p5pkg["Perlito5::Javascript"].to_list_preprocess(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 0)));
p5for(p5115, function () {
- p5115.push([List_args, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level), 1))], null);
+ p5115.push([List_args, p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", p5list_to_a(v_level), 1))], null);
}, p5list_to_a((v_arg_list || (v_arg_list = new p5ArrayRef([])))._array_));
var v_arg_code = null;
- (v_arg_code = (( (p5str((v_self || (v_self = new p5HashRef({})))._hash_['code']) == 'scalar') ? ('[' + p5115.join([', ', p5list_to_a(List_args)], 0) + ']') : NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a(v_arg_list), 0))));
+ (v_arg_code = (( (p5str((v_self || (v_self = new p5HashRef({})))._hash_['code']) == 'scalar') ? ('[' + p5115.join([', ', p5list_to_a(List_args)], 0) + ']') : p5pkg["Perlito5::Javascript"].to_list(p5list_to_a(v_arg_list), 0))));
return (p5context([(p5str(v_code) + '(' + p5str(v_arg_code) + ', ' + p5str(( (p5str(v_wantarray) == 'list') ? '1' : ( (p5str(v_wantarray) == 'scalar') ? '0' : ( (p5str(v_wantarray) == 'void') ? 'null' : 'p5want')))) + ')')], p5want));
}
catch(err) {
@@ -2817,23 +2817,23 @@ var p5100 = NAMESPACE['main'];
if ( (p5bool(p5call(v_parameters, "isa", p5list_to_a('Perlito5::AST::Apply'), 0)) && ((p5str(p5call(v_parameters, "code", [], 0)) == 'my') || (p5str(p5call(v_parameters, "code", [], 0)) == 'circumfix:<( )>'))) ) {
(function () {
var v_tmp = null;
- (v_tmp = (('tmp' + p5str(NAMESPACE["Perlito5::Javascript"].get_label([], 0)))));
+ (v_tmp = (('tmp' + p5str(p5pkg["Perlito5::Javascript"].get_label([], 0)))));
var v_tmp2 = null;
- (v_tmp2 = (('tmp' + p5str(NAMESPACE["Perlito5::Javascript"].get_label([], 0)))));
- throw(p5context([('(function () { ' + 'var ' + p5str(v_tmp) + ' = ' + p5str(NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(p5list_to_a(v_arguments))), (p5num(v_level) + 1)), 0)) + '; ' + 'var ' + p5str(v_tmp2) + ' = ' + p5str(v_tmp) + '.slice(0); ' + p5115.join(['; ', p5list_to_a(p5map(p5115, function (p5want) {
- return (p5context([(p5context([( (p5bool(p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "isa", p5list_to_a('Perlito5::AST::Apply'), 0)) && (p5str(p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "code", [], 0)) == 'undef')) ? (p5str(v_tmp) + '.shift()') : ( (p5str(p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "sigil", [], 0)) == '$') ? (p5str(p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], 0)) + ' = ' + p5str(v_tmp) + '.shift()') : ( (p5str(p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "sigil", [], 0)) == '@') ? (p5str(p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], 0)) + ' = ' + p5str(v_tmp) + '; ' + p5str(v_tmp) + ' = []') : ( (p5str(p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "sigil", [], 0)) == '%') ? (p5str(p5call(NAMESPACE["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], 0)) + ' = p5a_to_h(' + p5str(v_tmp) + '); ' + p5str(v_tmp) + ' = []') : p5115.die([p5list_to_a('not implemented')], p5want)))))], p5want))], p5want));
+ (v_tmp2 = (('tmp' + p5str(p5pkg["Perlito5::Javascript"].get_label([], 0)))));
+ throw(p5context([('(function () { ' + 'var ' + p5str(v_tmp) + ' = ' + p5str(p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(p5list_to_a(v_arguments))), (p5num(v_level) + 1)), 0)) + '; ' + 'var ' + p5str(v_tmp2) + ' = ' + p5str(v_tmp) + '.slice(0); ' + p5115.join(['; ', p5list_to_a(p5map(p5115, function (p5want) {
+ return (p5context([(p5context([( (p5bool(p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "isa", p5list_to_a('Perlito5::AST::Apply'), 0)) && (p5str(p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "code", [], 0)) == 'undef')) ? (p5str(v_tmp) + '.shift()') : ( (p5str(p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "sigil", [], 0)) == '$') ? (p5str(p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], 0)) + ' = ' + p5str(v_tmp) + '.shift()') : ( (p5str(p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "sigil", [], 0)) == '@') ? (p5str(p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], 0)) + ' = ' + p5str(v_tmp) + '; ' + p5str(v_tmp) + ' = []') : ( (p5str(p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "sigil", [], 0)) == '%') ? (p5str(p5call(p5pkg["Perlito5::AST::Apply"]["v__"], "emit_javascript", [], 0)) + ' = p5a_to_h(' + p5str(v_tmp) + '); ' + p5str(v_tmp) + ' = []') : p5115.die([p5list_to_a('not implemented')], p5want)))))], p5want))], p5want));
}, p5list_to_a((p5call(v_parameters, "arguments", [], p5want) || (p5call(v_parameters, "arguments", [], p5want) = new p5ArrayRef([])))._array_)), ('return ' + p5str(v_tmp2)))], 0) + ' })()')], p5want));
})();
};
if ( ((p5bool(p5call(v_parameters, "isa", p5list_to_a('Perlito5::AST::Var'), 0)) && (p5str(p5call(v_parameters, "sigil", [], 0)) == '$')) || (p5bool(p5call(v_parameters, "isa", p5list_to_a('Perlito5::AST::Decl'), 0)) && (p5str(p5call(p5call(v_parameters, "var", [], p5want), "sigil", [], 0)) == '$'))) ) {
- throw(p5context([('(' + p5str(p5call(v_parameters, "emit_javascript", [], 0)) + ' = ' + p5str(NAMESPACE["Perlito5::Javascript"].to_scalar(p5list_to_a((new p5ArrayRef(p5list_to_a(v_arguments))), (p5num(v_level) + 1)), 0)) + ')')], p5want));
+ throw(p5context([('(' + p5str(p5call(v_parameters, "emit_javascript", [], 0)) + ' = ' + p5str(p5pkg["Perlito5::Javascript"].to_scalar(p5list_to_a((new p5ArrayRef(p5list_to_a(v_arguments))), (p5num(v_level) + 1)), 0)) + ')')], p5want));
};
if ( ((p5bool(p5call(v_parameters, "isa", p5list_to_a('Perlito5::AST::Var'), 0)) && (p5str(p5call(v_parameters, "sigil", [], 0)) == '@')) || (p5bool(p5call(v_parameters, "isa", p5list_to_a('Perlito5::AST::Decl'), 0)) && (p5str(p5call(p5call(v_parameters, "var", [], p5want), "sigil", [], 0)) == '@'))) ) {
- throw(p5context([('(' + p5str(p5call(v_parameters, "emit_javascript", [], 0)) + ' = ' + p5str(NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(p5list_to_a(v_arguments))), (p5num(v_level) + 1)), 0)) + ')')], p5want));
+ throw(p5context([('(' + p5str(p5call(v_parameters, "emit_javascript", [], 0)) + ' = ' + p5str(p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(p5list_to_a(v_arguments))), (p5num(v_level) + 1)), 0)) + ')')], p5want));
}
else {
if ( ((p5bool(p5call(v_parameters, "isa", p5list_to_a('Perlito5::AST::Var'), 0)) && (p5str(p5call(v_parameters, "sigil", [], 0)) == '%')) || (p5bool(p5call(v_parameters, "isa", p5list_to_a('Perlito5::AST::Decl'), 0)) && (p5str(p5call(p5call(v_parameters, "var", [], p5want), "sigil", [], 0)) == '%'))) ) {
- throw(p5context([('(' + p5str(p5call(v_parameters, "emit_javascript", [], 0)) + ' = p5a_to_h(' + p5str(NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(p5list_to_a(v_arguments))), (p5num(v_level) + 1)), 0)) + '))')], p5want));
+ throw(p5context([('(' + p5str(p5call(v_parameters, "emit_javascript", [], 0)) + ' = p5a_to_h(' + p5str(p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(p5list_to_a(v_arguments))), (p5num(v_level) + 1)), 0)) + '))')], p5want));
};
};
return (p5context([('(' + p5str(p5call(v_parameters, "emit_javascript", p5list_to_a(v_level), 0)) + ' = ' + p5str(p5call(v_arguments, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + ')')], p5want));
@@ -2858,14 +2858,14 @@ var p5100 = NAMESPACE['main'];
var v_cond = null;
(v_cond = ((v_self || (v_self = new p5HashRef({})))._hash_['cond']));
var v_body = null;
- (v_body = (p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call((v_self || (v_self = new p5HashRef({})))._hash_['body'], "stmts", [], 1), 'needs_return', 0, 'create_context', 1), 0)));
+ (v_body = (p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call((v_self || (v_self = new p5HashRef({})))._hash_['body'], "stmts", [], 1), 'needs_return', 0, 'create_context', 1), 0)));
var v_s = null;
- (v_s = (('if ( ' + p5str(NAMESPACE["Perlito5::Javascript"].to_bool(p5list_to_a(v_cond), 0)) + ' ) {' + String.fromCharCode(10) + p5str(p5call(v_body, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}')));
+ (v_s = (('if ( ' + p5str(p5pkg["Perlito5::Javascript"].to_bool(p5list_to_a(v_cond), 0)) + ' ) {' + String.fromCharCode(10) + p5str(p5call(v_body, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}')));
if ( p5bool((p5call((v_self || (v_self = new p5HashRef({})))._hash_['otherwise'], "stmts", [], p5want) || (p5call((v_self || (v_self = new p5HashRef({})))._hash_['otherwise'], "stmts", [], p5want) = new p5ArrayRef([])))._array_) ) {
(function () {
var v_otherwise = null;
- (v_otherwise = (p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call((v_self || (v_self = new p5HashRef({})))._hash_['otherwise'], "stmts", [], 1), 'needs_return', 0, 'create_context', 1), 0)));
- (v_s = ((p5str(v_s) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + 'else {' + String.fromCharCode(10) + p5str(p5call(v_otherwise, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}')));
+ (v_otherwise = (p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call((v_self || (v_self = new p5HashRef({})))._hash_['otherwise'], "stmts", [], 1), 'needs_return', 0, 'create_context', 1), 0)));
+ (v_s = ((p5str(v_s) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + 'else {' + String.fromCharCode(10) + p5str(p5call(v_otherwise, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}')));
})();
};
return (p5context([v_s], p5want));
@@ -2879,8 +2879,8 @@ var p5100 = NAMESPACE['main'];
var v_level = null;
(v_level = (p5117.shift([List__])));
var v_body = null;
- (v_body = (p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call((v_self || (v_self = new p5HashRef({})))._hash_['body'], "stmts", [], 1), 'needs_return', 0, 'create_context', 1), 0)));
- return (p5context([('for ( ' + p5str(( p5bool((v_self || (v_self = new p5HashRef({})))._hash_['init']) ? (p5str(p5call((v_self || (v_self = new p5HashRef({})))._hash_['init'], "emit_javascript", [], 0)) + '; ') : '; ')) + p5str(( p5bool((v_self || (v_self = new p5HashRef({})))._hash_['cond']) ? (p5str(NAMESPACE["Perlito5::Javascript"].to_bool(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['cond']), 0)) + '; ') : '; ')) + p5str(( p5bool((v_self || (v_self = new p5HashRef({})))._hash_['continue']) ? (p5str(p5call((v_self || (v_self = new p5HashRef({})))._hash_['continue'], "emit_javascript", [], 0)) + ' ') : ' ')) + ') {' + String.fromCharCode(10) + p5str(p5call(v_body, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}')], p5want));
+ (v_body = (p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call((v_self || (v_self = new p5HashRef({})))._hash_['body'], "stmts", [], 1), 'needs_return', 0, 'create_context', 1), 0)));
+ return (p5context([('for ( ' + p5str(( p5bool((v_self || (v_self = new p5HashRef({})))._hash_['init']) ? (p5str(p5call((v_self || (v_self = new p5HashRef({})))._hash_['init'], "emit_javascript", [], 0)) + '; ') : '; ')) + p5str(( p5bool((v_self || (v_self = new p5HashRef({})))._hash_['cond']) ? (p5str(p5pkg["Perlito5::Javascript"].to_bool(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['cond']), 0)) + '; ') : '; ')) + p5str(( p5bool((v_self || (v_self = new p5HashRef({})))._hash_['continue']) ? (p5str(p5call((v_self || (v_self = new p5HashRef({})))._hash_['continue'], "emit_javascript", [], 0)) + ' ') : ' ')) + ') {' + String.fromCharCode(10) + p5str(p5call(v_body, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}')], p5want));
});
};
var p5118 = p5make_package("Perlito5::AST::For");
@@ -2892,18 +2892,18 @@ var p5100 = NAMESPACE['main'];
var v_level = null;
(v_level = (p5118.shift([List__])));
var v_cond = null;
- (v_cond = (NAMESPACE["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['cond'])))), 0)));
+ (v_cond = (p5pkg["Perlito5::Javascript"].to_list(p5list_to_a((new p5ArrayRef(p5list_to_a((v_self || (v_self = new p5HashRef({})))._hash_['cond'])))), 0)));
if ( p5bool(p5call((v_self || (v_self = new p5HashRef({})))._hash_['body'], "sig", [], 0)) ) {
var v_v = null;
(v_v = (p5call((v_self || (v_self = new p5HashRef({})))._hash_['body'], "sig", [], 0)));
- (((NAMESPACE["Perlito5"]["v_VAR"] || (NAMESPACE["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] || ((NAMESPACE["Perlito5"]["v_VAR"] || (NAMESPACE["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] = new p5HashRef({})))._hash_[p5call(v_v, "perl5_name", [], p5want)] = (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))));
+ (((p5pkg["Perlito5"]["v_VAR"] || (p5pkg["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] || ((p5pkg["Perlito5"]["v_VAR"] || (p5pkg["Perlito5"]["v_VAR"] = new p5ArrayRef([])))._array_[0] = new p5HashRef({})))._hash_[p5call(v_v, "perl5_name", [], p5want)] = (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))));
var v_sig = null;
(v_sig = (p5call(v_v, "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)));
- throw(p5context([('p5for_lex(' + ('function (' + p5str(v_sig) + ') {' + String.fromCharCode(10)) + p5str(p5call(p5context([p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call((v_self || (v_self = new p5HashRef({})))._hash_['body'], "stmts", [], 1), 'needs_return', 0, 'top_level', 0), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}, ' + p5str(v_cond) + ')')], p5want))
+ throw(p5context([('p5for_lex(' + ('function (' + p5str(v_sig) + ') {' + String.fromCharCode(10)) + p5str(p5call(p5context([p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call((v_self || (v_self = new p5HashRef({})))._hash_['body'], "stmts", [], 1), 'needs_return', 0, 'top_level', 0), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}, ' + p5str(v_cond) + ')')], p5want))
}
else {
- throw(p5context([('p5for(' + p5str(NAMESPACE["Perlito5::Javascript"].pkg([], 0)) + ', ' + 'function () {' + String.fromCharCode(10) + p5str(p5call(p5context([p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call((v_self || (v_self = new p5HashRef({})))._hash_['body'], "stmts", [], 1), 'needs_return', 0, 'top_level', 0), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}, ' + p5str(v_cond) + ')')], p5want))
+ throw(p5context([('p5for(' + p5str(p5pkg["Perlito5::Javascript"].pkg([], 0)) + ', ' + 'function () {' + String.fromCharCode(10) + p5str(p5call(p5context([p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', p5call((v_self || (v_self = new p5HashRef({})))._hash_['body'], "stmts", [], 1), 'needs_return', 0, 'top_level', 0), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}, ' + p5str(v_cond) + ')')], p5want))
}
}
catch(err) {
@@ -2925,7 +2925,7 @@ var p5100 = NAMESPACE['main'];
var v_level = null;
(v_level = (p5121.shift([List__])));
var v_s = null;
- (v_s = (('function (List__, p5want) {' + String.fromCharCode(10) + p5str(p5call(p5context([p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', (v_self || (v_self = new p5HashRef({})))._hash_['block'], 'needs_return', 1, 'top_level', 1), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}')));
+ (v_s = (('function (List__, p5want) {' + String.fromCharCode(10) + p5str(p5call(p5context([p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', (v_self || (v_self = new p5HashRef({})))._hash_['block'], 'needs_return', 1, 'top_level', 1), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '}')));
if ( p5bool((v_self || (v_self = new p5HashRef({})))._hash_['name']) ) {
throw(p5context([('p5make_sub("' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['namespace']) + '", "' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['name']) + '", ' + p5str(v_s) + ')')], p5want))
}
@@ -2953,7 +2953,7 @@ var p5100 = NAMESPACE['main'];
(v_level = (p5122.shift([List__])));
var v_block = null;
(v_block = (p5call(p5call(v_self, "simplify", [], p5want), "block", [], 0)));
- return (p5context([('(function () {' + String.fromCharCode(10) + p5str(p5call(p5context([p5call(NAMESPACE["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', v_block, 'needs_return', 1), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(NAMESPACE["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '})()')], p5want));
+ return (p5context([('(function () {' + String.fromCharCode(10) + p5str(p5call(p5context([p5call(p5pkg["Perlito5::Javascript::LexicalBlock"], "new", p5list_to_a('block', v_block, 'needs_return', 1), p5want)], 0), "emit_javascript", p5list_to_a((p5num(v_level) + 1)), 0)) + String.fromCharCode(10) + p5str(p5pkg["Perlito5::Javascript"].tab(p5list_to_a(v_level), 0)) + '})()')], p5want));
});
};
var p5123 = p5make_package("Perlito5::AST::Use");
@@ -2963,7 +2963,7 @@ var p5100 = NAMESPACE['main'];
(v_self = (p5123.shift([List__])));
var v_level = null;
(v_level = (p5123.shift([List__])));
- NAMESPACE["Perlito5::Grammar::Use"].emit_time_eval(p5list_to_a(v_self), null);
+ p5pkg["Perlito5::Grammar::Use"].emit_time_eval(p5list_to_a(v_self), null);
return (p5context([('// ' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['code']) + ' ' + p5str((v_self || (v_self = new p5HashRef({})))._hash_['mod']) + String.fromCharCode(10))], p5want));
});
};
@@ -3012,87 +3012,87 @@ var p5100 = NAMESPACE['main'];
(List_Parsed_op_chars = p5list_to_a(2, 1));
var Hash_Parsed_op = {};
(Hash_Parsed_op = p5a_to_h(p5list_to_a('?', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_ternary", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_ternary", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '(', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_paren", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_paren", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '[', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_square", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_square", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '{', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_curly", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_curly", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '->', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_arrow", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_arrow", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
})));
var List_Term_chars = [];
(List_Term_chars = p5list_to_a(7, 6, 5, 4, 3, 2, 1));
var Hash_Term = {};
(Hash_Term = p5a_to_h(p5list_to_a('$', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_sigil", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_sigil", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '@', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_sigil", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_sigil", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '%', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_sigil", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_sigil", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '&', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_sigil", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_sigil", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '*', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_sigil", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_sigil", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '.', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '0', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '1', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '2', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '3', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '4', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '5', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '6', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '7', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '8', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '9', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_digit", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, '#', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_space", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_space", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, p5127.chr([9], 1), function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_space", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_space", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, p5127.chr([10], 1), function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_space", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_space", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, p5127.chr([12], 1), function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_space", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_space", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, p5127.chr([13], 1), function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_space", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_space", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, p5127.chr([32], 1), function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_space", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_space", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'my', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_declarator", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_declarator", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'do', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_do", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_do", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'our', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_declarator", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_declarator", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'sub', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_anon_sub", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_anon_sub", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'map', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_map_or_sort", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_map_or_sort", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'eval', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_eval", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_eval", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'sort', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_map_or_sort", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_map_or_sort", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'grep', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_map_or_sort", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_map_or_sort", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'state', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_declarator", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_declarator", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'local', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_declarator", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_declarator", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'return', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_return", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_return", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'package', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Expression"], "term_package", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Expression"], "term_package", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
})));
p5make_sub("Perlito5::Precedence", "add_term", function (List__, p5want) {
var v_name = null;
@@ -3126,7 +3126,7 @@ var p5100 = NAMESPACE['main'];
var v_c2 = null;
(v_c2 = (p5127.substr([v_str, (p5num(v_pos) + p5127.length([v_term], 0)), 1], 0)));
if ( !( (p5bool(p5127.is_ident_middle(p5list_to_a(v_c1), 0)) && p5bool(p5127.is_ident_middle(p5list_to_a(v_c2), 0)))) ) {
- throw(p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos, 'capture', (new p5ArrayRef(p5list_to_a('end', v_term)))), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos, 'capture', (new p5ArrayRef(p5list_to_a('end', v_term)))), p5want)], p5want));
};
})();
};
@@ -3173,13 +3173,13 @@ var p5100 = NAMESPACE['main'];
null;
}
else {
- throw(p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', (p5num(v_pos) + p5num(v_len)), 'capture', (new p5ArrayRef(p5list_to_a('op', v_op)))), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', (p5num(v_pos) + p5num(v_len)), 'capture', (new p5ArrayRef(p5list_to_a('op', v_op)))), p5want)], p5want));
};
};
})();
};
}, p5list_to_a(List_Op_chars));
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::Bareword"], "term_bareword", p5list_to_a(v_str, v_pos), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::Bareword"], "term_bareword", p5list_to_a(v_str, v_pos), p5want)], p5want));
}
catch(err) {
if ( err instanceof Error ) {
@@ -3223,7 +3223,7 @@ var p5100 = NAMESPACE['main'];
p5127.add_op(p5list_to_a('postfix', 'block', v_prec), null);
p5127.add_op(p5list_to_a('postfix', 'hash', v_prec), null);
p5for(p5127, function () {
- p5127.add_op(p5list_to_a('prefix', NAMESPACE["Perlito5::Precedence"]["v__"], v_prec), null);
+ p5127.add_op(p5list_to_a('prefix', p5pkg["Perlito5::Precedence"]["v__"], v_prec), null);
}, p5list_to_a('$', '$#', '&', '*', '@', '%', '-r', '-w', '-x', '-o', '-R', '-W', '-X', '-O', '-e', '-z', '-s', '-f', '-d', '-l', '-p', '-S', '-b', '-c', '-t', '-u', '-g', '-k', '-T', '-B', '-M', '-A', '-C'));
(v_prec = ((p5num(v_prec) - 1)));
p5127.add_op(p5list_to_a('prefix', '++', v_prec), null);
@@ -3367,8 +3367,8 @@ var p5100 = NAMESPACE['main'];
else {
if ( p5bool(p5127.is_term(p5list_to_a(v_token), 0)) ) {
if ( p5bool(p5127.is_term(p5list_to_a(v_last), 0)) ) {
- p5127.say(p5list_to_a('# last: ', NAMESPACE["Perlito5::Dumper"].Dumper(p5list_to_a(v_last), 1)), null);
- p5127.say(p5list_to_a('# token: ', NAMESPACE["Perlito5::Dumper"].Dumper(p5list_to_a(v_token), 1)), null);
+ p5127.say(p5list_to_a('# last: ', p5pkg["Perlito5::Dumper"].Dumper(p5list_to_a(v_last), 1)), null);
+ p5127.say(p5list_to_a('# token: ', p5pkg["Perlito5::Dumper"].Dumper(p5list_to_a(v_token), 1)), null);
p5127.die([p5list_to_a('Value tokens must be separated by an operator')], null);
};
((v_token || (v_token = new p5ArrayRef([])))._array_[0] = 'term');
@@ -3436,10 +3436,10 @@ var p5100 = NAMESPACE['main'];
var v_p = null;
(v_p = (v_pos));
var v_m_namespace = null;
- (v_m_namespace = (p5call(NAMESPACE["Perlito5::Grammar"], "optional_namespace_before_ident", p5list_to_a(v_str, v_p), 0)));
+ (v_m_namespace = (p5call(p5pkg["Perlito5::Grammar"], "optional_namespace_before_ident", p5list_to_a(v_str, v_p), 0)));
(v_p = ((v_m_namespace || (v_m_namespace = new p5HashRef({})))._hash_['to']));
var v_m_name = null;
- (v_m_name = (p5call(NAMESPACE["Perlito5::Grammar"], "ident", p5list_to_a(v_str, v_p), 0)));
+ (v_m_name = (p5call(p5pkg["Perlito5::Grammar"], "ident", p5list_to_a(v_str, v_p), 0)));
if ( p5bool(v_m_name) ) {
null;
}
@@ -3457,30 +3457,30 @@ var p5100 = NAMESPACE['main'];
(v_full_name = ((p5str(v_namespace) + '::' + p5str(v_name))));
};
var v_m = null;
- (v_m = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, v_p), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, v_p), 0)));
if ( p5bool(v_m) ) {
(v_p = ((v_m || (v_m = new p5HashRef({})))._hash_['to']));
};
if ( (p5128.substr([v_str, v_p, 2], 0) == '=>') ) {
- ((v_m_name || (v_m_name = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', v_full_name), 1)))));
+ ((v_m_name || (v_m_name = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', v_full_name), 1)))));
((v_m_name || (v_m_name = new p5HashRef({})))._hash_['to'] = v_p);
throw(p5context([v_m_name], p5want));
};
if ( (p5128.substr([v_str, v_p, 2], 0) == '->') ) {
- ((v_m_name || (v_m_name = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Proto"], "new", p5list_to_a('name', v_full_name), 1)))));
+ ((v_m_name || (v_m_name = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Proto"], "new", p5list_to_a('name', v_full_name), 1)))));
((v_m_name || (v_m_name = new p5HashRef({})))._hash_['to'] = v_p);
throw(p5context([v_m_name], p5want));
};
var v_effective_name = null;
- (v_effective_name = ((p5str(p5or(v_namespace, function () { return NAMESPACE["Perlito5"]["v_PKG_NAME"] })) + '::' + p5str(v_name))));
+ (v_effective_name = ((p5str(p5or(v_namespace, function () { return p5pkg["Perlito5"]["v_PKG_NAME"] })) + '::' + p5str(v_name))));
var v_sig = null;
- if ( (NAMESPACE["Perlito5"]["v_PROTO"])._hash_.hasOwnProperty(v_effective_name) ) {
- (v_sig = ((NAMESPACE["Perlito5"]["v_PROTO"] || (NAMESPACE["Perlito5"]["v_PROTO"] = new p5HashRef({})))._hash_[v_effective_name]));
+ if ( (p5pkg["Perlito5"]["v_PROTO"])._hash_.hasOwnProperty(v_effective_name) ) {
+ (v_sig = ((p5pkg["Perlito5"]["v_PROTO"] || (p5pkg["Perlito5"]["v_PROTO"] = new p5HashRef({})))._hash_[v_effective_name]));
}
else {
- if ( ((!( p5bool(v_namespace)) || (p5str(v_namespace) == 'CORE')) && (NAMESPACE["Perlito5"]["v_CORE_PROTO"])._hash_.hasOwnProperty(('CORE::' + p5str(v_name)))) ) {
+ if ( ((!( p5bool(v_namespace)) || (p5str(v_namespace) == 'CORE')) && (p5pkg["Perlito5"]["v_CORE_PROTO"])._hash_.hasOwnProperty(('CORE::' + p5str(v_name)))) ) {
(v_effective_name = (('CORE::' + p5str(v_name))));
- (v_sig = ((NAMESPACE["Perlito5"]["v_CORE_PROTO"] || (NAMESPACE["Perlito5"]["v_CORE_PROTO"] = new p5HashRef({})))._hash_[v_effective_name]));
+ (v_sig = ((p5pkg["Perlito5"]["v_CORE_PROTO"] || (p5pkg["Perlito5"]["v_CORE_PROTO"] = new p5HashRef({})))._hash_[v_effective_name]));
}
else {
(v_sig = (null));
@@ -3492,7 +3492,7 @@ var p5100 = NAMESPACE['main'];
(function () {
(v_p)++;
var v_m = null;
- (v_m = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, v_p), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, v_p), 0)));
if ( p5bool(v_m) ) {
(v_p = ((v_m || (v_m = new p5HashRef({})))._hash_['to']));
};
@@ -3502,7 +3502,7 @@ var p5100 = NAMESPACE['main'];
(v_p)++;
})();
};
- ((v_m_name || (v_m_name = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', v_name, 'namespace', v_namespace, 'arguments', (new p5ArrayRef([]))), 1)))));
+ ((v_m_name || (v_m_name = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', v_name, 'namespace', v_namespace, 'arguments', (new p5ArrayRef([]))), 1)))));
((v_m_name || (v_m_name = new p5HashRef({})))._hash_['to'] = v_p);
throw(p5context([v_m_name], p5want));
};
@@ -3512,13 +3512,13 @@ var p5100 = NAMESPACE['main'];
var v_arg = null;
if ( (p5128.substr([v_str, v_p, 1], 0) == '(') ) {
(function () {
- (v_m = (p5call(NAMESPACE["Perlito5::Expression"], "term_paren", p5list_to_a(v_str, v_p), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Expression"], "term_paren", p5list_to_a(v_str, v_p), 0)));
if ( !( p5bool(v_m)) ) {
throw(p5context([v_m], p5want));
};
(v_p = ((v_m || (v_m = new p5HashRef({})))._hash_['to']));
(v_arg = (((v_m || (v_m = new p5HashRef({})))._hash_['capture'] || ((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = new p5ArrayRef([])))._array_[2]));
- (v_arg = (NAMESPACE["Perlito5::Expression"].expand_list(p5list_to_a(v_arg), 0)));
+ (v_arg = (p5pkg["Perlito5::Expression"].expand_list(p5list_to_a(v_arg), 0)));
var v_v = null;
(v_v = (p5128.shift([(v_arg || (v_arg = new p5ArrayRef([])))._array_])));
if ( p5bool((v_arg || (v_arg = new p5ArrayRef([])))._array_) ) {
@@ -3528,7 +3528,7 @@ var p5100 = NAMESPACE['main'];
})();
}
else {
- (v_m = (p5call(NAMESPACE["Perlito5::Expression"], "argument_parse", p5list_to_a(v_str, v_p), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Expression"], "argument_parse", p5list_to_a(v_str, v_p), 0)));
(v_arg = (((v_m || (v_m = new p5HashRef({})))._hash_['capture'] || ((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = new p5HashRef({})))._hash_['exp']));
if ( (p5str(v_arg) == '*undef*') ) {
(v_arg = (null));
@@ -3555,29 +3555,29 @@ var p5100 = NAMESPACE['main'];
p5128.die([p5list_to_a(('Not enough arguments for ' + p5str(v_name)))], null);
};
if ( (p5str(v_sig) == '_') ) {
- p5128.push([List_args, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('namespace', '', 'name', '_', 'sigil', '$'), 1))], null);
+ p5128.push([List_args, p5list_to_a(p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('namespace', '', 'name', '_', 'sigil', '$'), 1))], null);
};
};
- ((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', v_name, 'namespace', v_namespace, 'arguments', (new p5ArrayRef(List_args))), 1)))));
+ ((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', v_name, 'namespace', v_namespace, 'arguments', (new p5ArrayRef(List_args))), 1)))));
throw(p5context([v_m], p5want));
})();
};
};
if ( (p5128.substr([v_str, v_p, 1], 0) == '(') ) {
(function () {
- (v_m = (p5call(NAMESPACE["Perlito5::Expression"], "term_paren", p5list_to_a(v_str, v_p), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Expression"], "term_paren", p5list_to_a(v_str, v_p), 0)));
if ( !( p5bool(v_m)) ) {
throw(p5context([v_m], p5want));
};
var v_arg = null;
(v_arg = (((v_m || (v_m = new p5HashRef({})))._hash_['capture'] || ((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = new p5ArrayRef([])))._array_[2]));
- (v_arg = (NAMESPACE["Perlito5::Expression"].expand_list(p5list_to_a(v_arg), 0)));
- ((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', v_name, 'namespace', v_namespace, 'arguments', v_arg), 1)))));
+ (v_arg = (p5pkg["Perlito5::Expression"].expand_list(p5list_to_a(v_arg), 0)));
+ ((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', v_name, 'namespace', v_namespace, 'arguments', v_arg), 1)))));
throw(p5context([v_m], p5want));
})();
};
var v_m_list = null;
- (v_m_list = (p5call(NAMESPACE["Perlito5::Expression"], "list_parse", p5list_to_a(v_str, v_p), 0)));
+ (v_m_list = (p5call(p5pkg["Perlito5::Expression"], "list_parse", p5list_to_a(v_str, v_p), 0)));
if ( p5bool(v_m_list) ) {
((v_m_name || (v_m_name = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('postfix_or_term', 'funcall', v_namespace, v_name, p5call(v_m_list, "flat", [], 1)))));
((v_m_name || (v_m_name = new p5HashRef({})))._hash_['to'] = (v_m_list || (v_m_list = new p5HashRef({})))._hash_['to']);
@@ -3648,7 +3648,7 @@ var p5100 = NAMESPACE['main'];
var v_stmts = null;
(v_stmts = (p5call(v_o, "stmts", [], 0)));
if ( (!( p5bool((v_stmts != null))) || (p5num(p5129.scalar([(v_stmts || (v_stmts = new p5ArrayRef([])))._array_], 0)) == 0)) ) {
- throw(p5context([p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'circumfix:<{ }>', 'namespace', '', 'arguments', (new p5ArrayRef([]))), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'circumfix:<{ }>', 'namespace', '', 'arguments', (new p5ArrayRef([]))), p5want)], p5want));
};
if ( (p5num(p5129.scalar([(v_stmts || (v_stmts = new p5ArrayRef([])))._array_], 0)) != 1) ) {
throw(p5context([v_o], p5want));
@@ -3656,20 +3656,20 @@ var p5100 = NAMESPACE['main'];
var v_stmt = null;
(v_stmt = ((v_stmts || (v_stmts = new p5ArrayRef([])))._array_[0]));
if ( (p5str(p5129.ref([v_stmt], 0)) == 'Perlito5::AST::Var') ) {
- throw(p5context([p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'circumfix:<{ }>', 'namespace', '', 'arguments', (new p5ArrayRef(p5list_to_a(v_stmt)))), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'circumfix:<{ }>', 'namespace', '', 'arguments', (new p5ArrayRef(p5list_to_a(v_stmt)))), p5want)], p5want));
};
if ( (p5str(p5129.ref([v_stmt], 0)) != 'Perlito5::AST::Apply') ) {
throw(p5context([v_o], p5want));
};
if ( (p5str(p5call(v_stmt, "code", [], 0)) == 'infix:<=>>') ) {
- throw(p5context([p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'circumfix:<{ }>', 'namespace', '', 'arguments', (new p5ArrayRef(p5list_to_a(v_stmt)))), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'circumfix:<{ }>', 'namespace', '', 'arguments', (new p5ArrayRef(p5list_to_a(v_stmt)))), p5want)], p5want));
};
if ( (p5str(p5call(v_stmt, "code", [], 0)) != 'list:<,>') ) {
throw(p5context([v_o], p5want));
};
p5for_lex(function (v_item) {
if ( ((p5str(p5129.ref([v_item], 0)) == 'Perlito5::AST::Apply') && (p5str(p5call(v_item, "code", [], 0)) == 'infix:<=>>')) ) {
- throw(p5context([p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'circumfix:<{ }>', 'namespace', '', 'arguments', p5129.expand_list(p5list_to_a(v_stmt), 1)), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'circumfix:<{ }>', 'namespace', '', 'arguments', p5129.expand_list(p5list_to_a(v_stmt), 1)), p5want)], p5want));
};
}, p5list_to_a((p5call(v_stmt, "arguments", [], p5want) || (p5call(v_stmt, "arguments", [], p5want) = new p5ArrayRef([])))._array_));
return (p5context([v_o], p5want));
@@ -3691,18 +3691,18 @@ var p5100 = NAMESPACE['main'];
(v_v = (p5129.pop([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_], 0)));
if ( (p5str(p5129.ref([v_v], 0)) == 'ARRAY') ) {
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == 'methcall_no_params') ) {
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Call"], "new", p5list_to_a('invocant', null, 'method', (v_v || (v_v = new p5ArrayRef([])))._array_[2], 'arguments', (new p5ArrayRef([]))), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Call"], "new", p5list_to_a('invocant', null, 'method', (v_v || (v_v = new p5ArrayRef([])))._array_[2], 'arguments', (new p5ArrayRef([]))), 0)));
throw(p5context([v_v], p5want));
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == 'funcall_no_params') ) {
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', (v_v || (v_v = new p5ArrayRef([])))._array_[3], 'namespace', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', (v_v || (v_v = new p5ArrayRef([])))._array_[3], 'namespace', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
throw(p5context([v_v], p5want));
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == 'methcall') ) {
(function () {
var v_param_list = null;
(v_param_list = (p5129.expand_list(p5list_to_a((p5context([(v_v || (v_v = new p5ArrayRef([])))._array_[3]], 0) || (p5context([(v_v || (v_v = new p5ArrayRef([])))._array_[3]], 0) = new p5HashRef({})))._hash_['exp']), 0)));
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Call"], "new", p5list_to_a('invocant', null, 'method', (v_v || (v_v = new p5ArrayRef([])))._array_[2], 'arguments', v_param_list), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Call"], "new", p5list_to_a('invocant', null, 'method', (v_v || (v_v = new p5ArrayRef([])))._array_[2], 'arguments', v_param_list), 0)));
throw(p5context([v_v], p5want));
})();
};
@@ -3710,7 +3710,7 @@ var p5100 = NAMESPACE['main'];
(function () {
var v_param_list = null;
(v_param_list = (p5129.expand_list(p5list_to_a((p5context([(v_v || (v_v = new p5ArrayRef([])))._array_[4]], 0) || (p5context([(v_v || (v_v = new p5ArrayRef([])))._array_[4]], 0) = new p5HashRef({})))._hash_['exp']), 0)));
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', (v_v || (v_v = new p5ArrayRef([])))._array_[3], 'arguments', v_param_list, 'namespace', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', (v_v || (v_v = new p5ArrayRef([])))._array_[3], 'arguments', v_param_list, 'namespace', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
throw(p5context([v_v], p5want));
})();
};
@@ -3718,7 +3718,7 @@ var p5100 = NAMESPACE['main'];
(function () {
var v_param_list = null;
(v_param_list = (p5129.expand_list(p5list_to_a((v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'circumfix:<( )>', 'arguments', v_param_list, 'namespace', ''), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'circumfix:<( )>', 'arguments', v_param_list, 'namespace', ''), 0)));
throw(p5context([v_v], p5want));
})();
};
@@ -3726,29 +3726,29 @@ var p5100 = NAMESPACE['main'];
(function () {
var v_param_list = null;
(v_param_list = (p5129.expand_list(p5list_to_a((v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'circumfix:<[ ]>', 'arguments', v_param_list, 'namespace', ''), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'circumfix:<[ ]>', 'arguments', v_param_list, 'namespace', ''), 0)));
throw(p5context([v_v], p5want));
})();
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == 'block') ) {
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (v_v || (v_v = new p5ArrayRef([])))._array_[2], 'sig', (v_v || (v_v = new p5ArrayRef([])))._array_[3]), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (v_v || (v_v = new p5ArrayRef([])))._array_[2], 'sig', (v_v || (v_v = new p5ArrayRef([])))._array_[3]), 0)));
(v_v = (p5129.block_or_hash(p5list_to_a(v_v), 0)));
throw(p5context([v_v], p5want));
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == '.( )') ) {
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Call"], "new", p5list_to_a('invocant', null, 'method', 'postcircumfix:<( )>', 'arguments', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Call"], "new", p5list_to_a('invocant', null, 'method', 'postcircumfix:<( )>', 'arguments', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
throw(p5context([v_v], p5want));
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == '.[ ]') ) {
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Index"], "new", p5list_to_a('obj', null, 'index_exp', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Index"], "new", p5list_to_a('obj', null, 'index_exp', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
throw(p5context([v_v], p5want));
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == '.{ }') ) {
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Lookup"], "new", p5list_to_a('obj', null, 'index_exp', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Lookup"], "new", p5list_to_a('obj', null, 'index_exp', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
throw(p5context([v_v], p5want));
};
if ( ((p5str(p5129.ref([(v_v || (v_v = new p5ArrayRef([])))._array_[1]], 0)) == 'ARRAY') && (p5num(p5129.scalar([(v_v || (v_v = new p5ArrayRef([])))._array_[1]], 0)) == 2)) ) {
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'pair', 'arguments', (v_v || (v_v = new p5ArrayRef([])))._array_[1], 'namespace', ''), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'pair', 'arguments', (v_v || (v_v = new p5ArrayRef([])))._array_[1], 'namespace', ''), 0)));
throw(p5context([v_v], p5want));
};
throw(p5context([(v_v || (v_v = new p5ArrayRef([])))._array_[1]], p5want));
@@ -3773,7 +3773,7 @@ var p5100 = NAMESPACE['main'];
var v_v = null;
(v_v = (v_op));
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == 'methcall_no_params') ) {
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Call"], "new", p5list_to_a('invocant', v_value, 'method', (v_v || (v_v = new p5ArrayRef([])))._array_[2], 'arguments', (new p5ArrayRef([]))), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Call"], "new", p5list_to_a('invocant', v_value, 'method', (v_v || (v_v = new p5ArrayRef([])))._array_[2], 'arguments', (new p5ArrayRef([]))), 0)));
throw(p5context([v_v], p5want));
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == 'funcall_no_params') ) {
@@ -3785,7 +3785,7 @@ var p5100 = NAMESPACE['main'];
(function () {
var v_param_list = null;
(v_param_list = (p5129.expand_list(p5list_to_a(((v_v || (v_v = new p5ArrayRef([])))._array_[3] || ((v_v || (v_v = new p5ArrayRef([])))._array_[3] = new p5HashRef({})))._hash_['exp']), 0)));
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Call"], "new", p5list_to_a('invocant', v_value, 'method', (v_v || (v_v = new p5ArrayRef([])))._array_[2], 'arguments', v_param_list), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Call"], "new", p5list_to_a('invocant', v_value, 'method', (v_v || (v_v = new p5ArrayRef([])))._array_[2], 'arguments', v_param_list), 0)));
throw(p5context([v_v], p5want));
})();
};
@@ -3806,32 +3806,32 @@ var p5100 = NAMESPACE['main'];
((v_value || (v_value = new p5HashRef({})))._hash_['arguments'] = v_param_list);
throw(p5context([v_value], p5want));
};
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Call"], "new", p5list_to_a('invocant', v_value, 'method', 'postcircumfix:<( )>', 'arguments', v_param_list), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Call"], "new", p5list_to_a('invocant', v_value, 'method', 'postcircumfix:<( )>', 'arguments', v_param_list), 0)));
throw(p5context([v_v], p5want));
})();
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == '[ ]') ) {
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Index"], "new", p5list_to_a('obj', v_value, 'index_exp', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Index"], "new", p5list_to_a('obj', v_value, 'index_exp', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
throw(p5context([v_v], p5want));
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == 'block') ) {
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Lookup"], "new", p5list_to_a('obj', v_value, 'index_exp', (p5context([(v_v || (v_v = new p5ArrayRef([])))._array_[2]], 0) || (p5context([(v_v || (v_v = new p5ArrayRef([])))._array_[2]], 0) = new p5ArrayRef([])))._array_[0]), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Lookup"], "new", p5list_to_a('obj', v_value, 'index_exp', (p5context([(v_v || (v_v = new p5ArrayRef([])))._array_[2]], 0) || (p5context([(v_v || (v_v = new p5ArrayRef([])))._array_[2]], 0) = new p5ArrayRef([])))._array_[0]), 0)));
throw(p5context([v_v], p5want));
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == '.( )') ) {
(function () {
var v_param_list = null;
(v_param_list = (p5129.expand_list(p5list_to_a((v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Call"], "new", p5list_to_a('invocant', v_value, 'method', 'postcircumfix:<( )>', 'arguments', v_param_list), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Call"], "new", p5list_to_a('invocant', v_value, 'method', 'postcircumfix:<( )>', 'arguments', v_param_list), 0)));
throw(p5context([v_v], p5want));
})();
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == '.[ ]') ) {
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Call"], "new", p5list_to_a('invocant', v_value, 'method', 'postcircumfix:<[ ]>', 'arguments', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Call"], "new", p5list_to_a('invocant', v_value, 'method', 'postcircumfix:<[ ]>', 'arguments', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
throw(p5context([v_v], p5want));
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[1]) == '.{ }') ) {
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Call"], "new", p5list_to_a('invocant', v_value, 'method', 'postcircumfix:<{ }>', 'arguments', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Call"], "new", p5list_to_a('invocant', v_value, 'method', 'postcircumfix:<{ }>', 'arguments', (v_v || (v_v = new p5ArrayRef([])))._array_[2]), 0)));
throw(p5context([v_v], p5want));
};
p5129.push([(v_op || (v_op = new p5ArrayRef([])))._array_, p5list_to_a(v_value)], null);
@@ -3856,12 +3856,12 @@ var p5100 = NAMESPACE['main'];
var v_last_op = null;
(v_last_op = (p5129.shift([(v_op_stack || (v_op_stack = new p5ArrayRef([])))._array_])));
if ( (p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[0]) == 'prefix') ) {
- return (p5context([p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('prefix:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', (new p5ArrayRef(p5list_to_a(p5129.pop_term(p5list_to_a(v_num_stack), 1))))), 1))], p5want)], p5want));
+ return (p5context([p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('prefix:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', (new p5ArrayRef(p5list_to_a(p5129.pop_term(p5list_to_a(v_num_stack), 1))))), 1))], p5want)], p5want));
}
else {
if ( (p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[0]) == 'postfix') ) {
- return (p5context([p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('postfix:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', (new p5ArrayRef(p5list_to_a(p5129.pop_term(p5list_to_a(v_num_stack), 1))))), 1))], p5want)], p5want));
+ return (p5context([p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('postfix:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', (new p5ArrayRef(p5list_to_a(p5129.pop_term(p5list_to_a(v_num_stack), 1))))), 1))], p5want)], p5want));
}
else {
@@ -3870,17 +3870,17 @@ var p5100 = NAMESPACE['main'];
}
else {
- if ( p5bool(NAMESPACE["Perlito5::Precedence"].is_assoc_type(p5list_to_a('list', (v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]), 0)) ) {
+ if ( p5bool(p5pkg["Perlito5::Precedence"].is_assoc_type(p5list_to_a('list', (v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]), 0)) ) {
var v_arg = null;
if ( (p5num(p5129.scalar([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_], 0)) < 2) ) {
(function () {
var v_v2 = null;
(v_v2 = (p5129.pop_term(p5list_to_a(v_num_stack), 0)));
if ( ((p5str(p5129.ref([v_v2], 0)) == 'Perlito5::AST::Apply') && (p5str(p5call(v_v2, "code", [], 0)) == ('list:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'))) ) {
- p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', p5call(v_v2, "namespace", [], 1), 'code', p5call(v_v2, "code", [], 1), 'arguments', (new p5ArrayRef(p5list_to_a((p5call(v_v2, "arguments", [], p5want) || (p5call(v_v2, "arguments", [], p5want) = new p5ArrayRef([])))._array_, null)))), 1))], null);
+ p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', p5call(v_v2, "namespace", [], 1), 'code', p5call(v_v2, "code", [], 1), 'arguments', (new p5ArrayRef(p5list_to_a((p5call(v_v2, "arguments", [], p5want) || (p5call(v_v2, "arguments", [], p5want) = new p5ArrayRef([])))._array_, null)))), 1))], null);
}
else {
- p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('list:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', (new p5ArrayRef(p5list_to_a(v_v2, null)))), 1))], null);
+ p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('list:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', (new p5ArrayRef(p5list_to_a(v_v2, null)))), 1))], null);
};
throw(p5context([], p5want));
})();
@@ -3893,14 +3893,14 @@ var p5100 = NAMESPACE['main'];
})();
};
if ( (((p5str(p5129.ref([(v_arg || (v_arg = new p5ArrayRef([])))._array_[0]], 0)) == 'Perlito5::AST::Apply') && (p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[0]) == 'infix')) && (p5str(p5call((v_arg || (v_arg = new p5ArrayRef([])))._array_[0], "code", [], 0)) == ('list:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'))) ) {
- p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', p5call(p5context([(v_arg || (v_arg = new p5ArrayRef([])))._array_[0]], 0), "code", [], 1), 'arguments', (new p5ArrayRef(p5list_to_a((p5call(p5context([(v_arg || (v_arg = new p5ArrayRef([])))._array_[0]], 0), "arguments", [], p5want) || (p5call(p5context([(v_arg || (v_arg = new p5ArrayRef([])))._array_[0]], 0), "arguments", [], p5want) = new p5ArrayRef([])))._array_, (v_arg || (v_arg = new p5ArrayRef([])))._array_[1])))), 1))], null);
+ p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', p5call(p5context([(v_arg || (v_arg = new p5ArrayRef([])))._array_[0]], 0), "code", [], 1), 'arguments', (new p5ArrayRef(p5list_to_a((p5call(p5context([(v_arg || (v_arg = new p5ArrayRef([])))._array_[0]], 0), "arguments", [], p5want) || (p5call(p5context([(v_arg || (v_arg = new p5ArrayRef([])))._array_[0]], 0), "arguments", [], p5want) = new p5ArrayRef([])))._array_, (v_arg || (v_arg = new p5ArrayRef([])))._array_[1])))), 1))], null);
throw(p5context([], p5want));
};
- return (p5context([p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('list:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', v_arg), 1))], p5want)], p5want));
+ return (p5context([p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('list:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', v_arg), 1))], p5want)], p5want));
}
else {
- if ( p5bool(NAMESPACE["Perlito5::Precedence"].is_assoc_type(p5list_to_a('chain', (v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]), 0)) ) {
+ if ( p5bool(p5pkg["Perlito5::Precedence"].is_assoc_type(p5list_to_a('chain', (v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]), 0)) ) {
if ( (p5num(p5129.scalar([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_], 0)) < 2) ) {
p5129.die([p5list_to_a(('Missing value after operator ' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1])))], null);
};
@@ -3908,7 +3908,7 @@ var p5100 = NAMESPACE['main'];
(v_v2 = (p5129.pop_term(p5list_to_a(v_num_stack), 0)));
var v_arg = null;
(v_arg = ((new p5ArrayRef(p5list_to_a(p5129.pop_term(p5list_to_a(v_num_stack), 1), v_v2)))));
- return (p5context([p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('infix:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', v_arg), 1))], p5want)], p5want));
+ return (p5context([p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('infix:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', v_arg), 1))], p5want)], p5want));
}
else {
@@ -3918,7 +3918,7 @@ var p5100 = NAMESPACE['main'];
};
var v_v2 = null;
(v_v2 = (p5129.pop_term(p5list_to_a(v_num_stack), 0)));
- return (p5context([p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('ternary:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', (new p5ArrayRef(p5list_to_a(p5129.pop_term(p5list_to_a(v_num_stack), 1), (v_last_op || (v_last_op = new p5ArrayRef([])))._array_[2], v_v2)))), 1))], p5want)], p5want));
+ return (p5context([p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('ternary:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', (new p5ArrayRef(p5list_to_a(p5129.pop_term(p5list_to_a(v_num_stack), 1), (v_last_op || (v_last_op = new p5ArrayRef([])))._array_[2], v_v2)))), 1))], p5want)], p5want));
}
else {
@@ -3927,7 +3927,7 @@ var p5100 = NAMESPACE['main'];
};
var v_v2 = null;
(v_v2 = (p5129.pop_term(p5list_to_a(v_num_stack), 0)));
- return (p5context([p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('infix:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', (new p5ArrayRef(p5list_to_a(p5129.pop_term(p5list_to_a(v_num_stack), 1), v_v2)))), 1))], p5want)], p5want));
+ return (p5context([p5129.push([(v_num_stack || (v_num_stack = new p5ArrayRef([])))._array_, p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', ('infix:<' + p5str((v_last_op || (v_last_op = new p5ArrayRef([])))._array_[1]) + '>'), 'arguments', (new p5ArrayRef(p5list_to_a(p5129.pop_term(p5list_to_a(v_num_stack), 1), v_v2)))), 1))], p5want)], p5want));
}
}
}
@@ -3952,7 +3952,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -3960,7 +3960,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([p5context([(function () {
return (p5context([p5and(p5and(p5context([p5and(('->' == p5129.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 2], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (2 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -4029,7 +4029,7 @@ var p5100 = NAMESPACE['main'];
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_pos1);
return (p5context([p5context([p5and(p5and(p5and(p5context([p5and(('$' == p5129.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.ident'] = v_m2);
@@ -4041,7 +4041,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -4067,13 +4067,13 @@ var p5100 = NAMESPACE['main'];
return (p5context([0], p5want));
}
})()], p5want) }), function () { return p5context([p5and((')' == p5129.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('postfix_or_term', 'methcall', p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '$', 'namespace', '', 'name', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.ident'], "flat", [], 1)), 1), (new p5HashRef(p5a_to_h(p5list_to_a('exp', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['paren_parse'], "flat", [], 1), 'terminated', 0))))))));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('postfix_or_term', 'methcall', p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '$', 'namespace', '', 'name', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.ident'], "flat", [], 1)), 1), (new p5HashRef(p5a_to_h(p5list_to_a('exp', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['paren_parse'], "flat", [], 1), 'terminated', 0))))))));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want), function () { return p5context([(function () {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_pos1);
return (p5context([p5context([p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('postfix_or_term', 'methcall_no_params', p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '$', 'namespace', '', 'name', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.ident'], "flat", [], 1)), 1)))));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('postfix_or_term', 'methcall_no_params', p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('sigil', '$', 'namespace', '', 'name', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.ident'], "flat", [], 1)), 1)))));
return (p5context([1], p5want));
})()], p5want)], p5want)], p5want));
})()], p5want) })], p5want));
@@ -4082,7 +4082,7 @@ var p5100 = NAMESPACE['main'];
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_pos1);
return (p5context([p5context([p5and(p5and(p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "full_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "full_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.full_ident'] = v_m2);
@@ -4094,7 +4094,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -4170,7 +4170,7 @@ var p5100 = NAMESPACE['main'];
null;
}
else {
- throw(p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', (p5num(v_pos) + p5num(v_len)), 'capture', (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('sigil', p5129.substr([v_s, 0, (p5num(v_len) - 1)], 1), 'namespace', '', 'name', p5129.substr([v_s, (p5num(v_len) - 1), 1], 1)), 1))))), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', (p5num(v_pos) + p5num(v_len)), 'capture', (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('sigil', p5129.substr([v_s, 0, (p5num(v_len) - 1)], 1), 'namespace', '', 'name', p5129.substr([v_s, (p5num(v_len) - 1), 1], 1)), 1))))), p5want)], p5want));
};
})();
};
@@ -4193,7 +4193,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4227,7 +4227,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4247,7 +4247,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -4266,7 +4266,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([p5or(p5or(p5context([(function () {
return (p5context([p5and(p5and(p5and(p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "optional_namespace_before_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "optional_namespace_before_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.optional_namespace_before_ident'] = v_m2);
@@ -4278,7 +4278,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "var_name", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "var_name", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_name'] = v_m2);
@@ -4289,14 +4289,14 @@ var p5100 = NAMESPACE['main'];
return (p5context([0], p5want));
}
})()], p5want) }), function () { return p5context([p5and(('}' == p5129.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('sigil', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_sigil_or_pseudo'], "flat", [], 1), 'namespace', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.optional_namespace_before_ident'], "flat", [], 1), 'name', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_name'], "flat", [], 1)), 1)))));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('sigil', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_sigil_or_pseudo'], "flat", [], 1), 'namespace', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.optional_namespace_before_ident'], "flat", [], 1), 'name', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_name'], "flat", [], 1)), 1)))));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want), function () { return p5context([(function () {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_pos1);
return (p5context([p5context([p5and(p5and(p5and(p5context([p5and(('^' == p5129.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "var_name", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "var_name", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_name'] = v_m2);
@@ -4307,7 +4307,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([0], p5want));
}
})()], p5want) }), function () { return p5context([p5and(('}' == p5129.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('sigil', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_sigil_or_pseudo'], "flat", [], 1), 'namespace', 'main', 'name', ('^' + p5str(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_name'], "flat", [], 0)))), 1)))));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('sigil', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_sigil_or_pseudo'], "flat", [], 1), 'namespace', 'main', 'name', ('^' + p5str(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_name'], "flat", [], 0)))), 1)))));
return (p5context([1], p5want));
})()], p5want) })], p5want)], p5want));
})()], p5want) }), function () { return p5context([(function () {
@@ -4325,7 +4325,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([0], p5want));
}
})()], p5want), function () { return p5context([p5and(('}' == p5129.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('arguments', (new p5ArrayRef(p5list_to_a(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['curly_parse'], "flat", [], 1)))), 'code', ('prefix:<' + p5str(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_sigil_or_pseudo'], "flat", [], 0)) + '>'), 'namespace', ''), 1)))));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('arguments', (new p5ArrayRef(p5list_to_a(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['curly_parse'], "flat", [], 1)))), 'code', ('prefix:<' + p5str(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_sigil_or_pseudo'], "flat", [], 0)) + '>'), 'namespace', ''), 1)))));
return (p5context([1], p5want));
})()], p5want) })], p5want)], p5want));
})()], p5want) })], p5want));
@@ -4334,7 +4334,7 @@ var p5100 = NAMESPACE['main'];
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_pos1);
return (p5context([p5context([p5and(p5and(p5context([p5and(('^' == p5129.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "word", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "word", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.word'] = v_m2);
@@ -4345,14 +4345,14 @@ var p5100 = NAMESPACE['main'];
return (p5context([0], p5want));
}
})()], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('sigil', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_sigil_or_pseudo'], "flat", [], 1), 'namespace', 'main', 'name', ('^' + p5str(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.word'], "flat", [], 0)))), 1)))));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('sigil', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_sigil_or_pseudo'], "flat", [], 1), 'namespace', 'main', 'name', ('^' + p5str(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.word'], "flat", [], 0)))), 1)))));
return (p5context([1], p5want));
})()], p5want) })], p5want)], p5want));
})()], p5want) }), function () { return p5context([(function () {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_pos1);
return (p5context([p5context([p5and(p5and(p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "optional_namespace_before_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "optional_namespace_before_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.optional_namespace_before_ident'] = v_m2);
@@ -4364,7 +4364,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "var_name", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "var_name", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_name'] = v_m2);
@@ -4375,7 +4375,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([0], p5want));
}
})()], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('sigil', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_sigil_or_pseudo'], "flat", [], 1), 'namespace', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.optional_namespace_before_ident'], "flat", [], 1), 'name', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_name'], "flat", [], 1)), 1)))));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('sigil', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_sigil_or_pseudo'], "flat", [], 1), 'namespace', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.optional_namespace_before_ident'], "flat", [], 1), 'name', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_name'], "flat", [], 1)), 1)))));
return (p5context([1], p5want));
})()], p5want) })], p5want)], p5want));
})()], p5want) })], p5want));
@@ -4410,7 +4410,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4418,7 +4418,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([p5or(p5context([(function () {
return (p5context([p5and(p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "val_num", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "val_num", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.val_num'] = v_m2);
@@ -4436,7 +4436,7 @@ var p5100 = NAMESPACE['main'];
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_pos1);
return (p5context([p5context([p5and(p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "val_int", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "val_int", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.val_int'] = v_m2);
@@ -4462,7 +4462,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4496,7 +4496,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4530,7 +4530,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4564,7 +4564,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4575,7 +4575,7 @@ var p5100 = NAMESPACE['main'];
(v_m = (v_MATCH));
if ( !( p5bool((function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -4590,7 +4590,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([1], p5want));
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'] = v_m2);
@@ -4605,7 +4605,7 @@ var p5100 = NAMESPACE['main'];
(v_m = (v_MATCH));
if ( !( p5bool((function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -4634,7 +4634,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4662,7 +4662,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4682,7 +4682,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -4693,7 +4693,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_type", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_type", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.opt_type'] = v_m2);
@@ -4705,7 +4705,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -4716,7 +4716,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "var_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "var_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_ident'] = v_m2);
@@ -4727,7 +4727,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([0], p5want));
}
})()], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Decl"], "new", p5list_to_a('decl', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['declarator'], "flat", [], 1), 'type', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.opt_type'], "flat", [], 1), 'var', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_ident'], "flat", [], 1)), 1)))));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Decl"], "new", p5list_to_a('decl', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['declarator'], "flat", [], 1), 'type', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.opt_type'], "flat", [], 1), 'var', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_ident'], "flat", [], 1)), 1)))));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want)], p5want));
@@ -4742,7 +4742,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4750,7 +4750,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([p5context([(function () {
return (p5context([p5and(p5and(p5and(p5context([p5and(('return' == p5129.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 6], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (6 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -4774,7 +4774,7 @@ var p5100 = NAMESPACE['main'];
})()], p5want) }), function () { return p5context([(function () {
var v_args = null;
(v_args = ((p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['list_parse'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['list_parse'], "flat", [], p5want) = new p5HashRef({})))._hash_['exp']));
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'return', 'arguments', ( (p5str(v_args) == '*undef*') ? (new p5ArrayRef([])) : (new p5ArrayRef(p5list_to_a(v_args)))), 'namespace', ''), 1)))));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'return', 'arguments', ( (p5str(v_args) == '*undef*') ? (new p5ArrayRef([])) : (new p5ArrayRef(p5list_to_a(v_args)))), 'namespace', ''), 1)))));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want)], p5want));
@@ -4789,7 +4789,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4797,7 +4797,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([p5context([(function () {
return (p5context([p5and(p5and(p5and(p5context([p5and(('sub' == p5129.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 3], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (3 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -4808,7 +4808,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "anon_sub_def", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "anon_sub_def", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.anon_sub_def'] = v_m2);
@@ -4834,7 +4834,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4842,7 +4842,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([p5context([(function () {
return (p5context([p5and(p5and(p5and(p5and(p5context([p5and(('do' == p5129.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 2], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (2 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -4854,7 +4854,7 @@ var p5100 = NAMESPACE['main'];
})()], p5want) }), function () { return p5context([(function () {
var v_tmp = null;
(v_tmp = (v_MATCH));
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
var v_res = null;
(v_res = (p5context([(function () {
var v_pos1 = null;
@@ -4877,7 +4877,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([0], p5want));
}
})()], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Do"], "new", p5list_to_a('block', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['statement_parse'], "flat", [], 1)), 1)))));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Do"], "new", p5list_to_a('block', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['statement_parse'], "flat", [], 1)), 1)))));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want)], p5want));
@@ -4892,7 +4892,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4900,7 +4900,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([p5context([(function () {
return (p5context([p5and(p5and(p5and(p5context([p5and(('package' == p5129.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 7], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (7 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -4911,7 +4911,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "full_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "full_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.full_ident'] = v_m2);
@@ -4924,8 +4924,8 @@ var p5100 = NAMESPACE['main'];
})()], p5want) }), function () { return p5context([(function () {
var v_name = null;
(v_name = (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.full_ident'], "flat", [], 0)));
- (NAMESPACE["Perlito5"]["v_PKG_NAME"] = (v_name));
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'package', 'arguments', (new p5ArrayRef([])), 'namespace', v_name), 1)))));
+ (p5pkg["Perlito5"]["v_PKG_NAME"] = (v_name));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'package', 'arguments', (new p5ArrayRef([])), 'namespace', v_name), 1)))));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want)], p5want));
@@ -4940,7 +4940,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -4948,7 +4948,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([p5context([(function () {
return (p5context([p5and(p5and(p5and(p5and(p5context([p5and(('eval' == p5129.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 4], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (4 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -4960,7 +4960,7 @@ var p5100 = NAMESPACE['main'];
})()], p5want) }), function () { return p5context([(function () {
var v_tmp = null;
(v_tmp = (v_MATCH));
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
var v_res = null;
(v_res = (p5context([(function () {
var v_pos1 = null;
@@ -4983,7 +4983,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([0], p5want));
}
})()], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'eval', 'arguments', (new p5ArrayRef(p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Do"], "new", p5list_to_a('block', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['term_curly'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['term_curly'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2]), 1)), 1)))), 'namespace', ''), 1)))));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'eval', 'arguments', (new p5ArrayRef(p5list_to_a(p5call(p5pkg["Perlito5::AST::Do"], "new", p5list_to_a('block', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['term_curly'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['term_curly'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2]), 1)), 1)))), 'namespace', ''), 1)))));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want)], p5want));
@@ -4998,7 +4998,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -5023,7 +5023,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -5043,7 +5043,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -5055,7 +5055,7 @@ var p5100 = NAMESPACE['main'];
})()], p5want) }), function () { return p5context([(function () {
var v_tmp = null;
(v_tmp = (v_MATCH));
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
var v_res = null;
(v_res = (p5context([(function () {
var v_pos1 = null;
@@ -5090,7 +5090,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([0], p5want));
}
})()], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['map_or_sort'], "flat", [], 1), 'arguments', (new p5ArrayRef(p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['term_curly'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['term_curly'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2]), 1), (p5129.expand_list(p5list_to_a((p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['list_parse'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['list_parse'], "flat", [], p5want) = new p5HashRef({})))._hash_['exp']), p5want) || (p5129.expand_list(p5list_to_a((p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['list_parse'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['list_parse'], "flat", [], p5want) = new p5HashRef({})))._hash_['exp']), p5want) = new p5ArrayRef([])))._array_))), 'namespace', ''), 1)))));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['map_or_sort'], "flat", [], 1), 'arguments', (new p5ArrayRef(p5list_to_a(p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['term_curly'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['term_curly'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2]), 1), (p5129.expand_list(p5list_to_a((p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['list_parse'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['list_parse'], "flat", [], p5want) = new p5HashRef({})))._hash_['exp']), p5want) || (p5129.expand_list(p5list_to_a((p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['list_parse'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['list_parse'], "flat", [], p5want) = new p5HashRef({})))._hash_['exp']), p5want) = new p5ArrayRef([])))._array_))), 'namespace', ''), 1)))));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want)], p5want));
@@ -5105,7 +5105,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -5113,7 +5113,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([p5context([(function () {
return (p5context([p5and(p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -5153,12 +5153,12 @@ var p5100 = NAMESPACE['main'];
var v_last_is_term = null;
(v_last_is_term = (List__[3]));
var v_m = null;
- (v_m = (p5call(NAMESPACE["Perlito5::Precedence"], "op_parse", p5list_to_a(v_str, v_pos, v_last_is_term), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Precedence"], "op_parse", p5list_to_a(v_str, v_pos, v_last_is_term), 0)));
if ( !( p5bool(v_m)) ) {
throw(p5context([v_m], p5want));
};
var v_spc = null;
- (v_spc = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_m || (v_m = new p5HashRef({})))._hash_['to']), 0)));
+ (v_spc = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_m || (v_m = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_spc) ) {
((v_m || (v_m = new p5HashRef({})))._hash_['to'] = (v_spc || (v_spc = new p5HashRef({})))._hash_['to']);
};
@@ -5199,14 +5199,14 @@ var p5100 = NAMESPACE['main'];
var v_v = null;
if ( p5bool(p5129.scalar([(v_lexer_stack || (v_lexer_stack = new p5ArrayRef([])))._array_], 0)) ) {
(v_v = (p5129.pop([(v_lexer_stack || (v_lexer_stack = new p5ArrayRef([])))._array_], 0)));
- if ( ((p5bool(v_is_first_token) && (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[0]) == 'op')) && !( p5bool(NAMESPACE["Perlito5::Precedence"].is_fixity_type(p5list_to_a('prefix', (v_v || (v_v = new p5ArrayRef([])))._array_[1]), 0)))) ) {
+ if ( ((p5bool(v_is_first_token) && (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[0]) == 'op')) && !( p5bool(p5pkg["Perlito5::Precedence"].is_fixity_type(p5list_to_a('prefix', (v_v || (v_v = new p5ArrayRef([])))._array_[1]), 0)))) ) {
((v_v || (v_v = new p5ArrayRef([])))._array_[0] = 'end');
};
}
else {
(function () {
var v_m = null;
- (v_m = (p5call(NAMESPACE["Perlito5::Expression"], "op_parse_spc", p5list_to_a(v_str, v_last_pos, v_last_is_term), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Expression"], "op_parse_spc", p5list_to_a(v_str, v_last_pos, v_last_is_term), 0)));
if ( !( p5bool(v_m)) ) {
throw(p5context([(new p5ArrayRef(p5list_to_a('end', '*end*')))], p5want));
};
@@ -5215,9 +5215,9 @@ var p5100 = NAMESPACE['main'];
null;
}
else {
- (v_last_is_term = (NAMESPACE["Perlito5::Precedence"].is_term(p5list_to_a(v_v), 0)));
+ (v_last_is_term = (p5pkg["Perlito5::Precedence"].is_term(p5list_to_a(v_v), 0)));
};
- if ( ((p5bool(v_is_first_token) && (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[0]) == 'op')) && !( p5bool(NAMESPACE["Perlito5::Precedence"].is_fixity_type(p5list_to_a('prefix', (v_v || (v_v = new p5ArrayRef([])))._array_[1]), 0)))) ) {
+ if ( ((p5bool(v_is_first_token) && (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[0]) == 'op')) && !( p5bool(p5pkg["Perlito5::Precedence"].is_fixity_type(p5list_to_a('prefix', (v_v || (v_v = new p5ArrayRef([])))._array_[1]), 0)))) ) {
((v_v || (v_v = new p5ArrayRef([])))._array_[0] = 'end');
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[0]) != 'end') ) {
@@ -5239,15 +5239,15 @@ var p5100 = NAMESPACE['main'];
}
}));
var v_prec = null;
- (v_prec = (p5call(NAMESPACE["Perlito5::Precedence"], "new", p5list_to_a('get_token', v_get_token, 'reduce', v_reduce_to_ast, 'end_token', v_Argument_end_token, 'end_token_chars', v_Argument_end_token_chars), 0)));
+ (v_prec = (p5call(p5pkg["Perlito5::Precedence"], "new", p5list_to_a('get_token', v_get_token, 'reduce', v_reduce_to_ast, 'end_token', v_Argument_end_token, 'end_token_chars', v_Argument_end_token_chars), 0)));
var v_res = null;
(v_res = (p5call(v_prec, "precedence_parse", [], 0)));
if ( (p5num(p5129.scalar([(v_res || (v_res = new p5ArrayRef([])))._array_], 0)) == 0) ) {
- throw(p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_last_pos, 'capture', (new p5HashRef(p5a_to_h(p5list_to_a('exp', '*undef*', 'terminated', null))))), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_last_pos, 'capture', (new p5HashRef(p5a_to_h(p5list_to_a('exp', '*undef*', 'terminated', null))))), p5want)], p5want));
};
var v_result = null;
(v_result = (p5129.pop_term(p5list_to_a(v_res), 0)));
- return (p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_last_pos, 'capture', (new p5HashRef(p5a_to_h(p5list_to_a('exp', v_result, 'terminated', v_terminated))))), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_last_pos, 'capture', (new p5HashRef(p5a_to_h(p5list_to_a('exp', v_result, 'terminated', v_terminated))))), p5want)], p5want));
}
catch(err) {
if ( err instanceof Error ) {
@@ -5284,14 +5284,14 @@ var p5100 = NAMESPACE['main'];
var v_v = null;
if ( p5bool(p5129.scalar([(v_lexer_stack || (v_lexer_stack = new p5ArrayRef([])))._array_], 0)) ) {
(v_v = (p5129.pop([(v_lexer_stack || (v_lexer_stack = new p5ArrayRef([])))._array_], 0)));
- if ( ((p5bool(v_is_first_token) && (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[0]) == 'op')) && !( p5bool(NAMESPACE["Perlito5::Precedence"].is_fixity_type(p5list_to_a('prefix', (v_v || (v_v = new p5ArrayRef([])))._array_[1]), 0)))) ) {
+ if ( ((p5bool(v_is_first_token) && (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[0]) == 'op')) && !( p5bool(p5pkg["Perlito5::Precedence"].is_fixity_type(p5list_to_a('prefix', (v_v || (v_v = new p5ArrayRef([])))._array_[1]), 0)))) ) {
((v_v || (v_v = new p5ArrayRef([])))._array_[0] = 'end');
};
}
else {
(function () {
var v_m = null;
- (v_m = (p5call(NAMESPACE["Perlito5::Expression"], "op_parse_spc", p5list_to_a(v_str, v_last_pos, v_last_is_term), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Expression"], "op_parse_spc", p5list_to_a(v_str, v_last_pos, v_last_is_term), 0)));
if ( !( p5bool(v_m)) ) {
throw(p5context([(new p5ArrayRef(p5list_to_a('end', '*end*')))], p5want));
};
@@ -5300,9 +5300,9 @@ var p5100 = NAMESPACE['main'];
null;
}
else {
- (v_last_is_term = (NAMESPACE["Perlito5::Precedence"].is_term(p5list_to_a(v_v), 0)));
+ (v_last_is_term = (p5pkg["Perlito5::Precedence"].is_term(p5list_to_a(v_v), 0)));
};
- if ( ((p5bool(v_is_first_token) && (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[0]) == 'op')) && !( p5bool(NAMESPACE["Perlito5::Precedence"].is_fixity_type(p5list_to_a('prefix', (v_v || (v_v = new p5ArrayRef([])))._array_[1]), 0)))) ) {
+ if ( ((p5bool(v_is_first_token) && (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[0]) == 'op')) && !( p5bool(p5pkg["Perlito5::Precedence"].is_fixity_type(p5list_to_a('prefix', (v_v || (v_v = new p5ArrayRef([])))._array_[1]), 0)))) ) {
((v_v || (v_v = new p5ArrayRef([])))._array_[0] = 'end');
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[0]) != 'end') ) {
@@ -5324,15 +5324,15 @@ var p5100 = NAMESPACE['main'];
}
}));
var v_prec = null;
- (v_prec = (p5call(NAMESPACE["Perlito5::Precedence"], "new", p5list_to_a('get_token', v_get_token, 'reduce', v_reduce_to_ast, 'end_token', v_List_end_token, 'end_token_chars', v_List_end_token_chars), 0)));
+ (v_prec = (p5call(p5pkg["Perlito5::Precedence"], "new", p5list_to_a('get_token', v_get_token, 'reduce', v_reduce_to_ast, 'end_token', v_List_end_token, 'end_token_chars', v_List_end_token_chars), 0)));
var v_res = null;
(v_res = (p5call(v_prec, "precedence_parse", [], 0)));
if ( (p5num(p5129.scalar([(v_res || (v_res = new p5ArrayRef([])))._array_], 0)) == 0) ) {
- throw(p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_last_pos, 'capture', (new p5HashRef(p5a_to_h(p5list_to_a('exp', '*undef*', 'terminated', null))))), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_last_pos, 'capture', (new p5HashRef(p5a_to_h(p5list_to_a('exp', '*undef*', 'terminated', null))))), p5want)], p5want));
};
var v_result = null;
(v_result = (p5129.pop_term(p5list_to_a(v_res), 0)));
- return (p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_last_pos, 'capture', (new p5HashRef(p5a_to_h(p5list_to_a('exp', v_result, 'terminated', v_terminated))))), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_last_pos, 'capture', (new p5HashRef(p5a_to_h(p5list_to_a('exp', v_result, 'terminated', v_terminated))))), p5want)], p5want));
}
catch(err) {
if ( err instanceof Error ) {
@@ -5359,7 +5359,7 @@ var p5100 = NAMESPACE['main'];
var v_get_token = null;
(v_get_token = (function (List__, p5want) {
var v_m = null;
- (v_m = (p5call(NAMESPACE["Perlito5::Expression"], "op_parse_spc", p5list_to_a(v_str, v_last_pos, v_last_is_term), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Expression"], "op_parse_spc", p5list_to_a(v_str, v_last_pos, v_last_is_term), 0)));
if ( !( p5bool(v_m)) ) {
p5129.die([p5list_to_a('Expected closing delimiter: ', v_delimiter, ' near ', v_last_pos)], null);
};
@@ -5369,7 +5369,7 @@ var p5100 = NAMESPACE['main'];
null;
}
else {
- (v_last_is_term = (NAMESPACE["Perlito5::Precedence"].is_term(p5list_to_a(v_v), 0)));
+ (v_last_is_term = (p5pkg["Perlito5::Precedence"].is_term(p5list_to_a(v_v), 0)));
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[0]) != 'end') ) {
(v_last_pos = (p5call(v_m, "to", [], 0)));
@@ -5379,14 +5379,14 @@ var p5100 = NAMESPACE['main'];
var Hash_delim_token = {};
(Hash_delim_token[v_delimiter] = 1);
var v_prec = null;
- (v_prec = (p5call(NAMESPACE["Perlito5::Precedence"], "new", p5list_to_a('get_token', v_get_token, 'reduce', v_reduce_to_ast, 'end_token', (new p5HashRef(Hash_delim_token)), 'end_token_chars', (new p5ArrayRef(p5list_to_a(p5129.length([v_delimiter], 1))))), 0)));
+ (v_prec = (p5call(p5pkg["Perlito5::Precedence"], "new", p5list_to_a('get_token', v_get_token, 'reduce', v_reduce_to_ast, 'end_token', (new p5HashRef(Hash_delim_token)), 'end_token_chars', (new p5ArrayRef(p5list_to_a(p5129.length([v_delimiter], 1))))), 0)));
var v_res = null;
(v_res = (p5call(v_prec, "precedence_parse", [], 0)));
(v_res = (p5129.pop_term(p5list_to_a(v_res), 0)));
if ( !( p5bool((v_res != null))) ) {
(v_res = ('*undef*'));
};
- return (p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_last_pos, 'capture', v_res), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_last_pos, 'capture', v_res), p5want)], p5want));
});
p5make_sub("Perlito5::Expression", "ternary5_parse", function (List__, p5want) {
var v_self = null;
@@ -5450,7 +5450,7 @@ var p5100 = NAMESPACE['main'];
else {
(function () {
var v_m = null;
- (v_m = (p5call(NAMESPACE["Perlito5::Expression"], "op_parse_spc", p5list_to_a(v_str, v_last_pos, v_last_is_term), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Expression"], "op_parse_spc", p5list_to_a(v_str, v_last_pos, v_last_is_term), 0)));
if ( !( p5bool(v_m)) ) {
throw(p5context([(new p5ArrayRef(p5list_to_a('end', '*end*')))], p5want));
};
@@ -5459,7 +5459,7 @@ var p5100 = NAMESPACE['main'];
null;
}
else {
- (v_last_is_term = (NAMESPACE["Perlito5::Precedence"].is_term(p5list_to_a(v_v), 0)));
+ (v_last_is_term = (p5pkg["Perlito5::Precedence"].is_term(p5list_to_a(v_v), 0)));
};
if ( (p5str((v_v || (v_v = new p5ArrayRef([])))._array_[0]) != 'end') ) {
(v_last_pos = (p5call(v_m, "to", [], 0)));
@@ -5478,7 +5478,7 @@ var p5100 = NAMESPACE['main'];
}
}));
var v_prec = null;
- (v_prec = (p5call(NAMESPACE["Perlito5::Precedence"], "new", p5list_to_a('get_token', v_get_token, 'reduce', v_reduce_to_ast, 'end_token', v_Expr_end_token, 'end_token_chars', v_Expr_end_token_chars), 0)));
+ (v_prec = (p5call(p5pkg["Perlito5::Precedence"], "new", p5list_to_a('get_token', v_get_token, 'reduce', v_reduce_to_ast, 'end_token', v_Expr_end_token, 'end_token_chars', v_Expr_end_token_chars), 0)));
var v_res = null;
(v_res = (p5call(v_prec, "precedence_parse", [], 0)));
if ( (p5num(p5129.scalar([(v_res || (v_res = new p5ArrayRef([])))._array_], 0)) == 0) ) {
@@ -5486,7 +5486,7 @@ var p5100 = NAMESPACE['main'];
};
var v_result = null;
(v_result = (p5129.pop_term(p5list_to_a(v_res), 0)));
- return (p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_last_pos, 'capture', (new p5HashRef(p5a_to_h(p5list_to_a('exp', v_result, 'terminated', v_terminated))))), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_last_pos, 'capture', (new p5HashRef(p5a_to_h(p5list_to_a('exp', v_result, 'terminated', v_terminated))))), p5want)], p5want));
}
catch(err) {
if ( err instanceof Error ) {
@@ -5501,17 +5501,17 @@ var p5100 = NAMESPACE['main'];
(List_Statement_chars = p5list_to_a(9, 8, 7, 6, 5, 4, 3, 2, 1));
var Hash_Statement = {};
(Hash_Statement = p5a_to_h(p5list_to_a('if', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar"], "if", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Grammar"], "if", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'unless', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar"], "unless", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Grammar"], "unless", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'when', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar"], "when", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Grammar"], "when", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'for', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar"], "for", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Grammar"], "for", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'while', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar"], "while", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Grammar"], "while", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}, 'sub', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar"], "named_sub", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Grammar"], "named_sub", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
})));
p5make_sub("Perlito5::Expression", "add_statement", function (List__, p5want) {
var v_name = null;
@@ -5608,16 +5608,16 @@ var p5100 = NAMESPACE['main'];
p5129.die([p5list_to_a('Expected expression after ' + String.fromCharCode(39), p5call(v_modifier, "flat", [], 1), String.fromCharCode(39))], null);
};
if ( (p5str(v_modifier) == 'if') ) {
- throw(p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', p5call(v_modifier_exp, "to", [], 1), 'capture', p5call(NAMESPACE["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call(v_modifier_exp, "flat", [], p5want) || (p5call(v_modifier_exp, "flat", [], p5want) = new p5HashRef({})))._hash_['exp'], 'body', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef(p5list_to_a(v_expression)))), 1), 'otherwise', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef([]))), 1)), 1)), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', p5call(v_modifier_exp, "to", [], 1), 'capture', p5call(p5pkg["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call(v_modifier_exp, "flat", [], p5want) || (p5call(v_modifier_exp, "flat", [], p5want) = new p5HashRef({})))._hash_['exp'], 'body', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef(p5list_to_a(v_expression)))), 1), 'otherwise', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef([]))), 1)), 1)), p5want)], p5want));
};
if ( (p5str(v_modifier) == 'unless') ) {
- throw(p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', p5call(v_modifier_exp, "to", [], 1), 'capture', p5call(NAMESPACE["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call(v_modifier_exp, "flat", [], p5want) || (p5call(v_modifier_exp, "flat", [], p5want) = new p5HashRef({})))._hash_['exp'], 'body', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef([]))), 1), 'otherwise', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef(p5list_to_a(v_expression)))), 1)), 1)), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', p5call(v_modifier_exp, "to", [], 1), 'capture', p5call(p5pkg["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call(v_modifier_exp, "flat", [], p5want) || (p5call(v_modifier_exp, "flat", [], p5want) = new p5HashRef({})))._hash_['exp'], 'body', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef([]))), 1), 'otherwise', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef(p5list_to_a(v_expression)))), 1)), 1)), p5want)], p5want));
};
if ( (p5str(v_modifier) == 'while') ) {
- throw(p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', p5call(v_modifier_exp, "to", [], 1), 'capture', p5call(NAMESPACE["Perlito5::AST::While"], "new", p5list_to_a('cond', (p5call(v_modifier_exp, "flat", [], p5want) || (p5call(v_modifier_exp, "flat", [], p5want) = new p5HashRef({})))._hash_['exp'], 'body', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef(p5list_to_a(v_expression)))), 1)), 1)), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', p5call(v_modifier_exp, "to", [], 1), 'capture', p5call(p5pkg["Perlito5::AST::While"], "new", p5list_to_a('cond', (p5call(v_modifier_exp, "flat", [], p5want) || (p5call(v_modifier_exp, "flat", [], p5want) = new p5HashRef({})))._hash_['exp'], 'body', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef(p5list_to_a(v_expression)))), 1)), 1)), p5want)], p5want));
};
if ( ((p5str(v_modifier) == 'for') || (p5str(v_modifier) == 'foreach')) ) {
- throw(p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', p5call(v_modifier_exp, "to", [], 1), 'capture', p5call(NAMESPACE["Perlito5::AST::For"], "new", p5list_to_a('cond', (p5call(v_modifier_exp, "flat", [], p5want) || (p5call(v_modifier_exp, "flat", [], p5want) = new p5HashRef({})))._hash_['exp'], 'body', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef(p5list_to_a(v_expression)))), 1)), 1)), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', p5call(v_modifier_exp, "to", [], 1), 'capture', p5call(p5pkg["Perlito5::AST::For"], "new", p5list_to_a('cond', (p5call(v_modifier_exp, "flat", [], p5want) || (p5call(v_modifier_exp, "flat", [], p5want) = new p5HashRef({})))._hash_['exp'], 'body', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef(p5list_to_a(v_expression)))), 1)), 1)), p5want)], p5want));
};
return (p5context([p5129.die([p5list_to_a(('Unexpected statement modifier ' + String.fromCharCode(39) + p5str(v_modifier) + String.fromCharCode(39)))], p5want)], p5want));
}
@@ -5638,7 +5638,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -5649,7 +5649,7 @@ var p5100 = NAMESPACE['main'];
(v_m = (v_MATCH));
if ( !( p5bool((function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -5671,7 +5671,7 @@ var p5100 = NAMESPACE['main'];
(v_m = (v_MATCH));
if ( !( p5bool((function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -5713,7 +5713,7 @@ var p5100 = NAMESPACE['main'];
(v_m = (v_MATCH));
if ( !( p5bool((function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -5787,7 +5787,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -5806,7 +5806,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Expression"], "term_paren", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Expression"], "term_paren", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'] = v_m2);
@@ -5829,7 +5829,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Expression"], "term_curly", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Expression"], "term_curly", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_curly'] = v_m2);
@@ -5878,7 +5878,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'] = v_m2);
@@ -5905,7 +5905,7 @@ var p5100 = NAMESPACE['main'];
if ( !( p5bool((v_body != null))) ) {
p5130.die([p5list_to_a('Missing code block in ' + String.fromCharCode(39) + 'if' + String.fromCharCode(39))], null);
};
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2], 'body', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', p5or(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'], "flat", [], 1), function () { return (new p5ArrayRef([])) })), 1), 'otherwise', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', v_body), 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2], 'body', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', p5or(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'], "flat", [], 1), function () { return (new p5ArrayRef([])) })), 1), 'otherwise', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', v_body), 1)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want), function () { return p5context([(function () {
@@ -5916,7 +5916,7 @@ var p5100 = NAMESPACE['main'];
if ( !( p5bool((v_body != null))) ) {
p5130.die([p5list_to_a('Missing code block in ' + String.fromCharCode(39) + 'unless' + String.fromCharCode(39))], null);
};
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2], 'body', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef([]))), 1), 'otherwise', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', v_body), 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2], 'body', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef([]))), 1), 'otherwise', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', v_body), 1)), p5want));
return (p5context([1], p5want));
})()], p5want)], p5want)], p5want));
})()], p5want) })], p5want));
@@ -5933,7 +5933,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -5952,7 +5952,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Expression"], "term_paren", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Expression"], "term_paren", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'] = v_m2);
@@ -5975,7 +5975,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Expression"], "term_curly", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Expression"], "term_curly", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_curly'] = v_m2);
@@ -6024,7 +6024,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'] = v_m2);
@@ -6051,7 +6051,7 @@ var p5100 = NAMESPACE['main'];
if ( !( p5bool((v_body != null))) ) {
p5130.die([p5list_to_a('Missing code block in ' + String.fromCharCode(39) + 'if' + String.fromCharCode(39))], null);
};
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2], 'body', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', v_body), 1), 'otherwise', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', p5or(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'], "flat", [], 1), function () { return (new p5ArrayRef([])) })), 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2], 'body', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', v_body), 1), 'otherwise', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', p5or(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'], "flat", [], 1), function () { return (new p5ArrayRef([])) })), 1)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want), function () { return p5context([(function () {
@@ -6085,7 +6085,7 @@ var p5100 = NAMESPACE['main'];
if ( !( p5bool((v_body != null))) ) {
p5130.die([p5list_to_a('Missing code block in ' + String.fromCharCode(39) + 'if' + String.fromCharCode(39))], null);
};
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2], 'body', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', v_body), 1), 'otherwise', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef(p5list_to_a(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['if'], "flat", [], 1))))), 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2], 'body', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', v_body), 1), 'otherwise', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef(p5list_to_a(p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['if'], "flat", [], 1))))), 1)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want)], p5want));
})()], p5want) }), function () { return p5context([(function () {
@@ -6096,7 +6096,7 @@ var p5100 = NAMESPACE['main'];
if ( !( p5bool((v_body != null))) ) {
p5130.die([p5list_to_a('Missing code block in ' + String.fromCharCode(39) + 'if' + String.fromCharCode(39))], null);
};
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2], 'body', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', v_body), 1), 'otherwise', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef([]))), 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::If"], "new", p5list_to_a('cond', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.term_paren'], "flat", [], p5want) = new p5ArrayRef([])))._array_[2], 'body', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', v_body), 1), 'otherwise', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (new p5ArrayRef([]))), 1)), p5want));
return (p5context([1], p5want));
})()], p5want)], p5want)], p5want));
})()], p5want) })], p5want));
@@ -6113,7 +6113,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -6149,7 +6149,7 @@ var p5100 = NAMESPACE['main'];
if ( !( p5bool((v_body != null))) ) {
p5130.die([p5list_to_a('Missing code block in ' + String.fromCharCode(39) + 'when' + String.fromCharCode(39))], null);
};
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["When"], "new", p5list_to_a('parameters', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['exp'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['exp'], "flat", [], p5want) = new p5HashRef({})))._hash_['exp'], 'body', v_body), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["When"], "new", p5list_to_a('parameters', (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['exp'], "flat", [], p5want) || (p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['exp'], "flat", [], p5want) = new p5HashRef({})))._hash_['exp'], 'body', v_body), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want)], p5want));
@@ -6164,7 +6164,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -6207,7 +6207,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "var_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "var_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_ident'] = v_m2);
@@ -6230,7 +6230,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([p5and(('(' == p5130.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Expression"], "paren_parse", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Expression"], "paren_parse", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.paren_parse'] = v_m2);
@@ -6264,7 +6264,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'] = v_m2);
@@ -6286,7 +6286,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([0], p5want));
}
})()], p5want) }), function () { return p5context([p5and(('}' == p5130.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::For"], "new", p5list_to_a('cond', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.paren_parse'], "flat", [], 1), 'topic', null, 'body', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'], "flat", [], 1), 'sig', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_ident'], "flat", [], 1)), 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::For"], "new", p5list_to_a('cond', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.paren_parse'], "flat", [], 1), 'topic', null, 'body', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'], "flat", [], 1), 'sig', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.var_ident'], "flat", [], 1)), 1)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want), function () { return p5context([(function () {
@@ -6304,7 +6304,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want), function () { return p5context([p5and(('(' == p5130.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Expression"], "paren_parse", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Expression"], "paren_parse", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.paren_parse'] = v_m2);
@@ -6338,7 +6338,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'] = v_m2);
@@ -6360,7 +6360,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([0], p5want));
}
})()], p5want) }), function () { return p5context([p5and(('}' == p5130.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::For"], "new", p5list_to_a('cond', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.paren_parse'], "flat", [], 1), 'topic', null, 'body', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'], "flat", [], 1), 'sig', null), 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::For"], "new", p5list_to_a('cond', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.paren_parse'], "flat", [], 1), 'topic', null, 'body', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'], "flat", [], 1), 'sig', null), 1)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want)], p5want));
})()], p5want) })], p5want));
@@ -6377,7 +6377,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -6396,7 +6396,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([p5and(('(' == p5130.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Expression"], "paren_parse", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Expression"], "paren_parse", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.paren_parse'] = v_m2);
@@ -6430,7 +6430,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'] = v_m2);
@@ -6452,7 +6452,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([0], p5want));
}
})()], p5want) }), function () { return p5context([p5and(('}' == p5130.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::While"], "new", p5list_to_a('cond', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.paren_parse'], "flat", [], 1), 'body', p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'], "flat", [], 1), 'sig', null), 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::While"], "new", p5list_to_a('cond', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.paren_parse'], "flat", [], 1), 'body', p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.exp_stmts'], "flat", [], 1), 'sig', null), 1)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want)], p5want));
@@ -6467,32 +6467,32 @@ var p5100 = NAMESPACE['main'];
var p5131 = p5make_package("Perlito5::Grammar::String");
// use Perlito5::Precedence
;
- NAMESPACE["Perlito5::Precedence"].add_term(p5list_to_a(String.fromCharCode(39), function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::String"], "term_single_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Precedence"].add_term(p5list_to_a(String.fromCharCode(39), function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::String"], "term_single_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Precedence"].add_term(p5list_to_a('"', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::String"], "term_double_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Precedence"].add_term(p5list_to_a('"', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::String"], "term_double_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Precedence"].add_term(p5list_to_a('<<', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::String"], "here_doc_wanted", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Precedence"].add_term(p5list_to_a('<<', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::String"], "here_doc_wanted", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Precedence"].add_term(p5list_to_a('q', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::String"], "term_q_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Precedence"].add_term(p5list_to_a('q', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::String"], "term_q_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Precedence"].add_term(p5list_to_a('qq', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::String"], "term_qq_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Precedence"].add_term(p5list_to_a('qq', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::String"], "term_qq_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Precedence"].add_term(p5list_to_a('qw', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::String"], "term_qw_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Precedence"].add_term(p5list_to_a('qw', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::String"], "term_qw_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Precedence"].add_term(p5list_to_a('/', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::String"], "term_slash_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Precedence"].add_term(p5list_to_a('/', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::String"], "term_slash_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Precedence"].add_term(p5list_to_a('m', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::String"], "term_m_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Precedence"].add_term(p5list_to_a('m', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::String"], "term_m_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Precedence"].add_term(p5list_to_a('s', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::String"], "term_s_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Precedence"].add_term(p5list_to_a('s', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::String"], "term_s_quote", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
p5make_sub("Perlito5::Grammar::String", "term_double_quote", function (List__, p5want) {
var v_grammar = null;
@@ -6502,7 +6502,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -6536,7 +6536,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -6570,7 +6570,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -6585,7 +6585,7 @@ var p5100 = NAMESPACE['main'];
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_pos1);
return (p5context([p5context([p5and(p5and(p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -6597,14 +6597,14 @@ var p5100 = NAMESPACE['main'];
})()], p5want), function () { return p5context([(function () {
var v_tmp = null;
(v_tmp = (v_MATCH));
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
var v_res = null;
(v_res = (p5context([(function () {
var v_pos1 = null;
(v_pos1 = ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']));
return (p5context([p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "word", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "word", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -6658,7 +6658,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -6673,7 +6673,7 @@ var p5100 = NAMESPACE['main'];
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_pos1);
return (p5context([p5context([p5and(p5and(p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -6685,14 +6685,14 @@ var p5100 = NAMESPACE['main'];
})()], p5want), function () { return p5context([(function () {
var v_tmp = null;
(v_tmp = (v_MATCH));
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
var v_res = null;
(v_res = (p5context([(function () {
var v_pos1 = null;
(v_pos1 = ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']));
return (p5context([p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "word", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "word", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -6746,7 +6746,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -6761,7 +6761,7 @@ var p5100 = NAMESPACE['main'];
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_pos1);
return (p5context([p5context([p5and(p5and(p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -6773,14 +6773,14 @@ var p5100 = NAMESPACE['main'];
})()], p5want), function () { return p5context([(function () {
var v_tmp = null;
(v_tmp = (v_MATCH));
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
var v_res = null;
(v_res = (p5context([(function () {
var v_pos1 = null;
(v_pos1 = ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']));
return (p5context([p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "word", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "word", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -6834,7 +6834,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -6868,7 +6868,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -6883,7 +6883,7 @@ var p5100 = NAMESPACE['main'];
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_pos1);
return (p5context([p5context([p5and(p5and(p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -6895,14 +6895,14 @@ var p5100 = NAMESPACE['main'];
})()], p5want), function () { return p5context([(function () {
var v_tmp = null;
(v_tmp = (v_MATCH));
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
var v_res = null;
(v_res = (p5context([(function () {
var v_pos1 = null;
(v_pos1 = ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']));
return (p5context([p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "word", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "word", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -6956,7 +6956,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -6971,7 +6971,7 @@ var p5100 = NAMESPACE['main'];
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_pos1);
return (p5context([p5context([p5and(p5and(p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -6983,14 +6983,14 @@ var p5100 = NAMESPACE['main'];
})()], p5want), function () { return p5context([(function () {
var v_tmp = null;
(v_tmp = (v_MATCH));
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
var v_res = null;
(v_res = (p5context([(function () {
var v_pos1 = null;
(v_pos1 = ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']));
return (p5context([p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "word", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "word", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -7087,8 +7087,8 @@ var p5100 = NAMESPACE['main'];
var v_m = null;
(v_m = (p5call(v_self, "string_interpolation_parse", p5list_to_a(v_str, v_pos, v_open_delimiter, v_delimiter, 0), 0)));
if ( p5bool(v_m) ) {
- ((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'list:<,>', 'arguments', (new p5ArrayRef(p5list_to_a(p5map(p5131, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', NAMESPACE["Perlito5::Grammar::String"]["v__"]), p5want)], p5want));
+ ((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'list:<,>', 'arguments', (new p5ArrayRef(p5list_to_a(p5map(p5131, function (p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', p5pkg["Perlito5::Grammar::String"]["v__"]), p5want)], p5want));
}, p5list_to_a(p5131.split(p5list_to_a(' ', (p5call(v_m, "flat", [], p5want) || (p5call(v_m, "flat", [], p5want) = new p5HashRef({})))._hash_['buf']), 1)))))), 'namespace', ''), p5want));
};
return (p5context([v_m], p5want));
@@ -7119,18 +7119,18 @@ var p5100 = NAMESPACE['main'];
throw(p5context([v_part1], p5want));
};
var v_str_regex = null;
- (v_str_regex = (p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', p5131.substr([v_str, v_pos, (p5num((p5num((v_part1 || (v_part1 = new p5HashRef({})))._hash_['to']) - p5num(v_pos))) - 1)], 1)), 0)));
+ (v_str_regex = (p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', p5131.substr([v_str, v_pos, (p5num((p5num((v_part1 || (v_part1 = new p5HashRef({})))._hash_['to']) - p5num(v_pos))) - 1)], 1)), 0)));
var v_m = null;
var v_p = null;
(v_p = ((v_part1 || (v_part1 = new p5HashRef({})))._hash_['to']));
var v_modifiers = null;
(v_modifiers = (''));
- (v_m = (p5call(NAMESPACE["Perlito5::Grammar"], "ident", p5list_to_a(v_str, v_p), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Grammar"], "ident", p5list_to_a(v_str, v_p), 0)));
if ( p5bool(v_m) ) {
(v_modifiers = (p5call(v_m, "flat", [], 0)));
((v_part1 || (v_part1 = new p5HashRef({})))._hash_['to'] = (v_m || (v_m = new p5HashRef({})))._hash_['to']);
};
- ((v_part1 || (v_part1 = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'p5:m', 'arguments', (new p5ArrayRef(p5list_to_a(v_str_regex, v_modifiers))), 'namespace', ''), p5want));
+ ((v_part1 || (v_part1 = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'p5:m', 'arguments', (new p5ArrayRef(p5list_to_a(v_str_regex, v_modifiers))), 'namespace', ''), p5want));
return (p5context([v_part1], p5want));
}
catch(err) {
@@ -7168,14 +7168,14 @@ var p5100 = NAMESPACE['main'];
throw(p5context([v_part1], p5want));
};
var v_str_regex = null;
- (v_str_regex = (p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', p5131.substr([v_str, v_pos, (p5num((p5num((v_part1 || (v_part1 = new p5HashRef({})))._hash_['to']) - p5num(v_pos))) - 1)], 1)), 0)));
+ (v_str_regex = (p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', p5131.substr([v_str, v_pos, (p5num((p5num((v_part1 || (v_part1 = new p5HashRef({})))._hash_['to']) - p5num(v_pos))) - 1)], 1)), 0)));
var v_part2 = null;
var v_m = null;
var v_p = null;
(v_p = ((v_part1 || (v_part1 = new p5HashRef({})))._hash_['to']));
if ( (Hash_pair).hasOwnProperty(v_delimiter) ) {
(function () {
- (v_m = (p5call(NAMESPACE["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, v_p), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Grammar"], "opt_ws", p5list_to_a(v_str, v_p), 0)));
(v_p = ((v_m || (v_m = new p5HashRef({})))._hash_['to']));
(v_delimiter = (p5131.substr([v_str, v_p, 1], 0)));
var v_open_delimiter = null;
@@ -7206,12 +7206,12 @@ var p5100 = NAMESPACE['main'];
(v_p = ((v_part2 || (v_part2 = new p5HashRef({})))._hash_['to']));
var v_modifiers = null;
(v_modifiers = (''));
- (v_m = (p5call(NAMESPACE["Perlito5::Grammar"], "ident", p5list_to_a(v_str, v_p), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Grammar"], "ident", p5list_to_a(v_str, v_p), 0)));
if ( p5bool(v_m) ) {
(v_modifiers = (p5call(v_m, "flat", [], 0)));
((v_part2 || (v_part2 = new p5HashRef({})))._hash_['to'] = (v_m || (v_m = new p5HashRef({})))._hash_['to']);
};
- ((v_part2 || (v_part2 = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'p5:s', 'arguments', (new p5ArrayRef(p5list_to_a(v_str_regex, p5call(v_part2, "flat", [], 1), v_modifiers))), 'namespace', ''), p5want));
+ ((v_part2 || (v_part2 = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'p5:s', 'arguments', (new p5ArrayRef(p5list_to_a(v_str_regex, p5call(v_part2, "flat", [], 1), v_modifiers))), 'namespace', ''), p5want));
return (p5context([v_part2], p5want));
}
catch(err) {
@@ -7264,7 +7264,7 @@ var p5100 = NAMESPACE['main'];
(v_more = (v_delimiter));
}
else {
- (v_m = (( p5bool(v_interpolate) ? p5call(NAMESPACE["Perlito5::Grammar::String"], "double_quoted_buf", p5list_to_a(v_str, v_p, v_delimiter), 0) : p5call(NAMESPACE["Perlito5::Grammar::String"], "single_quoted_unescape", p5list_to_a(v_str, v_p), 0))));
+ (v_m = (( p5bool(v_interpolate) ? p5call(p5pkg["Perlito5::Grammar::String"], "double_quoted_buf", p5list_to_a(v_str, v_p, v_delimiter), 0) : p5call(p5pkg["Perlito5::Grammar::String"], "single_quoted_unescape", p5list_to_a(v_str, v_p), 0))));
};
};
if ( p5bool(v_m) ) {
@@ -7277,7 +7277,7 @@ var p5100 = NAMESPACE['main'];
};
if ( p5bool(v_obj) ) {
if ( p5bool(p5131.length([v_buf], 0)) ) {
- p5131.push([List_args, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', v_buf), 1))], null);
+ p5131.push([List_args, p5list_to_a(p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', v_buf), 1))], null);
(v_buf = (''));
};
p5131.push([List_args, p5list_to_a(v_obj)], null);
@@ -7307,7 +7307,7 @@ var p5100 = NAMESPACE['main'];
})();
};
if ( p5bool(p5131.length([v_buf], 0)) ) {
- p5131.push([List_args, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', v_buf), 1))], null);
+ p5131.push([List_args, p5list_to_a(p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', v_buf), 1))], null);
};
if ( (p5131.substr([v_str, v_p, p5131.length([v_delimiter], 0)], 0) != p5str(v_delimiter)) ) {
p5131.die([p5list_to_a(('Can' + String.fromCharCode(39) + 't find string terminator ' + String.fromCharCode(39) + p5str(v_delimiter) + String.fromCharCode(39) + ' anywhere before EOF'))], null);
@@ -7315,17 +7315,17 @@ var p5100 = NAMESPACE['main'];
(v_p = ((p5num(v_p) + p5131.length([v_delimiter], 0))));
var v_ast = null;
if ( !( p5bool(List_args.length)) ) {
- (v_ast = (p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', ''), 0)));
+ (v_ast = (p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', ''), 0)));
}
else {
if ( (p5num(List_args.length) == 1) ) {
(v_ast = (List_args[0]));
}
else {
- (v_ast = (p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', 'list:<.>', 'arguments', (new p5ArrayRef(List_args))), 0)));
+ (v_ast = (p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('namespace', '', 'code', 'list:<.>', 'arguments', (new p5ArrayRef(List_args))), 0)));
};
};
- return (p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_p, 'capture', v_ast), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_p, 'capture', v_ast), p5want)], p5want));
});
var List_Here_doc = [];
p5make_sub("Perlito5::Grammar::String", "here_doc_wanted", function (List__, p5want) {
@@ -7364,7 +7364,7 @@ var p5100 = NAMESPACE['main'];
(v_p = ((p5num(v_p) + 1)));
};
var v_m = null;
- (v_m = (p5call(NAMESPACE["Perlito5::Grammar"], "ident", p5list_to_a(v_str, v_p), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Grammar"], "ident", p5list_to_a(v_str, v_p), 0)));
if ( p5bool(v_m) ) {
(v_p = ((v_m || (v_m = new p5HashRef({})))._hash_['to']));
(v_delimiter = (p5call(v_m, "flat", [], 0)));
@@ -7381,9 +7381,9 @@ var p5100 = NAMESPACE['main'];
throw(p5context([0], p5want));
};
var v_placeholder = null;
- (v_placeholder = (p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'list:<.>', 'namespace', '', 'arguments', (new p5ArrayRef(p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'list:<.>', 'namespace', '', 'arguments', (new p5ArrayRef([]))), 1))))), 0)));
+ (v_placeholder = (p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'list:<.>', 'namespace', '', 'arguments', (new p5ArrayRef(p5list_to_a(p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'list:<.>', 'namespace', '', 'arguments', (new p5ArrayRef([]))), 1))))), 0)));
p5131.push([List_Here_doc, p5list_to_a((new p5ArrayRef(p5list_to_a(v_type, (((v_placeholder || (v_placeholder = new p5HashRef({})))._hash_['arguments'] || ((v_placeholder || (v_placeholder = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0] || (((v_placeholder || (v_placeholder = new p5HashRef({})))._hash_['arguments'] || ((v_placeholder || (v_placeholder = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0] = new p5HashRef({})))._hash_['arguments'], v_delimiter))))], null);
- return (p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_p, 'capture', (new p5ArrayRef(p5list_to_a('term', v_placeholder)))), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_p, 'capture', (new p5ArrayRef(p5list_to_a('term', v_placeholder)))), p5want)], p5want));
}
catch(err) {
if ( err instanceof Error ) {
@@ -7402,7 +7402,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -7443,7 +7443,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
if ( !( p5bool(List_Here_doc.length)) ) {
- throw(p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos, 'capture', null), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos, 'capture', null), p5want)], p5want));
};
var v_p = null;
(v_p = (v_pos));
@@ -7459,7 +7459,7 @@ var p5100 = NAMESPACE['main'];
for ( ; (p5num(v_p) < p5131.length([v_str], 0)); ) {
if ( (p5131.substr([v_str, v_p, p5131.length([v_delimiter], 0)], 0) == p5str(v_delimiter)) ) {
(function () {
- p5131.push([(v_result || (v_result = new p5ArrayRef([])))._array_, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', p5131.substr([v_str, v_pos, (p5num(v_p) - p5num(v_pos))], 1)), 1))], null);
+ p5131.push([(v_result || (v_result = new p5ArrayRef([])))._array_, p5list_to_a(p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', p5131.substr([v_str, v_pos, (p5num(v_p) - p5num(v_pos))], 1)), 1))], null);
(v_p = ((p5num(v_p) + p5131.length([v_delimiter], 0))));
var v_m = null;
(v_m = (p5call(v_self, "newline", p5list_to_a(v_str, v_p), 0)));
@@ -7467,7 +7467,7 @@ var p5100 = NAMESPACE['main'];
if ( p5bool(v_m) ) {
(v_p = ((v_m || (v_m = new p5HashRef({})))._hash_['to']));
};
- throw(p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', (p5num(v_p) - 1), 'capture', null), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', (p5num(v_p) - 1), 'capture', null), p5want)], p5want));
};
})();
};
@@ -7486,17 +7486,17 @@ var p5100 = NAMESPACE['main'];
(v_p = ((p5num(v_p) + p5131.length([v_delimiter], 0))));
(v_m = (p5call(v_self, "newline", p5list_to_a(v_str, v_p), 0)));
if ( ((p5num(v_p) >= p5131.length([v_str], 0)) || p5bool(v_m)) ) {
- p5131.push([(v_result || (v_result = new p5ArrayRef([])))._array_, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', ''), 1))], null);
+ p5131.push([(v_result || (v_result = new p5ArrayRef([])))._array_, p5list_to_a(p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', ''), 1))], null);
if ( p5bool(v_m) ) {
(v_p = ((v_m || (v_m = new p5HashRef({})))._hash_['to']));
};
- throw(p5context([p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_p, 'capture', null), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_p, 'capture', null), p5want)], p5want));
};
};
(v_m = (p5call(v_self, "string_interpolation_parse", p5list_to_a(v_str, v_pos, '', (String.fromCharCode(10) + p5str(v_delimiter) + String.fromCharCode(10)), 1), 0)));
if ( p5bool(v_m) ) {
p5131.push([(v_result || (v_result = new p5ArrayRef([])))._array_, p5list_to_a(p5call(v_m, "flat", [], 1))], null);
- p5131.push([(v_result || (v_result = new p5ArrayRef([])))._array_, p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', String.fromCharCode(10)), 1))], null);
+ p5131.push([(v_result || (v_result = new p5ArrayRef([])))._array_, p5list_to_a(p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', String.fromCharCode(10)), 1))], null);
((v_m || (v_m = new p5HashRef({})))._hash_['to'] = (p5num((v_m || (v_m = new p5HashRef({})))._hash_['to']) - 1));
throw(p5context([v_m], p5want));
};
@@ -7539,7 +7539,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -7558,20 +7558,20 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
(v_pos1 = ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']));
return (p5context([p5or(p5context([(function () {
return (p5context([p5and(p5and(p5context([p5and((String.fromCharCode(92) == p5131.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([p5and((String.fromCharCode(92) == p5131.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', String.fromCharCode(92)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', String.fromCharCode(92)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want), function () { return p5context([(function () {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_pos1);
return (p5context([p5context([p5and(p5and(p5context([p5and((String.fromCharCode(92) == p5131.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([p5and((String.fromCharCode(39) == p5131.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', String.fromCharCode(39)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', String.fromCharCode(39)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want)], p5want));
})()], p5want) })], p5want));
@@ -7591,7 +7591,7 @@ var p5100 = NAMESPACE['main'];
if ( (((p5131.substr([v_str, v_pos, 1], 0) == '$') || (p5131.substr([v_str, v_pos, 1], 0) == '@')) && (p5131.substr([v_str, (p5num(v_pos) + 1), p5131.length([v_delimiter], 0)], 0) != p5str(v_delimiter))) ) {
(function () {
var v_m = null;
- (v_m = (p5call(NAMESPACE["Perlito5::Expression"], "term_sigil", p5list_to_a(v_str, v_pos), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Expression"], "term_sigil", p5list_to_a(v_str, v_pos), 0)));
if ( p5bool(v_m) ) {
null;
}
@@ -7605,7 +7605,7 @@ var p5100 = NAMESPACE['main'];
var v_m_index = null;
if ( (p5131.substr([v_str, v_p, 1], 0) == '[') ) {
(v_p)++;
- (v_m_index = (p5call(NAMESPACE["Perlito5::Expression"], "list_parse", p5list_to_a(v_str, v_p), 0)));
+ (v_m_index = (p5call(p5pkg["Perlito5::Expression"], "list_parse", p5list_to_a(v_str, v_p), 0)));
if ( p5bool(v_m_index) ) {
(function () {
var v_exp = null;
@@ -7613,20 +7613,20 @@ var p5100 = NAMESPACE['main'];
(v_p = ((v_m_index || (v_m_index = new p5HashRef({})))._hash_['to']));
if ( ((p5str(v_exp) != '*undef*') && (p5131.substr([v_str, v_p, 1], 0) == ']')) ) {
(v_p)++;
- ((v_m_index || (v_m_index = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Index"], "new", p5list_to_a('obj', v_var, 'index_exp', v_exp), p5want));
+ ((v_m_index || (v_m_index = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Index"], "new", p5list_to_a('obj', v_var, 'index_exp', v_exp), p5want));
((v_m_index || (v_m_index = new p5HashRef({})))._hash_['to'] = v_p);
throw(p5context([v_m_index], p5want));
};
})();
};
};
- (v_m_index = (p5call(NAMESPACE["Perlito5::Expression"], "term_curly", p5list_to_a(v_str, (v_m || (v_m = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m_index = (p5call(p5pkg["Perlito5::Expression"], "term_curly", p5list_to_a(v_str, (v_m || (v_m = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m_index) ) {
- ((v_m_index || (v_m_index = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Lookup"], "new", p5list_to_a('obj', v_var, 'index_exp', ((p5call(v_m_index, "flat", [], p5want) || (p5call(v_m_index, "flat", [], p5want) = new p5ArrayRef([])))._array_[2] || ((p5call(v_m_index, "flat", [], p5want) || (p5call(v_m_index, "flat", [], p5want) = new p5ArrayRef([])))._array_[2] = new p5ArrayRef([])))._array_[0]), p5want));
+ ((v_m_index || (v_m_index = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Lookup"], "new", p5list_to_a('obj', v_var, 'index_exp', ((p5call(v_m_index, "flat", [], p5want) || (p5call(v_m_index, "flat", [], p5want) = new p5ArrayRef([])))._array_[2] || ((p5call(v_m_index, "flat", [], p5want) || (p5call(v_m_index, "flat", [], p5want) = new p5ArrayRef([])))._array_[2] = new p5ArrayRef([])))._array_[0]), p5want));
throw(p5context([v_m_index], p5want));
};
if ( (p5131.substr([v_str, v_pos, 1], 0) == '@') ) {
- ((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'join', 'arguments', (new p5ArrayRef(p5list_to_a(p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', ' '), 1), v_var))), 'namespace', ''), p5want));
+ ((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'join', 'arguments', (new p5ArrayRef(p5list_to_a(p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', ' '), 1), v_var))), 'namespace', ''), p5want));
}
else {
((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = v_var);
@@ -7639,7 +7639,7 @@ var p5100 = NAMESPACE['main'];
(function () {
var v_m = null;
(v_m = (p5call(v_self, "double_quoted_unescape", p5list_to_a(v_str, (p5num(v_pos) + 1)), 0)));
- ((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', p5call(v_m, "flat", [], 1)), p5want));
+ ((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Val::Buf"], "new", p5list_to_a('buf', p5call(v_m, "flat", [], 1)), p5want));
throw(p5context([v_m], p5want));
})();
};
@@ -7663,7 +7663,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -7740,11 +7740,11 @@ var p5100 = NAMESPACE['main'];
;
// use Perlito5::Grammar
;
- NAMESPACE["Perlito5::Precedence"].add_term(p5list_to_a('no', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::Use"], "term_use", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Precedence"].add_term(p5list_to_a('no', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::Use"], "term_use", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Precedence"].add_term(p5list_to_a('use', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::Use"], "term_use", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Precedence"].add_term(p5list_to_a('use', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::Use"], "term_use", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
var Hash_Perlito_internal_module = {};
(Hash_Perlito_internal_module = p5a_to_h(p5list_to_a('strict', 'Perlito5::strict', 'warnings', 'Perlito5::warnings')));
@@ -7756,7 +7756,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -7779,7 +7779,7 @@ var p5100 = NAMESPACE['main'];
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -7799,7 +7799,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -7810,7 +7810,7 @@ var p5100 = NAMESPACE['main'];
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "full_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "full_ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.full_ident'] = v_m2);
@@ -7829,7 +7829,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([p5context([(function () {
return (p5context([p5and(p5context([p5and(('-' == p5132.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "ident", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
if ( (v_MATCH)._hash_.hasOwnProperty('Perlito5::Grammar.ident') ) {
@@ -7852,7 +7852,7 @@ var p5100 = NAMESPACE['main'];
return (p5context([1], p5want));
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Expression"], "list_parse", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Expression"], "list_parse", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.list_parse'] = v_m2);
@@ -7877,7 +7877,7 @@ var p5100 = NAMESPACE['main'];
var List_list = [];
(List_list = p5list_to_a((function () {
var r = null;
-NAMESPACE["main"]["v_@"] = "";
+p5pkg["main"]["v_@"] = "";
try {
r = eval(perl5_to_js(p5str(v_list_code), "Perlito5::Grammar::Use", (new p5ArrayRef(p5list_to_a((new p5HashRef(p5a_to_h(p5list_to_a('$list_code', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))), '$m', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))), '@list', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))))))), (new p5HashRef(p5a_to_h(p5list_to_a('$list', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))))))), (new p5HashRef(p5a_to_h([]))), (new p5HashRef(p5a_to_h(p5list_to_a('$pos1', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))))))), (new p5HashRef(p5a_to_h(p5list_to_a('$MATCH', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))), '$grammar', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))), '$pos', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))), '$str', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))), '$tmp', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))))))), (new p5HashRef(p5a_to_h(p5list_to_a('$_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5::Grammar::Use')))), '$a', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5::Grammar::Use')))), '$b', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5::Grammar::Use')))), '%Perlito_internal_module', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))))))), (new p5HashRef(p5a_to_h(p5list_to_a('$_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5')))), '$a', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5')))), '$b', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5')))))))), (new p5HashRef(p5a_to_h(p5list_to_a('$@', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$^O', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$a', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$b', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '%ENV', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '%INC', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@#', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@ARGV', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@INC', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))))))))))))
}
@@ -7885,7 +7885,7 @@ catch(err) {
if ( err instanceof p5_error ) {
}
else if ( err instanceof Error ) {
-NAMESPACE["main"]["v_@"] = err;
+p5pkg["main"]["v_@"] = err;
}
else {
throw(err);
@@ -7897,7 +7897,7 @@ return r;
})();
};
var v_ast = null;
- (v_ast = (p5call(NAMESPACE["Perlito5::AST::Use"], "new", p5list_to_a('code', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['use_decl'], "flat", [], 1), 'mod', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.full_ident'], "flat", [], 1), 'arguments', v_list), 0)));
+ (v_ast = (p5call(p5pkg["Perlito5::AST::Use"], "new", p5list_to_a('code', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['use_decl'], "flat", [], 1), 'mod', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.full_ident'], "flat", [], 1), 'arguments', v_list), 0)));
p5132.parse_time_eval(p5list_to_a(v_ast), null);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a('term', v_ast))));
return (p5context([1], p5want));
@@ -7937,13 +7937,13 @@ return r;
}
else {
- if ( p5bool(NAMESPACE["Perlito5"]["v_EXPAND_USE"]) ) {
+ if ( p5bool(p5pkg["Perlito5"]["v_EXPAND_USE"]) ) {
if ( (Hash_Perlito_internal_module).hasOwnProperty(v_module_name) ) {
(v_module_name = (Hash_Perlito_internal_module[v_module_name]));
};
var v_filename = null;
(v_filename = (p5132.modulename_to_filename(p5list_to_a(v_module_name), 0)));
- NAMESPACE["Perlito5::Grammar::Use"]["require"]([p5str(v_filename)]);
+ p5pkg["Perlito5::Grammar::Use"]["require"]([p5str(v_filename)]);
if ( !( p5bool(v_skip_import)) ) {
if ( (p5str(v_use_or_not) == 'use') ) {
if ( p5bool((p5code_lookup_by_name("Perlito5::Grammar::Use", (p5str(v_module_name) + '::import')) != null)) ) {
@@ -7987,12 +7987,12 @@ return r;
(v_self = (p5132.shift([List__])));
if ( (p5str(p5call(v_self, "mod", [], 0)) == 'strict') ) {
if ( (p5str(p5call(v_self, "code", [], 0)) == 'use') ) {
- return (p5context([p5call(NAMESPACE["Perlito5::strict"], "import", [], p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::strict"], "import", [], p5want)], p5want));
}
else {
if ( (p5str(p5call(v_self, "code", [], 0)) == 'no') ) {
- return (p5context([p5call(NAMESPACE["Perlito5::strict"], "unimport", [], p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::strict"], "unimport", [], p5want)], p5want));
}
else {
@@ -8008,14 +8008,14 @@ return r;
p5make_sub("Perlito5::Grammar::Use", "modulename_to_filename", function (List__, p5want) {
var v_s = null;
(v_s = (p5132.shift([List__])));
- return (p5context([(p5str(NAMESPACE["Perlito5::Runtime"]._replace(p5list_to_a(v_s, '::', '/'), 0)) + '.pm')], p5want));
+ return (p5context([(p5str(p5pkg["Perlito5::Runtime"]._replace(p5list_to_a(v_s, '::', '/'), 0)) + '.pm')], p5want));
});
p5make_sub("Perlito5::Grammar::Use", "filename_lookup", function (List__, p5want) {
try {
var v_filename = null;
(v_filename = (p5132.shift([List__])));
- if ( (NAMESPACE["main"]["Hash_INC"]).hasOwnProperty(v_filename) ) {
- if ( p5bool(NAMESPACE["main"]["Hash_INC"][v_filename]) ) {
+ if ( (p5pkg["main"]["Hash_INC"]).hasOwnProperty(v_filename) ) {
+ if ( p5bool(p5pkg["main"]["Hash_INC"][v_filename]) ) {
throw(p5context(['done'], p5want));
};
p5132.die([p5list_to_a('Compilation failed in require')], null);
@@ -8024,10 +8024,10 @@ return r;
var v_realfilename = null;
(v_realfilename = ((p5str(v_prefix) + '/' + p5str(v_filename))));
if ( p5bool(p5is_file(p5str(v_realfilename))) ) {
- (NAMESPACE["main"]["Hash_INC"][v_filename] = v_realfilename);
+ (p5pkg["main"]["Hash_INC"][v_filename] = v_realfilename);
throw(p5context(['todo'], p5want));
};
- }, p5list_to_a(NAMESPACE["main"]["List_INC"]));
+ }, p5list_to_a(p5pkg["main"]["List_INC"]));
return (p5context([p5132.die([p5list_to_a(('Can' + String.fromCharCode(39) + 't find ' + p5str(v_filename) + ' in @INC'))], p5want)], p5want));
}
catch(err) {
@@ -8056,15 +8056,15 @@ return r;
throw(p5context([], p5want));
};
var v_realfilename = null;
- (v_realfilename = (NAMESPACE["main"]["Hash_INC"][v_filename]));
+ (v_realfilename = (p5pkg["main"]["Hash_INC"][v_filename]));
var v_source = null;
- (v_source = (NAMESPACE["Perlito5::IO"].slurp(p5list_to_a(v_realfilename), 0)));
+ (v_source = (p5pkg["Perlito5::IO"].slurp(p5list_to_a(v_realfilename), 0)));
var v_m = null;
- (v_m = (p5call(NAMESPACE["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_source, 0), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_source, 0), 0)));
if ( (p5num((v_m || (v_m = new p5HashRef({})))._hash_['to']) != p5132.length([v_source], 0)) ) {
p5132.die([p5list_to_a('Syntax Error near ', (v_m || (v_m = new p5HashRef({})))._hash_['to'])], null);
};
- return (p5context([p5132.push([(v_comp_units || (v_comp_units = new p5ArrayRef([])))._array_, p5list_to_a((p5132.add_comp_unit(p5list_to_a((new p5ArrayRef(p5list_to_a(p5call(NAMESPACE["Perlito5::AST::CompUnit"], "new", p5list_to_a('name', 'main', 'body', p5call(v_m, "flat", [], 1)), 1))))), p5want) || (p5132.add_comp_unit(p5list_to_a((new p5ArrayRef(p5list_to_a(p5call(NAMESPACE["Perlito5::AST::CompUnit"], "new", p5list_to_a('name', 'main', 'body', p5call(v_m, "flat", [], 1)), 1))))), p5want) = new p5ArrayRef([])))._array_)], p5want)], p5want));
+ return (p5context([p5132.push([(v_comp_units || (v_comp_units = new p5ArrayRef([])))._array_, p5list_to_a((p5132.add_comp_unit(p5list_to_a((new p5ArrayRef(p5list_to_a(p5call(p5pkg["Perlito5::AST::CompUnit"], "new", p5list_to_a('name', 'main', 'body', p5call(v_m, "flat", [], 1)), 1))))), p5want) || (p5132.add_comp_unit(p5list_to_a((new p5ArrayRef(p5list_to_a(p5call(p5pkg["Perlito5::AST::CompUnit"], "new", p5list_to_a('name', 'main', 'body', p5call(v_m, "flat", [], 1)), 1))))), p5want) = new p5ArrayRef([])))._array_)], p5want)], p5want));
}
catch(err) {
if ( err instanceof Error ) {
@@ -8104,17 +8104,17 @@ return r;
if ( (p5str(p5132.filename_lookup(p5list_to_a(v_filename), 0)) == 'done') ) {
throw(p5context([], p5want));
};
- (NAMESPACE["Perlito5::Grammar::Use"]["v_result"] = ((function () {
+ (p5pkg["Perlito5::Grammar::Use"]["v_result"] = ((function () {
var r = null;
-NAMESPACE["main"]["v_@"] = "";
+p5pkg["main"]["v_@"] = "";
try {
-r = eval(perl5_to_js(p5str(NAMESPACE["Perlito5::IO"].slurp(p5list_to_a(NAMESPACE["main"]["Hash_INC"][v_filename]), 0)), "Perlito5::Grammar::Use", (new p5ArrayRef(p5list_to_a((new p5HashRef(p5a_to_h(p5list_to_a('$filename', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))))))), (new p5HashRef(p5a_to_h(p5list_to_a('$_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5::Grammar::Use')))), '$a', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5::Grammar::Use')))), '$b', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5::Grammar::Use')))), '%Perlito_internal_module', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))))))), (new p5HashRef(p5a_to_h(p5list_to_a('$_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5')))), '$a', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5')))), '$b', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5')))))))), (new p5HashRef(p5a_to_h(p5list_to_a('$@', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$^O', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$a', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$b', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '%ENV', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '%INC', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@#', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@ARGV', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@INC', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))))))))))))
+r = eval(perl5_to_js(p5str(p5pkg["Perlito5::IO"].slurp(p5list_to_a(p5pkg["main"]["Hash_INC"][v_filename]), 0)), "Perlito5::Grammar::Use", (new p5ArrayRef(p5list_to_a((new p5HashRef(p5a_to_h(p5list_to_a('$filename', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))))))), (new p5HashRef(p5a_to_h(p5list_to_a('$_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5::Grammar::Use')))), '$a', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5::Grammar::Use')))), '$b', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5::Grammar::Use')))), '%Perlito_internal_module', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))))))), (new p5HashRef(p5a_to_h(p5list_to_a('$_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5')))), '$a', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5')))), '$b', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'Perlito5')))))))), (new p5HashRef(p5a_to_h(p5list_to_a('$@', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$^O', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$a', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '$b', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '%ENV', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '%INC', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@#', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@ARGV', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@INC', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'our', 'namespace', 'main')))), '@_', (new p5HashRef(p5a_to_h(p5list_to_a('decl', 'my')))))))))))))
}
catch(err) {
if ( err instanceof p5_error ) {
}
else if ( err instanceof Error ) {
-NAMESPACE["main"]["v_@"] = err;
+p5pkg["main"]["v_@"] = err;
}
else {
throw(err);
@@ -8122,19 +8122,19 @@ throw(err);
}
return r;
})()));
- if ( p5bool(NAMESPACE["main"]["v_@"]) ) {
- (NAMESPACE["main"]["Hash_INC"][v_filename] = null);
- return (p5context([p5132.die([p5list_to_a(NAMESPACE["main"]["v_@"])], p5want)], p5want));
+ if ( p5bool(p5pkg["main"]["v_@"]) ) {
+ (p5pkg["main"]["Hash_INC"][v_filename] = null);
+ return (p5context([p5132.die([p5list_to_a(p5pkg["main"]["v_@"])], p5want)], p5want));
}
else {
- if ( !( p5bool(NAMESPACE["Perlito5::Grammar::Use"]["v_result"])) ) {
- (delete NAMESPACE["main"]["Hash_INC"][v_filename]);
+ if ( !( p5bool(p5pkg["Perlito5::Grammar::Use"]["v_result"])) ) {
+ (delete p5pkg["main"]["Hash_INC"][v_filename]);
return (p5context([p5132.die([p5list_to_a((p5str(v_filename) + ' did not return true value'))], p5want)], p5want));
}
else {
- throw(p5context([NAMESPACE["Perlito5::Grammar::Use"]["v_result"]], p5want))
+ throw(p5context([p5pkg["Perlito5::Grammar::Use"]["v_result"]], p5want))
}
}
}
@@ -8154,23 +8154,23 @@ return r;
var p5133 = p5make_package("Perlito5::Grammar::Block");
// use Perlito5::Expression
;
- NAMESPACE["Perlito5::Expression"].add_statement(p5list_to_a('{', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::Block"], "term_block", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Expression"].add_statement(p5list_to_a('{', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::Block"], "term_block", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Expression"].add_statement(p5list_to_a('BEGIN', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::Block"], "term_block", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Expression"].add_statement(p5list_to_a('BEGIN', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::Block"], "term_block", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Expression"].add_statement(p5list_to_a('UNITCHECK', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::Block"], "term_block", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Expression"].add_statement(p5list_to_a('UNITCHECK', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::Block"], "term_block", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Expression"].add_statement(p5list_to_a('CHECK', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::Block"], "term_block", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Expression"].add_statement(p5list_to_a('CHECK', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::Block"], "term_block", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Expression"].add_statement(p5list_to_a('INIT', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::Block"], "term_block", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Expression"].add_statement(p5list_to_a('INIT', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::Block"], "term_block", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
- NAMESPACE["Perlito5::Expression"].add_statement(p5list_to_a('END', function (List__, p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar::Block"], "term_block", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
+ p5pkg["Perlito5::Expression"].add_statement(p5list_to_a('END', function (List__, p5want) {
+ return (p5context([p5call(p5pkg["Perlito5::Grammar::Block"], "term_block", p5list_to_a(List__[0], List__[1]), p5want)], p5want));
}), null);
p5make_sub("Perlito5::Grammar::Block", "term_block", function (List__, p5want) {
try {
@@ -8184,26 +8184,26 @@ return r;
(v_p = (v_pos));
var v_block_name = null;
var v_m_name = null;
- (v_m_name = (p5call(NAMESPACE["Perlito5::Grammar"], "ident", p5list_to_a(v_str, v_p), 0)));
+ (v_m_name = (p5call(p5pkg["Perlito5::Grammar"], "ident", p5list_to_a(v_str, v_p), 0)));
if ( p5bool(v_m_name) ) {
(v_p = ((v_m_name || (v_m_name = new p5HashRef({})))._hash_['to']));
(v_block_name = (p5call(v_m_name, "flat", [], 0)));
};
var v_m = null;
- (v_m = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, v_p), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, v_p), 0)));
if ( p5bool(v_m) ) {
(v_p = ((v_m || (v_m = new p5HashRef({})))._hash_['to']));
};
if ( (p5133.substr([v_str, v_p, 1], 0) == '{') ) {
(function () {
var v_m = null;
- (v_m = (p5call(NAMESPACE["Perlito5::Expression"], "term_curly", p5list_to_a(v_str, v_p), 0)));
+ (v_m = (p5call(p5pkg["Perlito5::Expression"], "term_curly", p5list_to_a(v_str, v_p), 0)));
if ( p5bool(v_m) ) {
(function () {
var v_v = null;
(v_v = (p5call(v_m, "flat", [], 0)));
- (v_v = (p5call(NAMESPACE["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (v_v || (v_v = new p5ArrayRef([])))._array_[2], 'sig', (v_v || (v_v = new p5ArrayRef([])))._array_[3]), 0)));
- (v_v = (NAMESPACE["Perlito5::Expression"].block_or_hash(p5list_to_a(v_v), 0)));
+ (v_v = (p5call(p5pkg["Perlito5::AST::Lit::Block"], "new", p5list_to_a('stmts', (v_v || (v_v = new p5ArrayRef([])))._array_[2], 'sig', (v_v || (v_v = new p5ArrayRef([])))._array_[3]), 0)));
+ (v_v = (p5pkg["Perlito5::Expression"].block_or_hash(p5list_to_a(v_v), 0)));
if ( (p5str(p5133.ref([v_v], 0)) == 'Perlito5::AST::Lit::Block') ) {
((v_v || (v_v = new p5HashRef({})))._hash_['name'] = v_block_name);
((v_m || (v_m = new p5HashRef({})))._hash_['capture'] = v_v);
@@ -8256,7 +8256,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -8278,7 +8278,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -8287,7 +8287,7 @@ return r;
return (p5context([p5and(p5context([(function () {
var v_tmp = null;
(v_tmp = (v_MATCH));
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
var v_res = null;
(v_res = (p5context([(function () {
var v_pos1 = null;
@@ -8319,7 +8319,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -8328,7 +8328,7 @@ return r;
return (p5context([p5and(p5context([(function () {
var v_tmp = null;
(v_tmp = (v_MATCH));
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
var v_res = null;
(v_res = (p5context([(function () {
var v_pos1 = null;
@@ -8394,7 +8394,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -8461,7 +8461,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -8481,7 +8481,7 @@ return r;
})()], p5want), function () { return p5context([(function () {
var v_tmp = null;
(v_tmp = (v_MATCH));
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
var v_res = null;
(v_res = (p5context([(function () {
var v_pos1 = null;
@@ -8516,7 +8516,7 @@ return r;
})()], p5want) }), function () { return p5context([(function () {
var v_tmp = null;
(v_tmp = (v_MATCH));
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
var v_res = null;
(v_res = (p5context([(function () {
var v_pos1 = null;
@@ -8554,7 +8554,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -8620,7 +8620,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -8726,7 +8726,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -8832,7 +8832,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -8913,7 +8913,7 @@ return r;
})()], p5want) })], p5want));
})()], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar::String"], "here_doc", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar::String"], "here_doc", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -9032,7 +9032,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9067,7 +9067,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9102,7 +9102,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9137,7 +9137,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9171,7 +9171,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9179,7 +9179,7 @@ return r;
return (p5context([p5context([(function () {
return (p5context([p5and(p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Expression"], "exp_parse", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Expression"], "exp_parse", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.exp_parse'] = v_m2);
@@ -9205,7 +9205,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9213,7 +9213,7 @@ return r;
return (p5context([p5context([(function () {
return (p5context([p5and(p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Expression"], "exp_parse", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Expression"], "exp_parse", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.exp_parse'] = v_m2);
@@ -9239,7 +9239,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9279,7 +9279,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9328,7 +9328,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9359,7 +9359,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9403,7 +9403,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9446,7 +9446,7 @@ return r;
return (p5context([0], p5want));
}
})()], p5want) }), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Var"], "new", p5list_to_a('sigil', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_sigil'], "flat", [], 1), 'namespace', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['optional_namespace_before_ident'], "flat", [], 1), 'name', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_name'], "flat", [], 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Var"], "new", p5list_to_a('sigil', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_sigil'], "flat", [], 1), 'namespace', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['optional_namespace_before_ident'], "flat", [], 1), 'name', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['var_name'], "flat", [], 1)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want)], p5want));
@@ -9461,7 +9461,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9535,7 +9535,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9667,7 +9667,7 @@ return r;
return (p5context([p5context([p5and(p5and(p5and(p5context([p5and(('.' == p5130.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 1], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (1 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([(function () {
var v_tmp = null;
(v_tmp = (v_MATCH));
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to'], 'to', (v_tmp || (v_tmp = new p5HashRef({})))._hash_['to']), 0)));
var v_res = null;
(v_res = (p5context([(function () {
var v_pos1 = null;
@@ -9731,7 +9731,7 @@ return r;
})()], p5want) })], p5want)], p5want));
})()], p5want) })], p5want));
})()], p5want), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Val::Num"], "new", p5list_to_a('num', p5call(v_MATCH, "flat", [], 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Val::Num"], "new", p5list_to_a('num', p5call(v_MATCH, "flat", [], 1)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want)], p5want));
@@ -9746,7 +9746,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9797,7 +9797,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -9934,7 +9934,7 @@ return r;
})()], p5want) })], p5want)], p5want));
})()], p5want) })], p5want));
})()], p5want), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Val::Int"], "new", p5list_to_a('int', p5130.oct([p5call(v_MATCH, "flat", [], 0)], 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Val::Int"], "new", p5list_to_a('int', p5130.oct([p5call(v_MATCH, "flat", [], 0)], 1)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want), function () { return p5context([(function () {
@@ -9974,7 +9974,7 @@ return r;
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_to);
return (p5context([(p5num(v_count) > 0)], p5want));
})()], p5want), function () { return p5context([(function () {
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Val::Int"], "new", p5list_to_a('int', p5call(v_MATCH, "flat", [], 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Val::Int"], "new", p5list_to_a('int', p5call(v_MATCH, "flat", [], 1)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want)], p5want));
})()], p5want) })], p5want));
@@ -9990,14 +9990,14 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
(v_pos1 = ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']));
return (p5context([p5context([(function () {
return (p5context([p5and(p5and(p5context([(function () {
- p5130.push([List_PKG, p5list_to_a(NAMESPACE["Perlito5"]["v_PKG_NAME"])], null);
+ p5130.push([List_PKG, p5list_to_a(p5pkg["Perlito5"]["v_PKG_NAME"])], null);
return (p5context([1], p5want));
})()], p5want), function () { return p5context([(function () {
var v_last_match_null = null;
@@ -10008,7 +10008,7 @@ return r;
(v_to = ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']));
for ( ; (p5bool((function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Expression"], "delimited_statement", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Expression"], "delimited_statement", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
if ( (v_MATCH)._hash_.hasOwnProperty('Perlito5::Expression.delimited_statement') ) {
@@ -10037,9 +10037,9 @@ return r;
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = v_to);
return (p5context([1], p5want));
})()], p5want) }), function () { return p5context([(function () {
- (NAMESPACE["Perlito5"]["v_PKG_NAME"] = (p5130.pop([List_PKG], 0)));
+ (p5pkg["Perlito5"]["v_PKG_NAME"] = (p5130.pop([List_PKG], 0)));
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = (new p5ArrayRef(p5list_to_a(p5map(p5130, function (p5want) {
- return (p5context([p5call(NAMESPACE["Perlito5::Grammar"]["v__"], "capture", [], p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::Grammar"]["v__"], "capture", [], p5want)], p5want));
}, p5list_to_a(((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.delimited_statement'] || ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Expression.delimited_statement'] = new p5ArrayRef([])))._array_))))));
return (p5context([1], p5want));
})()], p5want) })], p5want));
@@ -10055,7 +10055,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -10125,7 +10125,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -10198,7 +10198,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -10279,7 +10279,7 @@ return r;
if ( (p5str(v_sig) == '*undef*') ) {
(v_sig = (null));
};
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Sub"], "new", p5list_to_a('name', null, 'namespace', null, 'sig', v_sig, 'block', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['exp_stmts'], "flat", [], 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Sub"], "new", p5list_to_a('name', null, 'namespace', null, 'sig', v_sig, 'block', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['exp_stmts'], "flat", [], 1)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want)], p5want));
@@ -10294,7 +10294,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -10409,17 +10409,17 @@ return r;
null;
}
else {
- (v_namespace = (NAMESPACE["Perlito5"]["v_PKG_NAME"]));
+ (v_namespace = (p5pkg["Perlito5"]["v_PKG_NAME"]));
};
var v_full_name = null;
(v_full_name = ((p5str(v_namespace) + '::' + p5str(v_name))));
- if ( (NAMESPACE["Perlito5"]["v_PROTO"])._hash_.hasOwnProperty(v_full_name) ) {
+ if ( (p5pkg["Perlito5"]["v_PROTO"])._hash_.hasOwnProperty(v_full_name) ) {
p5130.warn([p5list_to_a(('Subroutine ' + p5str(v_full_name) + ' redefined'))], null);
};
- ((NAMESPACE["Perlito5"]["v_PROTO"] || (NAMESPACE["Perlito5"]["v_PROTO"] = new p5HashRef({})))._hash_[v_full_name] = v_sig);
+ ((p5pkg["Perlito5"]["v_PROTO"] || (p5pkg["Perlito5"]["v_PROTO"] = new p5HashRef({})))._hash_[v_full_name] = v_sig);
})();
};
- ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(NAMESPACE["Perlito5::AST::Sub"], "new", p5list_to_a('name', v_name, 'namespace', v_namespace, 'sig', v_sig, 'block', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['exp_stmts'], "flat", [], 1)), p5want));
+ ((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['capture'] = p5call(p5pkg["Perlito5::AST::Sub"], "new", p5list_to_a('name', v_name, 'namespace', v_namespace, 'sig', v_sig, 'block', p5call((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['exp_stmts'], "flat", [], 1)), p5want));
return (p5context([1], p5want));
})()], p5want) })], p5want));
})()], p5want)], p5want));
@@ -10434,7 +10434,7 @@ return r;
var v_pos = null;
(v_pos = (List__[2]));
var v_MATCH = null;
- (v_MATCH = (p5call(NAMESPACE["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
+ (v_MATCH = (p5call(p5pkg["Perlito5::Match"], "new", p5list_to_a('str', v_str, 'from', v_pos, 'to', v_pos), 0)));
var v_tmp = null;
(v_tmp = (p5context([p5context([(function () {
var v_pos1 = null;
@@ -10442,7 +10442,7 @@ return r;
return (p5context([p5context([(function () {
return (p5context([p5and(p5and(p5and(p5context([p5and(('sub' == p5130.substr([v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'], 3], 0)), function () { return p5context([((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (3 + p5num((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'])))], p5want) })], p5want), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "ws", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
return (p5context([1], p5want));
@@ -10453,7 +10453,7 @@ return r;
}
})()], p5want) }), function () { return p5context([(function () {
var v_m2 = null;
- (v_m2 = (p5call(NAMESPACE["Perlito5::Grammar"], "named_sub_def", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
+ (v_m2 = (p5call(p5pkg["Perlito5::Grammar"], "named_sub_def", p5list_to_a(v_str, (v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to']), 0)));
if ( p5bool(v_m2) ) {
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['to'] = (v_m2 || (v_m2 = new p5HashRef({})))._hash_['to']);
((v_MATCH || (v_MATCH = new p5HashRef({})))._hash_['Perlito5::Grammar.named_sub_def'] = v_m2);
@@ -10497,7 +10497,7 @@ return r;
throw(p5context([0], p5want));
};
if ( (Hash_op).hasOwnProperty(v_code) ) {
- throw(p5context([p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'infix:<=>', 'arguments', (new p5ArrayRef(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0], p5call(NAMESPACE["Perlito5::AST::Apply"], "new", p5list_to_a('code', Hash_op[v_code], 'arguments', (v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 1))))), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', 'infix:<=>', 'arguments', (new p5ArrayRef(p5list_to_a(((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] || ((v_self || (v_self = new p5HashRef({})))._hash_['arguments'] = new p5ArrayRef([])))._array_[0], p5call(p5pkg["Perlito5::AST::Apply"], "new", p5list_to_a('code', Hash_op[v_code], 'arguments', (v_self || (v_self = new p5HashRef({})))._hash_['arguments']), 1))))), p5want)], p5want));
};
return (p5context([0], p5want));
}
@@ -10531,9 +10531,9 @@ return r;
var v_args = null;
(v_args = (p5call(v_stmt, "arguments", [], 0)));
if ( (p5num((v_args || (v_args = new p5ArrayRef([])))._array_) == 1) ) {
- throw(p5context([p5call(p5call(NAMESPACE["Perlito5::AST::Do"], "new", p5list_to_a('block', (v_args || (v_args = new p5ArrayRef([])))._array_[0]), p5want), "simplify", [], p5want)], p5want));
+ throw(p5context([p5call(p5call(p5pkg["Perlito5::AST::Do"], "new", p5list_to_a('block', (v_args || (v_args = new p5ArrayRef([])))._array_[0]), p5want), "simplify", [], p5want)], p5want));
};
- throw(p5context([p5call(NAMESPACE["Perlito5::AST::Do"], "new", p5list_to_a('block', v_block), p5want)], p5want));
+ throw(p5context([p5call(p5pkg["Perlito5::AST::Do"], "new", p5list_to_a('block', v_block), p5want)], p5want));
})();
};
if ( p5bool(p5call(v_stmt, "isa", p5list_to_a('Perlito5::AST::Do'), 0)) ) {
@@ -10541,7 +10541,7 @@ return r;
};
})();
};
- return (p5context([p5call(NAMESPACE["Perlito5::AST::Do"], "new", p5list_to_a('block', v_block), p5want)], p5want));
+ return (p5context([p5call(p5pkg["Perlito5::AST::Do"], "new", p5list_to_a('block', v_block), p5want)], p5want));
}
catch(err) {
if ( err instanceof Error ) {
@@ -10581,11 +10581,11 @@ return r;
(v_s = (p5134.shift([List__])));
return (p5context([p5134._replace(p5list_to_a(v_s, '::', '__'), p5want)], p5want));
});
- (NAMESPACE["Perlito5"]["v_EXPAND_USE"] = (1));
- (NAMESPACE["Perlito5"]["v_STRICT"] = (0));
- (NAMESPACE["Perlito5"]["v_WARNINGS"] = (0));
- (NAMESPACE["Perlito5"]["v_SPECIAL_VAR"] = ((new p5HashRef(p5a_to_h(p5list_to_a('$_', 'ARG', '$&', '$MATCH', '$`', '$PREMATCH', '$' + String.fromCharCode(39), '$POSTMATCH', '$+', '$LAST_PAREN_MATCH', '@+', '@LAST_MATCH_END', '%+', '%LAST_PAREN_MATCH', '@-', '@LAST_MATCH_START', '$|', 'autoflush', '$/', '$RS', '@_', '@ARG', '< $', '$EUID', '$.', '$NR', '< $< ', '$UID', '$(', '$GID', '$#', null, '$@', '$EVAL_ERROR', '$=', '$FORMAT_LINES_PER_PAGE', '$,', '$OFS', '$?', '$CHILD_ERROR', '$*', null, '$[', null, '$$', '$PID', '%-', null, '$~', '$FORMAT_NAME', '$-', '$FORMAT_LINES_LEFT', '$&', '$MATCH', '$%', '$FORMAT_PAGE_NUMBER', '$)', '$EGID', '$]', null, '$!', '$ERRNO', '$;', '$SUBSEP', '$' + String.fromCharCode(92), '$ORS', '%!', null, '$"', '$LIST_SEPARATOR', '$_', '$ARG', '$:', 'FORMAT_LINE_BREAK_CHARACTERS'))))));
- (NAMESPACE["Perlito5"]["v_CORE_PROTO"] = ((new p5HashRef(p5a_to_h(p5list_to_a('CORE::shutdown', '*$', 'CORE::chop', null, 'CORE::lstat', '*', 'CORE::rename', '$$', 'CORE::lock', String.fromCharCode(92) + '$', 'CORE::rand', ';$', 'CORE::gmtime', ';$', 'CORE::gethostbyname', '$', 'CORE::each', String.fromCharCode(92) + '[@%]', 'CORE::ref', '_', 'CORE::syswrite', '*$;$$', 'CORE::msgctl', '$$$', 'CORE::getnetbyname', '$', 'CORE::write', ';*', 'CORE::alarm', '_', 'CORE::print', null, 'CORE::getnetent', '', 'CORE::semget', '$$$', 'CORE::use', null, 'CORE::abs', '_', 'CORE::break', '', 'CORE::undef', null, 'CORE::no', null, 'CORE::eval', null, 'CORE::split', null, 'CORE::localtime', ';$', 'CORE::sort', null, 'CORE::chown', '@', 'CORE::endpwent', '', 'CORE::getpwent', '', 'CORE::pos', null, 'CORE::lcfirst', '_', 'CORE::kill', '@', 'CORE::send', '*$$;$', 'CORE::endprotoent', '', 'CORE::semctl', '$$$$', 'CORE::waitpid', '$$', 'CORE::utime', '@', 'CORE::dbmclose', String.fromCharCode(92) + '%', 'CORE::getpwnam', '$', 'CORE::substr', '$$;$$', 'CORE::listen', '*$', 'CORE::getprotoent', '', 'CORE::shmget', '$$$', 'CORE::our', null, 'CORE::readlink', '_', 'CORE::shmwrite', '$$$$', 'CORE::times', '', 'CORE::package', null, 'CORE::map', null, 'CORE::join', '$@', 'CORE::rmdir', '_', 'CORE::shmread', '$$$$', 'CORE::uc', '_', 'CORE::bless', '$;$', 'CORE::closedir', '*', 'CORE::getppid', '', 'CORE::tie', null, 'CORE::readdir', '*', 'CORE::gethostent', '', 'CORE::getlogin', '', 'CORE::last', null, 'CORE::gethostbyaddr', '$$', 'CORE::accept', '**', 'CORE::log', '_', 'CORE::tell', ';*', 'CORE::readline', ';*', 'CORE::tied', null, 'CORE::socket', '*$$$', 'CORE::umask', ';$', 'CORE::sysread', '*' + String.fromCharCode(92) + '$$;$', 'CORE::syscall', '$@', 'CORE::quotemeta', '_', 'CORE::dump', '', 'CORE::opendir', '*$', 'CORE::untie', null, 'CORE::truncate', '$$', 'CORE::select', ';*', 'CORE::sleep', ';$', 'CORE::seek', '*$$', 'CORE::read', '*' + String.fromCharCode(92) + '$$;$', 'CORE::rewinddir', '*', 'CORE::scalar', null, 'CORE::wantarray', '', 'CORE::oct', '_', 'CORE::bind', '*$', 'CORE::stat', '*', 'CORE::sqrt', '_', 'CORE::getc', ';*', 'CORE::fileno', '*', 'CORE::getpeername', '*', 'CORE::sin', '_', 'CORE::getnetbyaddr', '$$', 'CORE::grep', null, 'CORE::setservent', '$', 'CORE::sub', null, 'CORE::shmctl', '$$$', 'CORE::study', null, 'CORE::msgrcv', '$$$$$', 'CORE::setsockopt', '*$$$', 'CORE::int', '_', 'CORE::pop', ';' + String.fromCharCode(92) + '@', 'CORE::link', '$$', 'CORE::exec', null, 'CORE::setpwent', '', 'CORE::mkdir', '_;$', 'CORE::sysseek', '*$$', 'CORE::endservent', '', 'CORE::chr', '_', 'CORE::when', null, 'CORE::getpwuid', '$', 'CORE::setprotoent', '$', 'CORE::reverse', '@', 'CORE::say', null, 'CORE::goto', null, 'CORE::getgrent', '', 'CORE::endnetent', '', 'CORE::hex', '_', 'CORE::binmode', '*;$', 'CORE::formline', '$@', 'CORE::getgrnam', '$', 'CORE::ucfirst', '_', 'CORE::chdir', ';$', 'CORE::setnetent', '$', 'CORE::splice', String.fromCharCode(92) + '@;$$@', 'CORE::unlink', '@', 'CORE::time', '', 'CORE::push', String.fromCharCode(92) + '@@', 'CORE::exit', ';$', 'CORE::endgrent', '', 'CORE::unshift', String.fromCharCode(92) + '@@', 'CORE::local', null, 'CORE::my', null, 'CORE::cos', '_', 'CORE::redo', null, 'CORE::warn', '@', 'CORE::getsockname', '*', 'CORE::pipe', '**', 'CORE::sprintf', '$@', 'CORE::open', '*;$@', 'CORE::setpgrp', ';$$', 'CORE::exp', '_', 'CORE::seekdir', '*$', 'CORE::getservbyport', '$$', 'CORE::given', null, 'CORE::pack', '$@', 'CORE::msgget', '$$', 'CORE::rindex', '$$;$', 'CORE::srand', ';$', 'CORE::telldir', '*', 'CORE::connect', '*$', 'CORE::getprotobyname', '$', 'CORE::msgsnd', '$$$', 'CORE::length', '_', 'CORE::state', null, 'CORE::die', '@', 'CORE::delete', null, 'CORE::getservent', '', 'CORE::getservbyname', '$$', 'CORE::setpriority', '$$$', 'CORE::lc', '_', 'CORE::fcntl', '*$$', 'CORE::chroot', '_', 'CORE::recv', '*' + String.fromCharCode(92) + '$$$', 'CORE::dbmopen', String.fromCharCode(92) + '%$$', 'CORE::socketpair', '**$$$', 'CORE::vec', '$$$', 'CORE::system', null, 'CORE::defined', null, 'CORE::index', '$$;$', 'CORE::caller', ';$', 'CORE::close', ';*', 'CORE::atan2', '$$', 'CORE::semop', '$$', 'CORE::unpack', '$;$', 'CORE::ord', '_', 'CORE::chmod', '@', 'CORE::prototype', null, 'CORE::getprotobynumber', '$', 'CORE::values', String.fromCharCode(92) + '[@%]', 'CORE::chomp', null, 'CORE::ioctl', '*$$', 'CORE::eof', ';*', 'CORE::crypt', '$$', 'CORE::do', null, 'CORE::flock', '*$', 'CORE::wait', '', 'CORE::sethostent', '$', 'CORE::return', null, 'CORE::getsockopt', '*$$', 'CORE::fork', '', 'CORE::require', null, 'CORE::format', null, 'CORE::readpipe', '_', 'CORE::endhostent', '', 'CORE::getpgrp', ';$', 'CORE::setgrent', '', 'CORE::keys', String.fromCharCode(92) + '[@%]', 'CORE::glob', null, 'CORE::getpriority', '$$', 'CORE::reset', ';$', 'CORE::sysopen', '*$$;$', 'CORE::continue', '', 'CORE::next', null, 'CORE::getgrgid', '$', 'CORE::default', null, 'CORE::shift', ';' + String.fromCharCode(92) + '@', 'CORE::symlink', '$$', 'CORE::exists', null, 'CORE::printf', null))))));
+ (p5pkg["Perlito5"]["v_EXPAND_USE"] = (1));
+ (p5pkg["Perlito5"]["v_STRICT"] = (0));
+ (p5pkg["Perlito5"]["v_WARNINGS"] = (0));
+ (p5pkg["Perlito5"]["v_SPECIAL_VAR"] = ((new p5HashRef(p5a_to_h(p5list_to_a('$_', 'ARG', '$&', '$MATCH', '$`', '$PREMATCH', '$' + String.fromCharCode(39), '$POSTMATCH', '$+', '$LAST_PAREN_MATCH', '@+', '@LAST_MATCH_END', '%+', '%LAST_PAREN_MATCH', '@-', '@LAST_MATCH_START', '$|', 'autoflush', '$/', '$RS', '@_', '@ARG', '< $', '$EUID', '$.', '$NR', '< $< ', '$UID', '$(', '$GID', '$#', null, '$@', '$EVAL_ERROR', '$=', '$FORMAT_LINES_PER_PAGE', '$,', '$OFS', '$?', '$CHILD_ERROR', '$*', null, '$[', null, '$$', '$PID', '%-', null, '$~', '$FORMAT_NAME', '$-', '$FORMAT_LINES_LEFT', '$&', '$MATCH', '$%', '$FORMAT_PAGE_NUMBER', '$)', '$EGID', '$]', null, '$!', '$ERRNO', '$;', '$SUBSEP', '$' + String.fromCharCode(92), '$ORS', '%!', null, '$"', '$LIST_SEPARATOR', '$_', '$ARG', '$:', 'FORMAT_LINE_BREAK_CHARACTERS'))))));
+ (p5pkg["Perlito5"]["v_CORE_PROTO"] = ((new p5HashRef(p5a_to_h(p5list_to_a('CORE::shutdown', '*$', 'CORE::chop', null, 'CORE::lstat', '*', 'CORE::rename', '$$', 'CORE::lock', String.fromCharCode(92) + '$', 'CORE::rand', ';$', 'CORE::gmtime', ';$', 'CORE::gethostbyname', '$', 'CORE::each', String.fromCharCode(92) + '[@%]', 'CORE::ref', '_', 'CORE::syswrite', '*$;$$', 'CORE::msgctl', '$$$', 'CORE::getnetbyname', '$', 'CORE::write', ';*', 'CORE::alarm', '_', 'CORE::print', null, 'CORE::getnetent', '', 'CORE::semget', '$$$', 'CORE::use', null, 'CORE::abs', '_', 'CORE::break', '', 'CORE::undef', null, 'CORE::no', null, 'CORE::eval', null, 'CORE::split', null, 'CORE::localtime', ';$', 'CORE::sort', null, 'CORE::chown', '@', 'CORE::endpwent', '', 'CORE::getpwent', '', 'CORE::pos', null, 'CORE::lcfirst', '_', 'CORE::kill', '@', 'CORE::send', '*$$;$', 'CORE::endprotoent', '', 'CORE::semctl', '$$$$', 'CORE::waitpid', '$$', 'CORE::utime', '@', 'CORE::dbmclose', String.fromCharCode(92) + '%', 'CORE::getpwnam', '$', 'CORE::substr', '$$;$$', 'CORE::listen', '*$', 'CORE::getprotoent', '', 'CORE::shmget', '$$$', 'CORE::our', null, 'CORE::readlink', '_', 'CORE::shmwrite', '$$$$', 'CORE::times', '', 'CORE::package', null, 'CORE::map', null, 'CORE::join', '$@', 'CORE::rmdir', '_', 'CORE::shmread', '$$$$', 'CORE::uc', '_', 'CORE::bless', '$;$', 'CORE::closedir', '*', 'CORE::getppid', '', 'CORE::tie', null, 'CORE::readdir', '*', 'CORE::gethostent', '', 'CORE::getlogin', '', 'CORE::last', null, 'CORE::gethostbyaddr', '$$', 'CORE::accept', '**', 'CORE::log', '_', 'CORE::tell', ';*', 'CORE::readline', ';*', 'CORE::tied', null, 'CORE::socket', '*$$$', 'CORE::umask', ';$', 'CORE::sysread', '*' + String.fromCharCode(92) + '$$;$', 'CORE::syscall', '$@', 'CORE::quotemeta', '_', 'CORE::dump', '', 'CORE::opendir', '*$', 'CORE::untie', null, 'CORE::truncate', '$$', 'CORE::select', ';*', 'CORE::sleep', ';$', 'CORE::seek', '*$$', 'CORE::read', '*' + String.fromCharCode(92) + '$$;$', 'CORE::rewinddir', '*', 'CORE::scalar', null, 'CORE::wantarray', '', 'CORE::oct', '_', 'CORE::bind', '*$', 'CORE::stat', '*', 'CORE::sqrt', '_', 'CORE::getc', ';*', 'CORE::fileno', '*', 'CORE::getpeername', '*', 'CORE::sin', '_', 'CORE::getnetbyaddr', '$$', 'CORE::grep', null, 'CORE::setservent', '$', 'CORE::sub', null, 'CORE::shmctl', '$$$', 'CORE::study', null, 'CORE::msgrcv', '$$$$$', 'CORE::setsockopt', '*$$$', 'CORE::int', '_', 'CORE::pop', ';' + String.fromCharCode(92) + '@', 'CORE::link', '$$', 'CORE::exec', null, 'CORE::setpwent', '', 'CORE::mkdir', '_;$', 'CORE::sysseek', '*$$', 'CORE::endservent', '', 'CORE::chr', '_', 'CORE::when', null, 'CORE::getpwuid', '$', 'CORE::setprotoent', '$', 'CORE::reverse', '@', 'CORE::say', null, 'CORE::goto', null, 'CORE::getgrent', '', 'CORE::endnetent', '', 'CORE::hex', '_', 'CORE::binmode', '*;$', 'CORE::formline', '$@', 'CORE::getgrnam', '$', 'CORE::ucfirst', '_', 'CORE::chdir', ';$', 'CORE::setnetent', '$', 'CORE::splice', String.fromCharCode(92) + '@;$$@', 'CORE::unlink', '@', 'CORE::time', '', 'CORE::push', String.fromCharCode(92) + '@@', 'CORE::exit', ';$', 'CORE::endgrent', '', 'CORE::unshift', String.fromCharCode(92) + '@@', 'CORE::local', null, 'CORE::my', null, 'CORE::cos', '_', 'CORE::redo', null, 'CORE::warn', '@', 'CORE::getsockname', '*', 'CORE::pipe', '**', 'CORE::sprintf', '$@', 'CORE::open', '*;$@', 'CORE::setpgrp', ';$$', 'CORE::exp', '_', 'CORE::seekdir', '*$', 'CORE::getservbyport', '$$', 'CORE::given', null, 'CORE::pack', '$@', 'CORE::msgget', '$$', 'CORE::rindex', '$$;$', 'CORE::srand', ';$', 'CORE::telldir', '*', 'CORE::connect', '*$', 'CORE::getprotobyname', '$', 'CORE::msgsnd', '$$$', 'CORE::length', '_', 'CORE::state', null, 'CORE::die', '@', 'CORE::delete', null, 'CORE::getservent', '', 'CORE::getservbyname', '$$', 'CORE::setpriority', '$$$', 'CORE::lc', '_', 'CORE::fcntl', '*$$', 'CORE::chroot', '_', 'CORE::recv', '*' + String.fromCharCode(92) + '$$$', 'CORE::dbmopen', String.fromCharCode(92) + '%$$', 'CORE::socketpair', '**$$$', 'CORE::vec', '$$$', 'CORE::system', null, 'CORE::defined', null, 'CORE::index', '$$;$', 'CORE::caller', ';$', 'CORE::close', ';*', 'CORE::atan2', '$$', 'CORE::semop', '$$', 'CORE::unpack', '$;$', 'CORE::ord', '_', 'CORE::chmod', '@', 'CORE::prototype', null, 'CORE::getprotobynumber', '$', 'CORE::values', String.fromCharCode(92) + '[@%]', 'CORE::chomp', null, 'CORE::ioctl', '*$$', 'CORE::eof', ';*', 'CORE::crypt', '$$', 'CORE::do', null, 'CORE::flock', '*$', 'CORE::wait', '', 'CORE::sethostent', '$', 'CORE::return', null, 'CORE::getsockopt', '*$$', 'CORE::fork', '', 'CORE::require', null, 'CORE::format', null, 'CORE::readpipe', '_', 'CORE::endhostent', '', 'CORE::getpgrp', ';$', 'CORE::setgrent', '', 'CORE::keys', String.fromCharCode(92) + '[@%]', 'CORE::glob', null, 'CORE::getpriority', '$$', 'CORE::reset', ';$', 'CORE::sysopen', '*$$;$', 'CORE::continue', '', 'CORE::next', null, 'CORE::getgrgid', '$', 'CORE::default', null, 'CORE::shift', ';' + String.fromCharCode(92) + '@', 'CORE::symlink', '$$', 'CORE::exists', null, 'CORE::printf', null))))));
1;
})()
;
@@ -10594,11 +10594,11 @@ return r;
p5make_sub("Perlito5", "compile_p5_to_js", function (List__, p5want) {
var v_s = null;
(v_s = (p5101.shift([List__])));
- (NAMESPACE["Perlito5"]["v_PKG_NAME"] = ('main'));
- (NAMESPACE["Perlito5"]["v_PROTO"] = ((new p5HashRef(p5a_to_h([])))));
+ (p5pkg["Perlito5"]["v_PKG_NAME"] = ('main'));
+ (p5pkg["Perlito5"]["v_PROTO"] = ((new p5HashRef(p5a_to_h([])))));
var v_ast = null;
- (v_ast = (p5call(NAMESPACE["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_s, 0), 0)));
- return (p5context([NAMESPACE["Perlito5::AST::CompUnit"].emit_javascript_program(p5list_to_a((new p5ArrayRef(p5list_to_a(p5call(NAMESPACE["Perlito5::AST::CompUnit"], "new", p5list_to_a('name', 'main', 'body', p5call(v_ast, "flat", [], 1)), 1))))), p5want)], p5want));
+ (v_ast = (p5call(p5pkg["Perlito5::Grammar"], "exp_stmts", p5list_to_a(v_s, 0), 0)));
+ return (p5context([p5pkg["Perlito5::AST::CompUnit"].emit_javascript_program(p5list_to_a((new p5ArrayRef(p5list_to_a(p5call(p5pkg["Perlito5::AST::CompUnit"], "new", p5list_to_a('name', 'main', 'body', p5call(v_ast, "flat", [], 1)), 1))))), p5want)], p5want));
});
1;
})()
diff --git a/lib5/Perlito5/Javascript/CORE.pm b/lib5/Perlito5/Javascript/CORE.pm
index 9dbff3207..98d4e84cd 100644
--- a/lib5/Perlito5/Javascript/CORE.pm
+++ b/lib5/Perlito5/Javascript/CORE.pm
@@ -6,7 +6,7 @@ package main;
use v5;
package Perlito5::Javascript::CORE;
sub Perlito5::Javascript::CORE::emit_javascript {
- return ('//' . chr(10) . '//' . chr(10) . '// lib/Perlito5/Javascript/CORE.js' . chr(10) . '//' . chr(10) . '// CORE functions for "Perlito" Perl5-in-Javascript' . chr(10) . '//' . chr(10) . '// AUTHORS' . chr(10) . '//' . chr(10) . '// Flavio Soibelmann Glock fglock@gmail.com' . chr(10) . '//' . chr(10) . '// COPYRIGHT' . chr(10) . '//' . chr(10) . '// Copyright 2009, 2010, 2011, 2012 by Flavio Soibelmann Glock and others.' . chr(10) . '//' . chr(10) . '// This program is free software; you can redistribute it and/or modify it' . chr(10) . '// under the same terms as Perl itself.' . chr(10) . '//' . chr(10) . '// See http://www.perl.com/perl/misc/Artistic.html' . chr(10) . chr(10) . 'var CORE = NAMESPACE.CORE;' . chr(10) . chr(10) . 'var isNode = typeof require != "undefined";' . chr(10) . 'if (isNode) {' . chr(10) . ' CORE.print = function(List__) {' . chr(10) . ' var i;' . chr(10) . ' for (i = 0; i < List__.length; i++) {' . chr(10) . ' process.stdout.write(p5str(List__[i]));' . chr(10) . ' }' . chr(10) . ' return 1;' . chr(10) . ' }' . chr(10) . '} else {' . chr(10) . ' CORE.print = function(List__) {' . chr(10) . ' var i;' . chr(10) . ' for (i = 0; i < List__.length; i++) {' . chr(10) . ' write(p5str(List__[i]));' . chr(10) . ' }' . chr(10) . ' return 1;' . chr(10) . ' };' . chr(10) . '}' . chr(10) . chr(10) . 'CORE.say = function(List__) {' . chr(10) . ' CORE.print(List__);' . chr(10) . ' return CORE.print(["' . chr(92) . 'n"]);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.die = function(List__) {' . chr(10) . ' var i;' . chr(10) . ' var s = "";' . chr(10) . ' for (i = 0; i < List__.length; i++) {' . chr(10) . ' s = s + List__[i];' . chr(10) . ' // s = s + p5str(List__[i]);' . chr(10) . ' }' . chr(10) . ' NAMESPACE["main"]["v_@"] = "Died: " + s;' . chr(10) . ' throw(new p5_error("Died: " + s));' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.warn = function(List__) {' . chr(10) . ' var i;' . chr(10) . ' var s = "";' . chr(10) . ' for (i = 0; i < List__.length; i++) {' . chr(10) . ' s = s + List__[i];' . chr(10) . ' // s = s + p5str(List__[i]);' . chr(10) . ' }' . chr(10) . ' CORE.print(["Warning: " + s + "' . chr(92) . 'n"]);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.bless = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' var pkg_name = List__[1];' . chr(10) . ' if (typeof pkg_name === "object") {' . chr(10) . ' // bless {}, Class' . chr(10) . ' o._class_ = pkg_name;' . chr(10) . ' return o;' . chr(10) . ' }' . chr(10) . ' if (!NAMESPACE.hasOwnProperty(pkg_name)) {' . chr(10) . ' p5make_package(pkg_name);' . chr(10) . ' }' . chr(10) . ' o._class_ = NAMESPACE[pkg_name];' . chr(10) . ' return o;' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.chr = function(List__) {' . chr(10) . ' return String.fromCharCode(p5num(List__[0]));' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.ord = function(List__) {' . chr(10) . ' return p5str(List__[0]).charCodeAt(0);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.oct = function(List__) {' . chr(10) . ' var v = List__[0];' . chr(10) . ' var b = v.substr(0,2);' . chr(10) . ' if (b == "0b" || b == "0B") { return parseInt(v.substr(2), 2) }' . chr(10) . ' if (b == "0x" || b == "0X") { return parseInt(v.substr(2), 16) }' . chr(10) . ' return parseInt(v, 8);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.abs = function(List__) { return Math.abs(List__[0]) };' . chr(10) . 'CORE.exp = function(List__) { return Math.exp(List__[0]) };' . chr(10) . 'CORE.log = function(List__) { return Math.log(List__[0]) };' . chr(10) . 'CORE.cos = function(List__) { return Math.cos(List__[0]) };' . chr(10) . 'CORE.sin = function(List__) { return Math.sin(List__[0]) };' . chr(10) . 'CORE.sqrt = function(List__) { return Math.sqrt(List__[0]) };' . chr(10) . 'CORE.atan2 = function(List__) { return Math.atan2(List__[0], List__[1]) };' . chr(10) . 'CORE.int = function(List__) { return List__[0] > 0 ? Math.floor(List__[0]) : Math.ceil(List__[0]) };' . chr(10) . chr(10) . 'CORE.lc = function(List__) { return List__[0].toLowerCase() };' . chr(10) . 'CORE.uc = function(List__) { return List__[0].toUpperCase() };' . chr(10) . chr(10) . 'CORE.lcfirst = function(List__) {' . chr(10) . ' var s = List__[0];' . chr(10) . ' var c = s.length > 0 ? s.slice(0,1).toLowerCase() : "";' . chr(10) . ' s = s.length > 1 ? substr(s, 1) : "";' . chr(10) . ' return c + s' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.ucfirst = function(List__) {' . chr(10) . ' var s = List__[0];' . chr(10) . ' var c = s.length > 0 ? s.slice(0,1).toUpperCase() : "";' . chr(10) . ' s = s.length > 1 ? substr(s, 1) : "";' . chr(10) . ' return c + s' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.substr = function(List__) {' . chr(10) . ' var expr = List__[0];' . chr(10) . ' var offset = List__[1];' . chr(10) . ' var length = List__[2];' . chr(10) . ' var replacement = List__[3];' . chr(10) . ' if (length < 0) {' . chr(10) . ' var s = p5str(expr);' . chr(10) . ' length = s.length - offset + length;' . chr(10) . ' } ' . chr(10) . ' return p5str(expr).substr(offset, length);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.scalar = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (o == null) {' . chr(10) . ' return o;' . chr(10) . ' };' . chr(10) . ' if (typeof o.scalar === "function") {' . chr(10) . ' return o.scalar();' . chr(10) . ' }' . chr(10) . ' if (typeof o === "object" && (o instanceof Array)) {' . chr(10) . ' return o.length;' . chr(10) . ' }' . chr(10) . ' switch (typeof o) {' . chr(10) . ' case "string": return o;' . chr(10) . ' case "function": return o;' . chr(10) . ' case "number": return o;' . chr(10) . ' case "boolean": return o;' . chr(10) . ' }' . chr(10) . ' var l = 0;' . chr(10) . ' for (var i in o) {' . chr(10) . ' l++;' . chr(10) . ' }' . chr(10) . ' return l;' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.values = function(List__, p5want) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' delete o["_each_"];' . chr(10) . ' if (p5want) {' . chr(10) . ' if (o == null) {' . chr(10) . ' return [];' . chr(10) . ' };' . chr(10) . ' if (typeof o.values === "function") {' . chr(10) . ' return o.values();' . chr(10) . ' }' . chr(10) . ' var out = [];' . chr(10) . ' for (var i in o) {' . chr(10) . ' out.push(o[i]);' . chr(10) . ' }' . chr(10) . ' return out;' . chr(10) . ' }' . chr(10) . ' return CORE.keys(List__, p5want);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.keys = function(List__, p5want) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' delete o["_each_"];' . chr(10) . ' if (p5want) {' . chr(10) . ' if (o == null) {' . chr(10) . ' return [];' . chr(10) . ' }' . chr(10) . ' if (typeof o.keys === "function") {' . chr(10) . ' return o.keys();' . chr(10) . ' }' . chr(10) . ' var out = [];' . chr(10) . ' for (var i in o) {' . chr(10) . ' out.push(i);' . chr(10) . ' }' . chr(10) . ' return out;' . chr(10) . ' }' . chr(10) . ' else {' . chr(10) . ' if (o == null) {' . chr(10) . ' return 0;' . chr(10) . ' }' . chr(10) . ' if (typeof o.keys === "function") {' . chr(10) . ' return CORE.scalar([o.keys()]);' . chr(10) . ' }' . chr(10) . ' var out = 0;' . chr(10) . ' for (var i in o) {' . chr(10) . ' out++;' . chr(10) . ' }' . chr(10) . ' return out;' . chr(10) . ' }' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.each = function(List__, p5want) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (o.hasOwnProperty("_each_")) {' . chr(10) . ' return o._each_(p5want)' . chr(10) . ' }' . chr(10) . ' var keys = CORE.keys([o], 1);' . chr(10) . ' var i = 0;' . chr(10) . ' o._each_ = function () {' . chr(10) . ' if (i < keys.length) {' . chr(10) . ' i++;' . chr(10) . ' return p5want ? [keys[i-1], o[keys[i-1]]] : keys[i-1];' . chr(10) . ' }' . chr(10) . ' i = 0;' . chr(10) . ' return p5want ? [] : null;' . chr(10) . ' };' . chr(10) . ' return o._each_(p5want);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.reverse = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (o == null) {' . chr(10) . ' return "";' . chr(10) . ' }' . chr(10) . ' if (typeof o === "string") {' . chr(10) . ' return o.split("").reverse().join("")' . chr(10) . ' }' . chr(10) . ' var out = [];' . chr(10) . ' for(var i = 0; i < o.length; i++) {' . chr(10) . ' out.unshift(o[i]);' . chr(10) . ' }' . chr(10) . ' return out;' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.splice = function(List__, p5want) {' . chr(10) . ' var array = List__.shift();' . chr(10) . ' // CORE.say([ array ]);' . chr(10) . ' var offset = p5num(List__.shift());' . chr(10) . ' var limit = List__.length ? p5num(List__.shift()) : (array.length + 1);' . chr(10) . chr(10) . ' if (limit < 0) {' . chr(10) . ' limit = array.length + limit - 1;' . chr(10) . ' }' . chr(10) . chr(10) . ' var list = [offset, limit];' . chr(10) . ' for(var i = 0; i < List__.length; i++) {' . chr(10) . ' list = interpolate_array( list, List__[i]);' . chr(10) . ' }' . chr(10) . chr(10) . ' out = array.splice.apply(array, list);' . chr(10) . ' // CORE.say([ CORE.join([":",array]), " ofs=", offset, " lim=", limit, " list=", list, " out=", CORE.join([":",out]) ]);' . chr(10) . ' return p5want ? out : out.pop();' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.pop = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (o.length == null) {' . chr(10) . ' return null;' . chr(10) . ' }' . chr(10) . ' return o.pop();' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.shift = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (o.length == null) {' . chr(10) . ' return null;' . chr(10) . ' }' . chr(10) . ' return o.shift();' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.push = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' var v = List__[1];' . chr(10) . ' for(var i = 0; i < v.length; i++) {' . chr(10) . ' o.push(v[i]);' . chr(10) . ' }' . chr(10) . ' return o.length;' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.unshift = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' var v = List__[1];' . chr(10) . ' for(var i = v.length-1; i >= 0; i--) {' . chr(10) . ' o.unshift(v[i]);' . chr(10) . ' }' . chr(10) . ' return o.length;' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.join = function(List__) {' . chr(10) . ' var s = List__[0];' . chr(10) . ' var o = List__[1];' . chr(10) . ' return o.join(s);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.index = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' var s = List__[1];' . chr(10) . ' try {' . chr(10) . ' return o.indexOf(s);' . chr(10) . ' }' . chr(10) . ' catch(err) {' . chr(10) . ' return -1;' . chr(10) . ' }' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.length = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (typeof o.string === "function") {' . chr(10) . ' return o.string().length;' . chr(10) . ' }' . chr(10) . ' return o.length;' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.pack = function(List__) { CORE.warn([ "CORE::pack not implemented" ]) };' . chr(10) . 'CORE.unpack = function(List__) { CORE.warn([ "CORE::unpack not implemented" ]) };' . chr(10) . 'CORE.sprintf = function(List__) { CORE.warn([ "CORE::sprintf not implemented" ]) };' . chr(10) . chr(10) . 'CORE.ref = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (o == null) {' . chr(10) . ' return "";' . chr(10) . ' }' . chr(10) . ' if (o._class_ && typeof o._class_._ref_ === "string") {' . chr(10) . ' // blessed reference' . chr(10) . ' return o._class_._ref_;' . chr(10) . ' }' . chr(10) . ' if (typeof o._ref_ === "string") {' . chr(10) . ' // un-blessed reference' . chr(10) . ' return o._ref_;' . chr(10) . ' }' . chr(10) . ' if (typeof o === "function") {' . chr(10) . ' return "CODE";' . chr(10) . ' }' . chr(10) . ' return "";' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.split = function(List__) {' . chr(10) . ' var pattern = List__[0];' . chr(10) . ' var s = List__[1];' . chr(10) . ' var limit = List__[2];' . chr(10) . ' if (typeof pattern === "string") {' . chr(10) . ' if (pattern == " ") {' . chr(10) . ' var res = [];' . chr(10) . ' for (var i_ = 0, a_ = s.split(/(?: |' . chr(92) . 'n)+/); i_ < a_.length ; i_++) {' . chr(10) . ' if (a_[i_] != "") {' . chr(10) . ' res.push(a_[i_])' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' return res;' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' CORE.die(["not implemented"]);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.prototype = function(List__, data) {' . chr(10) . ' var name = List__[0];' . chr(10) . ' // TODO - fully qualify "name" using information from "data"' . chr(10) . ' // XXX - lookup in CORE::GLOBAL?' . chr(10) . ' NAMESPACE["Perlito5"].v_PROTO._hash_[name] || NAMESPACE["Perlito5"].v_CORE_PROTO._hash_[name]' . chr(10) . '};' . chr(10) . chr(10))
+ return ('//' . chr(10) . '//' . chr(10) . '// lib/Perlito5/Javascript/CORE.js' . chr(10) . '//' . chr(10) . '// CORE functions for "Perlito" Perl5-in-Javascript' . chr(10) . '//' . chr(10) . '// AUTHORS' . chr(10) . '//' . chr(10) . '// Flavio Soibelmann Glock fglock@gmail.com' . chr(10) . '//' . chr(10) . '// COPYRIGHT' . chr(10) . '//' . chr(10) . '// Copyright 2009, 2010, 2011, 2012 by Flavio Soibelmann Glock and others.' . chr(10) . '//' . chr(10) . '// This program is free software; you can redistribute it and/or modify it' . chr(10) . '// under the same terms as Perl itself.' . chr(10) . '//' . chr(10) . '// See http://www.perl.com/perl/misc/Artistic.html' . chr(10) . chr(10) . 'var CORE = p5pkg.CORE;' . chr(10) . chr(10) . 'var isNode = typeof require != "undefined";' . chr(10) . 'if (isNode) {' . chr(10) . ' CORE.print = function(List__) {' . chr(10) . ' var i;' . chr(10) . ' for (i = 0; i < List__.length; i++) {' . chr(10) . ' process.stdout.write(p5str(List__[i]));' . chr(10) . ' }' . chr(10) . ' return 1;' . chr(10) . ' }' . chr(10) . '} else {' . chr(10) . ' CORE.print = function(List__) {' . chr(10) . ' var i;' . chr(10) . ' for (i = 0; i < List__.length; i++) {' . chr(10) . ' write(p5str(List__[i]));' . chr(10) . ' }' . chr(10) . ' return 1;' . chr(10) . ' };' . chr(10) . '}' . chr(10) . chr(10) . 'CORE.say = function(List__) {' . chr(10) . ' CORE.print(List__);' . chr(10) . ' return CORE.print(["' . chr(92) . 'n"]);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.die = function(List__) {' . chr(10) . ' var i;' . chr(10) . ' var s = "";' . chr(10) . ' for (i = 0; i < List__.length; i++) {' . chr(10) . ' s = s + List__[i];' . chr(10) . ' // s = s + p5str(List__[i]);' . chr(10) . ' }' . chr(10) . ' p5pkg["main"]["v_@"] = "Died: " + s;' . chr(10) . ' throw(new p5_error("Died: " + s));' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.warn = function(List__) {' . chr(10) . ' var i;' . chr(10) . ' var s = "";' . chr(10) . ' for (i = 0; i < List__.length; i++) {' . chr(10) . ' s = s + List__[i];' . chr(10) . ' // s = s + p5str(List__[i]);' . chr(10) . ' }' . chr(10) . ' CORE.print(["Warning: " + s + "' . chr(92) . 'n"]);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.bless = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' var pkg_name = List__[1];' . chr(10) . ' if (typeof pkg_name === "object") {' . chr(10) . ' // bless {}, Class' . chr(10) . ' o._class_ = pkg_name;' . chr(10) . ' return o;' . chr(10) . ' }' . chr(10) . ' if (!p5pkg.hasOwnProperty(pkg_name)) {' . chr(10) . ' p5make_package(pkg_name);' . chr(10) . ' }' . chr(10) . ' o._class_ = p5pkg[pkg_name];' . chr(10) . ' return o;' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.chr = function(List__) {' . chr(10) . ' return String.fromCharCode(p5num(List__[0]));' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.ord = function(List__) {' . chr(10) . ' return p5str(List__[0]).charCodeAt(0);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.oct = function(List__) {' . chr(10) . ' var v = List__[0];' . chr(10) . ' var b = v.substr(0,2);' . chr(10) . ' if (b == "0b" || b == "0B") { return parseInt(v.substr(2), 2) }' . chr(10) . ' if (b == "0x" || b == "0X") { return parseInt(v.substr(2), 16) }' . chr(10) . ' return parseInt(v, 8);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.abs = function(List__) { return Math.abs(List__[0]) };' . chr(10) . 'CORE.exp = function(List__) { return Math.exp(List__[0]) };' . chr(10) . 'CORE.log = function(List__) { return Math.log(List__[0]) };' . chr(10) . 'CORE.cos = function(List__) { return Math.cos(List__[0]) };' . chr(10) . 'CORE.sin = function(List__) { return Math.sin(List__[0]) };' . chr(10) . 'CORE.sqrt = function(List__) { return Math.sqrt(List__[0]) };' . chr(10) . 'CORE.atan2 = function(List__) { return Math.atan2(List__[0], List__[1]) };' . chr(10) . 'CORE.int = function(List__) { return List__[0] > 0 ? Math.floor(List__[0]) : Math.ceil(List__[0]) };' . chr(10) . chr(10) . 'CORE.lc = function(List__) { return List__[0].toLowerCase() };' . chr(10) . 'CORE.uc = function(List__) { return List__[0].toUpperCase() };' . chr(10) . chr(10) . 'CORE.lcfirst = function(List__) {' . chr(10) . ' var s = List__[0];' . chr(10) . ' var c = s.length > 0 ? s.slice(0,1).toLowerCase() : "";' . chr(10) . ' s = s.length > 1 ? substr(s, 1) : "";' . chr(10) . ' return c + s' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.ucfirst = function(List__) {' . chr(10) . ' var s = List__[0];' . chr(10) . ' var c = s.length > 0 ? s.slice(0,1).toUpperCase() : "";' . chr(10) . ' s = s.length > 1 ? substr(s, 1) : "";' . chr(10) . ' return c + s' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.substr = function(List__) {' . chr(10) . ' var expr = List__[0];' . chr(10) . ' var offset = List__[1];' . chr(10) . ' var length = List__[2];' . chr(10) . ' var replacement = List__[3];' . chr(10) . ' if (length < 0) {' . chr(10) . ' var s = p5str(expr);' . chr(10) . ' length = s.length - offset + length;' . chr(10) . ' } ' . chr(10) . ' return p5str(expr).substr(offset, length);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.scalar = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (o == null) {' . chr(10) . ' return o;' . chr(10) . ' };' . chr(10) . ' if (typeof o.scalar === "function") {' . chr(10) . ' return o.scalar();' . chr(10) . ' }' . chr(10) . ' if (typeof o === "object" && (o instanceof Array)) {' . chr(10) . ' return o.length;' . chr(10) . ' }' . chr(10) . ' switch (typeof o) {' . chr(10) . ' case "string": return o;' . chr(10) . ' case "function": return o;' . chr(10) . ' case "number": return o;' . chr(10) . ' case "boolean": return o;' . chr(10) . ' }' . chr(10) . ' var l = 0;' . chr(10) . ' for (var i in o) {' . chr(10) . ' l++;' . chr(10) . ' }' . chr(10) . ' return l;' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.values = function(List__, p5want) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' delete o["_each_"];' . chr(10) . ' if (p5want) {' . chr(10) . ' if (o == null) {' . chr(10) . ' return [];' . chr(10) . ' };' . chr(10) . ' if (typeof o.values === "function") {' . chr(10) . ' return o.values();' . chr(10) . ' }' . chr(10) . ' var out = [];' . chr(10) . ' for (var i in o) {' . chr(10) . ' out.push(o[i]);' . chr(10) . ' }' . chr(10) . ' return out;' . chr(10) . ' }' . chr(10) . ' return CORE.keys(List__, p5want);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.keys = function(List__, p5want) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' delete o["_each_"];' . chr(10) . ' if (p5want) {' . chr(10) . ' if (o == null) {' . chr(10) . ' return [];' . chr(10) . ' }' . chr(10) . ' if (typeof o.keys === "function") {' . chr(10) . ' return o.keys();' . chr(10) . ' }' . chr(10) . ' var out = [];' . chr(10) . ' for (var i in o) {' . chr(10) . ' out.push(i);' . chr(10) . ' }' . chr(10) . ' return out;' . chr(10) . ' }' . chr(10) . ' else {' . chr(10) . ' if (o == null) {' . chr(10) . ' return 0;' . chr(10) . ' }' . chr(10) . ' if (typeof o.keys === "function") {' . chr(10) . ' return CORE.scalar([o.keys()]);' . chr(10) . ' }' . chr(10) . ' var out = 0;' . chr(10) . ' for (var i in o) {' . chr(10) . ' out++;' . chr(10) . ' }' . chr(10) . ' return out;' . chr(10) . ' }' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.each = function(List__, p5want) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (o.hasOwnProperty("_each_")) {' . chr(10) . ' return o._each_(p5want)' . chr(10) . ' }' . chr(10) . ' var keys = CORE.keys([o], 1);' . chr(10) . ' var i = 0;' . chr(10) . ' o._each_ = function () {' . chr(10) . ' if (i < keys.length) {' . chr(10) . ' i++;' . chr(10) . ' return p5want ? [keys[i-1], o[keys[i-1]]] : keys[i-1];' . chr(10) . ' }' . chr(10) . ' i = 0;' . chr(10) . ' return p5want ? [] : null;' . chr(10) . ' };' . chr(10) . ' return o._each_(p5want);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.reverse = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (o == null) {' . chr(10) . ' return "";' . chr(10) . ' }' . chr(10) . ' if (typeof o === "string") {' . chr(10) . ' return o.split("").reverse().join("")' . chr(10) . ' }' . chr(10) . ' var out = [];' . chr(10) . ' for(var i = 0; i < o.length; i++) {' . chr(10) . ' out.unshift(o[i]);' . chr(10) . ' }' . chr(10) . ' return out;' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.splice = function(List__, p5want) {' . chr(10) . ' var array = List__.shift();' . chr(10) . ' // CORE.say([ array ]);' . chr(10) . ' var offset = p5num(List__.shift());' . chr(10) . ' var limit = List__.length ? p5num(List__.shift()) : (array.length + 1);' . chr(10) . chr(10) . ' if (limit < 0) {' . chr(10) . ' limit = array.length + limit - 1;' . chr(10) . ' }' . chr(10) . chr(10) . ' var list = [offset, limit];' . chr(10) . ' for(var i = 0; i < List__.length; i++) {' . chr(10) . ' list = interpolate_array( list, List__[i]);' . chr(10) . ' }' . chr(10) . chr(10) . ' out = array.splice.apply(array, list);' . chr(10) . ' // CORE.say([ CORE.join([":",array]), " ofs=", offset, " lim=", limit, " list=", list, " out=", CORE.join([":",out]) ]);' . chr(10) . ' return p5want ? out : out.pop();' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.pop = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (o.length == null) {' . chr(10) . ' return null;' . chr(10) . ' }' . chr(10) . ' return o.pop();' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.shift = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (o.length == null) {' . chr(10) . ' return null;' . chr(10) . ' }' . chr(10) . ' return o.shift();' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.push = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' var v = List__[1];' . chr(10) . ' for(var i = 0; i < v.length; i++) {' . chr(10) . ' o.push(v[i]);' . chr(10) . ' }' . chr(10) . ' return o.length;' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.unshift = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' var v = List__[1];' . chr(10) . ' for(var i = v.length-1; i >= 0; i--) {' . chr(10) . ' o.unshift(v[i]);' . chr(10) . ' }' . chr(10) . ' return o.length;' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.join = function(List__) {' . chr(10) . ' var s = List__[0];' . chr(10) . ' var o = List__[1];' . chr(10) . ' return o.join(s);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.index = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' var s = List__[1];' . chr(10) . ' try {' . chr(10) . ' return o.indexOf(s);' . chr(10) . ' }' . chr(10) . ' catch(err) {' . chr(10) . ' return -1;' . chr(10) . ' }' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.length = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (typeof o.string === "function") {' . chr(10) . ' return o.string().length;' . chr(10) . ' }' . chr(10) . ' return o.length;' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.pack = function(List__) { CORE.warn([ "CORE::pack not implemented" ]) };' . chr(10) . 'CORE.unpack = function(List__) { CORE.warn([ "CORE::unpack not implemented" ]) };' . chr(10) . 'CORE.sprintf = function(List__) { CORE.warn([ "CORE::sprintf not implemented" ]) };' . chr(10) . chr(10) . 'CORE.ref = function(List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' if (o == null) {' . chr(10) . ' return "";' . chr(10) . ' }' . chr(10) . ' if (o._class_ && typeof o._class_._ref_ === "string") {' . chr(10) . ' // blessed reference' . chr(10) . ' return o._class_._ref_;' . chr(10) . ' }' . chr(10) . ' if (typeof o._ref_ === "string") {' . chr(10) . ' // un-blessed reference' . chr(10) . ' return o._ref_;' . chr(10) . ' }' . chr(10) . ' if (typeof o === "function") {' . chr(10) . ' return "CODE";' . chr(10) . ' }' . chr(10) . ' return "";' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.split = function(List__) {' . chr(10) . ' var pattern = List__[0];' . chr(10) . ' var s = List__[1];' . chr(10) . ' var limit = List__[2];' . chr(10) . ' if (typeof pattern === "string") {' . chr(10) . ' if (pattern == " ") {' . chr(10) . ' var res = [];' . chr(10) . ' for (var i_ = 0, a_ = s.split(/(?: |' . chr(92) . 'n)+/); i_ < a_.length ; i_++) {' . chr(10) . ' if (a_[i_] != "") {' . chr(10) . ' res.push(a_[i_])' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' return res;' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' CORE.die(["not implemented"]);' . chr(10) . '};' . chr(10) . chr(10) . 'CORE.prototype = function(List__, data) {' . chr(10) . ' var name = List__[0];' . chr(10) . ' // TODO - fully qualify "name" using information from "data"' . chr(10) . ' // XXX - lookup in CORE::GLOBAL?' . chr(10) . ' p5pkg["Perlito5"].v_PROTO._hash_[name] || p5pkg["Perlito5"].v_CORE_PROTO._hash_[name]' . chr(10) . '};' . chr(10) . chr(10))
};
1;
diff --git a/lib5/Perlito5/Javascript/Emitter.pm b/lib5/Perlito5/Javascript/Emitter.pm
index 80ca49cb7..7392f873b 100644
--- a/lib5/Perlito5/Javascript/Emitter.pm
+++ b/lib5/Perlito5/Javascript/Emitter.pm
@@ -326,7 +326,7 @@ for ($_) {
sub Perlito5::AST::CompUnit::emit_javascript_program {
((my $comp_units) = shift());
($Perlito5::PKG_NAME = 'main');
- ((my $str) = ('' . 'var p5want = null;' . chr(10) . 'var ' . Perlito5::Javascript::pkg() . ' = NAMESPACE[' . chr(39) . $Perlito5::PKG_NAME . chr(39) . '];' . chr(10)));
+ ((my $str) = ('' . 'var p5want = null;' . chr(10) . 'var ' . Perlito5::Javascript::pkg() . ' = p5pkg[' . chr(39) . $Perlito5::PKG_NAME . chr(39) . '];' . chr(10)));
($Perlito5::VAR = [{('@_' => {('decl' => 'my')}), ('$@' => {('decl' => 'our'), ('namespace' => 'main')}), ('$^O' => {('decl' => 'our'), ('namespace' => 'main')}), ('%ENV' => {('decl' => 'our'), ('namespace' => 'main')}), ('%INC' => {('decl' => 'our'), ('namespace' => 'main')}), ('@#' => {('decl' => 'our'), ('namespace' => 'main')}), ('@ARGV' => {('decl' => 'our'), ('namespace' => 'main')}), ('@INC' => {('decl' => 'our'), ('namespace' => 'main')}), ('$_' => {('decl' => 'our'), ('namespace' => $Perlito5::PKG_NAME)}), ('$a' => {('decl' => 'our'), ('namespace' => $Perlito5::PKG_NAME)}), ('$b' => {('decl' => 'our'), ('namespace' => $Perlito5::PKG_NAME)})}]);
for my $comp_unit (@{$comp_units}) {
($str = ($str . $comp_unit->emit_javascript() . chr(10)))
@@ -412,10 +412,10 @@ for ($_) {
($decl_type = 'our');
($self->{'namespace'} = $Perlito5::PKG_NAME);
((my $sigil) = (($self->{'sigil'} eq '$#') ? '@' : $self->{'sigil'}));
- ((my $s) = ('NAMESPACE["' . $self->{'namespace'} . '"]["' . $table->{$sigil} . $self->{'name'} . '"]'));
+ ((my $s) = ('p5pkg["' . $self->{'namespace'} . '"]["' . $table->{$sigil} . $self->{'name'} . '"]'));
if (($sigil eq '@')) {
($s = ($s . ' || (' . $s . ' = [])'));
- ($s = ('NAMESPACE[' . $s . ', "' . $self->{'namespace'} . '"]["' . $table->{$sigil} . $self->{'name'} . '"]'))
+ ($s = ('p5pkg[' . $s . ', "' . $self->{'namespace'} . '"]["' . $table->{$sigil} . $self->{'name'} . '"]'))
};
if (($self->{'sigil'} eq '$#')) {
return (('(' . $s . '.length - 1)'))
@@ -432,14 +432,14 @@ for ($_) {
}
};
if (($self->{'sigil'} eq '&')) {
- return (('NAMESPACE["' . (($self->{'namespace'} || $Perlito5::PKG_NAME)) . '"]["' . $self->{'name'} . '"]'))
+ return (('p5pkg["' . (($self->{'namespace'} || $Perlito5::PKG_NAME)) . '"]["' . $self->{'name'} . '"]'))
};
if (($self->{'sigil'} eq '*')) {
- return (('NAMESPACE["' . (($self->{'namespace'} || $Perlito5::PKG_NAME)) . '"]["' . $self->{'name'} . '"]'))
+ return (('p5pkg["' . (($self->{'namespace'} || $Perlito5::PKG_NAME)) . '"]["' . $self->{'name'} . '"]'))
};
if (($decl_type eq 'our')) {
((my $sigil) = (($self->{'sigil'} eq '$#') ? '@' : $self->{'sigil'}));
- ((my $s) = ('NAMESPACE["' . (($self->{'namespace'} || $decl->{'namespace'})) . '"]["' . $table->{$sigil} . $self->{'name'} . '"]'));
+ ((my $s) = ('p5pkg["' . (($self->{'namespace'} || $decl->{'namespace'})) . '"]["' . $table->{$sigil} . $self->{'name'} . '"]'));
if (($self->{'sigil'} eq '$#')) {
return (('(' . $s . '.length - 1)'))
};
@@ -447,7 +447,7 @@ for ($_) {
};
((my $ns) = '');
if ($self->{'namespace'}) {
- ($ns = ('NAMESPACE["' . $self->{'namespace'} . '"]'));
+ ($ns = ('p5pkg["' . $self->{'namespace'} . '"]'));
if (($self->{'sigil'} eq '$#')) {
return (('(' . $ns . '["' . $table->{'@'} . $self->{'name'} . '"].length - 1)'))
};
@@ -530,7 +530,7 @@ for ($_) {
if (($decl && ((($decl->{'decl'} eq 'our') || ($decl->{'decl'} eq 'local'))))) {
($decl_namespace = $decl->{'namespace'})
};
- ((my $ns) = ('NAMESPACE["' . ((($self->{'var'}->{'namespace'} || $decl_namespace) || $Perlito5::PKG_NAME)) . '"]'));
+ ((my $ns) = ('p5pkg["' . ((($self->{'var'}->{'namespace'} || $decl_namespace) || $Perlito5::PKG_NAME)) . '"]'));
return (('p5set_local(' . $ns . ',' . Perlito5::Javascript::escape_string($self->{'var'}->{'name'}) . ',' . Perlito5::Javascript::escape_string($self->{'var'}->{'sigil'}) . '); '))
}
else {
@@ -553,7 +553,7 @@ for ($_) {
if (($self->{'name'} eq '__PACKAGE__')) {
return (Perlito5::Javascript::pkg())
};
- ('NAMESPACE["' . $self->{'name'} . '"]')
+ ('p5pkg["' . $self->{'name'} . '"]')
}
};
package Perlito5::AST::Call;
@@ -670,7 +670,7 @@ for ($_) {
('(' . $self->{'arguments'}->[0]->emit_javascript($level, $wantarray) . ')')
}), ('require' => sub {
((my $self) = $_[0]);
- ('NAMESPACE["Perlito5::Grammar::Use"]["require"]([' . Perlito5::Javascript::to_str($self->{'arguments'}->[0]) . '])')
+ ('p5pkg["Perlito5::Grammar::Use"]["require"]([' . Perlito5::Javascript::to_str($self->{'arguments'}->[0]) . '])')
}), ('prefix:<$>' => sub {
((my $self) = $_[0]);
((my $arg) = $self->{'arguments'}->[0]);
@@ -714,7 +714,7 @@ for ($_) {
};
if (($arg->sigil() eq '&')) {
if ($arg->{'namespace'}) {
- return (('NAMESPACE["' . $arg->{'namespace'} . '"].' . $arg->{'name'}))
+ return (('p5pkg["' . $arg->{'namespace'} . '"].' . $arg->{'name'}))
}
else {
return ((Perlito5::Javascript::pkg() . '.' . $arg->{'name'}))
@@ -800,7 +800,7 @@ for ($_) {
((my $var_env_js) = ('(new p5ArrayRef(' . Perlito5::Javascript::to_list($m) . '))'));
($eval = ('eval(perl5_to_js(' . Perlito5::Javascript::to_str($arg) . ', ' . '"' . $Perlito5::PKG_NAME . '", ' . $var_env_js . '))'))
};
- ('(function () {' . chr(10) . 'var r = null;' . chr(10) . 'NAMESPACE["main"]["v_@"] = "";' . chr(10) . 'try {' . chr(10) . 'r = ' . $eval . chr(10) . '}' . chr(10) . 'catch(err) {' . chr(10) . 'if ( err instanceof p5_error ) {' . chr(10) . '}' . chr(10) . 'else if ( err instanceof Error ) {' . chr(10) . 'NAMESPACE["main"]["v_@"] = err;' . chr(10) . '}' . chr(10) . 'else {' . chr(10) . 'throw(err);' . chr(10) . '}' . chr(10) . '}' . chr(10) . 'return r;' . chr(10) . '})()')
+ ('(function () {' . chr(10) . 'var r = null;' . chr(10) . 'p5pkg["main"]["v_@"] = "";' . chr(10) . 'try {' . chr(10) . 'r = ' . $eval . chr(10) . '}' . chr(10) . 'catch(err) {' . chr(10) . 'if ( err instanceof p5_error ) {' . chr(10) . '}' . chr(10) . 'else if ( err instanceof Error ) {' . chr(10) . 'p5pkg["main"]["v_@"] = err;' . chr(10) . '}' . chr(10) . 'else {' . chr(10) . 'throw(err);' . chr(10) . '}' . chr(10) . '}' . chr(10) . 'return r;' . chr(10) . '})()')
}), ('undef' => sub {
((my $self) = shift());
((my $level) = shift());
@@ -933,7 +933,7 @@ for ($_) {
die('JS::inline needs a string constant')
}
};
- ($code = ('NAMESPACE["' . $self->{'namespace'} . '"].' . $code))
+ ($code = ('p5pkg["' . $self->{'namespace'} . '"].' . $code))
}
else {
($code = (Perlito5::Javascript::pkg() . '.' . $code))
diff --git a/lib5/Perlito5/Javascript/Runtime.pm b/lib5/Perlito5/Javascript/Runtime.pm
index 587c880a6..446ed2edb 100644
--- a/lib5/Perlito5/Javascript/Runtime.pm
+++ b/lib5/Perlito5/Javascript/Runtime.pm
@@ -6,7 +6,7 @@ package main;
use v5;
package Perlito5::Javascript::Runtime;
sub Perlito5::Javascript::Runtime::emit_javascript {
- return ((('//' . chr(10) . '// lib/Perlito5/Javascript/Runtime.js' . chr(10) . '//' . chr(10) . '// Runtime for "Perlito" Perl5-in-Javascript' . chr(10) . '//' . chr(10) . '// AUTHORS' . chr(10) . '//' . chr(10) . '// Flavio Soibelmann Glock fglock@gmail.com' . chr(10) . '//' . chr(10) . '// COPYRIGHT' . chr(10) . '//' . chr(10) . '// Copyright 2009, 2010, 2011, 2012 by Flavio Soibelmann Glock and others.' . chr(10) . '//' . chr(10) . '// This program is free software; you can redistribute it and/or modify it' . chr(10) . '// under the same terms as Perl itself.' . chr(10) . '//' . chr(10) . '// See http://www.perl.com/perl/misc/Artistic.html' . chr(10) . chr(10) . 'var isNode = typeof require != "undefined";' . chr(10) . chr(10) . 'if (typeof NAMESPACE !== "object") {' . chr(10) . ' NAMESPACE = {};' . chr(10) . ' LOCAL = [];' . chr(10) . chr(10) . ' var universal = function () {};' . chr(10) . ' NAMESPACE.UNIVERSAL = new universal();' . chr(10) . ' NAMESPACE.UNIVERSAL._ref_ = "UNIVERSAL";' . chr(10) . ' NAMESPACE.UNIVERSAL.isa = function (List__) {' . chr(10) . ' // TODO - use @ISA' . chr(10) . ' return List__[0]._class_._ref_ == List__[1]' . chr(10) . ' };' . chr(10) . ' NAMESPACE.UNIVERSAL.can = function (List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' var s = List__[1];' . chr(10) . ' if ( s.indexOf("::") == -1 ) {' . chr(10) . ' // TODO - use p5method_lookup' . chr(10) . ' return o._class_[s]' . chr(10) . ' }' . chr(10) . ' var c = s.split("::");' . chr(10) . ' s = c.pop(); ' . chr(10) . ' // TODO - use p5method_lookup' . chr(10) . ' return p5method_lookup(s, c.join("::"), {});' . chr(10) . ' };' . chr(10) . ' NAMESPACE.UNIVERSAL.DOES = NAMESPACE.UNIVERSAL.can;' . chr(10) . chr(10) . ' var core = function () {};' . chr(10) . ' NAMESPACE["CORE"] = new core();' . chr(10) . ' NAMESPACE["CORE"]._ref_ = "CORE";' . chr(10) . chr(10) . ' var core_global = function () {};' . chr(10) . ' core_global.prototype = NAMESPACE.CORE;' . chr(10) . ' NAMESPACE["CORE::GLOBAL"] = new core_global();' . chr(10) . ' NAMESPACE["CORE::GLOBAL"]._ref_ = "CORE::GLOBAL";' . chr(10) . chr(10) . ' p5_error = function (v) {' . chr(10) . ' this.v = v;' . chr(10) . ' this.toString = function(){ return this.v };' . chr(10) . ' };' . chr(10) . ' p5_error.prototype = Error.prototype;' . chr(10) . '}' . chr(10) . chr(10) . 'function p5make_package(pkg_name) {' . chr(10) . ' if (!NAMESPACE.hasOwnProperty(pkg_name)) {' . chr(10) . ' var tmp = function () {};' . chr(10) . ' tmp.prototype = NAMESPACE["CORE::GLOBAL"];' . chr(10) . ' NAMESPACE[pkg_name] = new tmp();' . chr(10) . ' NAMESPACE[pkg_name]._ref_ = pkg_name;' . chr(10) . ' NAMESPACE[pkg_name]._class_ = NAMESPACE[pkg_name]; // XXX memory leak' . chr(10) . chr(10) . ' // TODO - add the other package global variables' . chr(10) . ' NAMESPACE[pkg_name]["List_ISA"] = [];' . chr(10) . ' NAMESPACE[pkg_name]["v_a"] = null;' . chr(10) . ' NAMESPACE[pkg_name]["v_b"] = null;' . chr(10) . ' NAMESPACE[pkg_name]["v__"] = null;' . chr(10) . ' }' . chr(10) . ' return NAMESPACE[pkg_name];' . chr(10) . '}' . chr(10) . chr(10) . 'function p5code_lookup_by_name(package, sub_name) {' . chr(10) . ' // sub_name can have an optional namespace' . chr(10) . ' var parts = sub_name.split(/::/);' . chr(10) . ' if (parts.length > 1) {' . chr(10) . ' sub_name = parts.pop();' . chr(10) . ' package = parts.join("::");' . chr(10) . ' }' . chr(10) . ' if (NAMESPACE.hasOwnProperty(package)) {' . chr(10) . ' var c = NAMESPACE[package];' . chr(10) . ' if ( c.hasOwnProperty(sub_name) ) {' . chr(10) . ' return c[sub_name]' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' return null;' . chr(10) . '}' . chr(10) . chr(10) . 'function p5method_lookup(method, class_name, seen) {' . chr(10) . ' // default mro' . chr(10) . ' c = NAMESPACE[class_name];' . chr(10) . ' if ( c.hasOwnProperty(method) ) {' . chr(10) . ' return c[method]' . chr(10) . ' }' . chr(10) . ' var isa = c.List_ISA;' . chr(10) . ' for (var i = 0; i < isa.length; i++) {' . chr(10) . ' if (!seen[isa[i]]) {' . chr(10) . ' var m = p5method_lookup(method, isa[i]);' . chr(10) . ' if (m) {' . chr(10) . ' return m ' . chr(10) . ' }' . chr(10) . ' seen[isa[i]]++;' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' // TODO - AUTOLOAD' . chr(10) . '}' . chr(10) . chr(10) . 'function p5call(invocant, method, list) {' . chr(10) . ' list.unshift(invocant);' . chr(10) . chr(10) . ' if ( invocant.hasOwnProperty("_class_") ) {' . chr(10) . chr(10) . ' if ( invocant._class_.hasOwnProperty(method) ) {' . chr(10) . ' return invocant._class_[method](list)' . chr(10) . ' }' . chr(10) . ' var m = p5method_lookup(method, invocant._class_._ref_, {});' . chr(10) . ' if (m) {' . chr(10) . ' return m(list)' . chr(10) . ' }' . chr(10) . ' if ( NAMESPACE.UNIVERSAL.hasOwnProperty(method) ) {' . chr(10) . ' return NAMESPACE.UNIVERSAL[method](list)' . chr(10) . ' }' . chr(10) . chr(10) . ' // method can have an optional namespace' . chr(10) . ' var package = method.split(/::/);' . chr(10) . ' if (package.length > 1) {' . chr(10) . ' var name = package.pop();' . chr(10) . ' package = package.join("::");' . chr(10) . ' m = p5method_lookup(name, package, {});' . chr(10) . ' // CORE.say([ name, " ", package ]);' . chr(10) . ' if (m) {' . chr(10) . ' return m(list)' . chr(10) . ' }' . chr(10) . ' NAMESPACE.CORE.die(["method not found: ", name, " in class ", package]);' . chr(10) . ' }' . chr(10) . chr(10) . ' // TODO - cache the methods that were already looked up' . chr(10) . ' NAMESPACE.CORE.die(["method not found: ", method, " in class ", invocant._ref_]);' . chr(10) . chr(10) . ' }' . chr(10) . chr(10) . ' // the invocant doesn' . chr(39) . 't have a class' . chr(10) . chr(10) . ' if (typeof invocant === "string") {' . chr(10) . ' var aclass = p5make_package(invocant);' . chr(10) . ' return p5call(aclass, method, list);' . chr(10) . ' }' . chr(10) . chr(10) . ' NAMESPACE.CORE.die(["Can' . chr(39) . 't call method ", method, " on unblessed reference"]);' . chr(10) . chr(10) . '}' . chr(10) . chr(10) . 'p5make_package("main");' . chr(10) . 'NAMESPACE["main"]["v_@"] = []; // $@' . chr(10) . 'NAMESPACE["main"]["List_#"] = []; // @#' . chr(10) . 'NAMESPACE["main"]["v_^O"] = isNode ? "node.js" : "javascript";' . chr(10) . 'NAMESPACE["main"]["List_INC"] = [];' . chr(10) . 'NAMESPACE["main"]["Hash_INC"] = {};' . chr(10) . 'NAMESPACE["main"]["List_ARGV"] = [];' . chr(10) . 'NAMESPACE["main"]["Hash_ENV"] = {};' . chr(10) . 'if (isNode) {' . chr(10) . ' NAMESPACE["main"]["List_ARGV"] = process.argv.splice(2);' . chr(10) . ' NAMESPACE["main"]["Hash_ENV"] = process.env;' . chr(10) . '} else if (typeof arguments === "object") {' . chr(10) . ' NAMESPACE["main"]["List_ARGV"] = arguments;' . chr(10) . '}' . chr(10) . chr(10) . 'p5make_package("Perlito5");' . chr(10) . 'p5make_package("Perlito5::IO");' . chr(10) . 'p5make_package("Perlito5::Runtime");' . chr(10) . 'p5make_package("Perlito5::Grammar");' . chr(10) . chr(10) . 'function p5make_sub(pkg_name, sub_name, func) {' . chr(10) . ' NAMESPACE[pkg_name][sub_name] = func;' . chr(10) . '}' . chr(10) . chr(10) . 'function p5set_local(namespace, name, sigil) {' . chr(10) . ' var v = name;' . chr(10) . ' if (sigil == "$") {' . chr(10) . ' v = "v_"+name;' . chr(10) . ' }' . chr(10) . ' LOCAL.push([namespace, v, namespace[v]]);' . chr(10) . '}' . chr(10) . chr(10) . 'function p5cleanup_local(idx, value) {' . chr(10) . ' while (LOCAL.length > idx) {' . chr(10) . ' l = LOCAL.pop();' . chr(10) . ' l[0][l[1]] = l[2];' . chr(10) . ' }' . chr(10) . ' return value;' . chr(10) . '}' . chr(10) . chr(10) . 'function p5HashRef(o) {' . chr(10) . ' this._hash_ = o;' . chr(10) . ' this._ref_ = "HASH";' . chr(10) . ' this.bool = function() { return 1 };' . chr(10) . '}' . chr(10) . chr(10) . 'function p5ArrayRef(o) {' . chr(10) . ' this._array_ = o;' . chr(10) . ' this._ref_ = "ARRAY";' . chr(10) . ' this.bool = function() { return 1 };' . chr(10) . '}' . chr(10) . chr(10) . 'function p5ScalarRef(o) {' . chr(10) . ' this._scalar_ = o;' . chr(10) . ' this._ref_ = "SCALAR";' . chr(10) . ' this.bool = function() { return 1 };' . chr(10) . '}' . chr(10) . chr(10) . 'if (isNode) {' . chr(10) . ' var fs = require("fs");' . chr(10) . ' p5make_sub("Perlito5::IO", "slurp", function(List__) {' . chr(10) . ' return fs.readFileSync(List__[0],"utf8");' . chr(10) . ' });' . chr(10) . '} else {' . chr(10) . ' p5make_sub("Perlito5::IO", "slurp", function(List__) {' . chr(10) . ' var filename = List__[0];' . chr(10) . ' if (typeof readFile == "function") {' . chr(10) . ' return readFile(filename);' . chr(10) . ' }' . chr(10) . ' if (typeof read == "function") {' . chr(10) . ' // v8' . chr(10) . ' return read(filename);' . chr(10) . ' }' . chr(10) . ' NAMESPACE.CORE.die(["Perlito5::IO::slurp() not implemented"]);' . chr(10) . ' });' . chr(10) . '}' . chr(10) . chr(10) . 'p5context = function(List__, p5want) {' . chr(10) . ' if (p5want) {' . chr(10) . ' return p5list_to_a.apply(null, List__);' . chr(10) . ' }' . chr(10) . ' // scalar: return the last value' . chr(10) . ' var o = List__;' . chr(10) . ' while (o instanceof Array) {' . chr(10) . ' o = o.length' . chr(10) . ' ? o[o.length-1]' . chr(10) . ' : null;' . chr(10) . ' }' . chr(10) . ' return o;' . chr(10) . '}' . chr(10) . chr(10) . 'p5list_to_a = function() {' . chr(10) . ' var res = [];' . chr(10) . ' for (i = 0; i < arguments.length; i++) {' . chr(10) . ' var o = arguments[i];' . chr(10) . ' if ( o == null' . chr(10) . ' || o._class_ // perl5 blessed reference' . chr(10) . ' || o._ref_ // perl5 un-blessed reference' . chr(10) . ' )' . chr(10) . ' {' . chr(10) . ' res.push(o);' . chr(10) . ' }' . chr(10) . ' else if (o instanceof Array) {' . chr(10) . ' // perl5 array' . chr(10) . ' for (j = 0; j < o.length; j++) {' . chr(10) . ' res.push(o[j]);' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' else if (typeof o === "object") {' . chr(10) . ' // perl5 hash' . chr(10) . ' for(var j in o) {' . chr(10) . ' if (o.hasOwnProperty(j)) {' . chr(10) . ' res.push(j);' . chr(10) . ' res.push(o[j]);' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' else {' . chr(10) . ' // non-ref' . chr(10) . ' res.push(o);' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' return res;' . chr(10) . '};' . chr(10) . chr(10) . 'p5a_to_h = function(a) {' . chr(10) . ' var res = {};' . chr(10) . ' for (i = 0; i < a.length; i+=2) {' . chr(10) . ' res[p5str(a[i])] = a[i+1];' . chr(10) . ' }' . chr(10) . ' return res;' . chr(10) . '};' . chr(10) . chr(10) . 'p5str = function(o) {' . chr(10) . ' if (o == null) {' . chr(10) . ' return "";' . chr(10) . ' }' . chr(10) . ' if (typeof o === "object" && (o instanceof Array)) {' . chr(10) . ' return "" + o.length;' . chr(10) . ' }' . chr(10) . ' if (typeof o.string === "function") {' . chr(10) . ' return o.string();' . chr(10) . ' }' . chr(10) . ' if (typeof o == "number" && Math.abs(o) < 0.0001 && o != 0) {' . chr(10) . ' return o.toExponential().replace(/e-(' . chr(92) . 'd)$/,"e-0$1");' . chr(10) . ' }' . chr(10) . ' if (typeof o === "boolean") {' . chr(10) . ' return o ? "1" : "";' . chr(10) . ' }' . chr(10) . ' if (typeof o !== "string") {' . chr(10) . ' return "" + o;' . chr(10) . ' }' . chr(10) . ' return o;' . chr(10) . '};' . chr(10) . chr(10) . 'p5num = function(o) {' . chr(10) . ' if (o == null) {' . chr(10) . ' return 0;' . chr(10) . ' }' . chr(10) . ' if (typeof o === "object" && (o instanceof Array)) {' . chr(10) . ' return o.length;' . chr(10) . ' }' . chr(10) . ' if (typeof o.num === "function") {' . chr(10) . ' return o.num();' . chr(10) . ' }' . chr(10) . ' if (typeof o !== "number") {' . chr(10) . ' return parseFloat(p5str(o));' . chr(10) . ' }' . chr(10) . ' return o;' . chr(10) . '};' . chr(10) . chr(10) . 'p5bool = function(o) {' . chr(10) . ' if (o == null) {' . chr(10) . ' return o;' . chr(10) . ' }' . chr(10) . ' if (typeof o === "boolean") {' . chr(10) . ' return o;' . chr(10) . ' }' . chr(10) . ' if (typeof o === "number") {' . chr(10) . ' return o;' . chr(10) . ' }' . chr(10) . ' if (typeof o === "string") {' . chr(10) . ' return o != "" && o != "0";' . chr(10) . ' }' . chr(10) . ' if (typeof o.bool === "function") {' . chr(10) . ' return o.bool();' . chr(10) . ' }' . chr(10) . ' if (typeof o.length === "number") {' . chr(10) . ' return o.length;' . chr(10) . ' }' . chr(10) . ' if (o instanceof Error) {' . chr(10) . ' return true;' . chr(10) . ' }' . chr(10) . ' for (var i in o) {' . chr(10) . ' return true;' . chr(10) . ' }' . chr(10) . ' return false;' . chr(10) . '};' . chr(10) . chr(10) . 'p5and = function(a, fb) {' . chr(10) . ' if (p5bool(a)) {' . chr(10) . ' return fb();' . chr(10) . ' }' . chr(10) . ' return a;' . chr(10) . '};' . chr(10) . chr(10) . 'p5or = function(a, fb) {' . chr(10) . ' if (p5bool(a)) {' . chr(10) . ' return a;' . chr(10) . ' }' . chr(10) . ' return fb();' . chr(10) . '};' . chr(10) . chr(10) . 'p5defined_or = function(a, fb) {' . chr(10) . ' if (a == null) {' . chr(10) . ' return fb();' . chr(10) . ' }' . chr(10) . ' return a;' . chr(10) . '};' . chr(10) . chr(10) . 'p5cmp = function(a, b) {' . chr(10) . ' return a > b ? 1 : a < b ? -1 : 0 ' . chr(10) . '};' . chr(10) . chr(10) . 'p5str_replicate = function(o, n) {' . chr(10) . ' n = p5num(n);' . chr(10) . ' return n ? Array(n + 1).join(o) : "";' . chr(10) . '};' . chr(10) . chr(10) . 'p5for = function(namespace, func, args) {' . chr(10) . ' var v_old = namespace["v__"];' . chr(10) . ' for(var i = 0; i < args.length; i++) {' . chr(10) . ' namespace["v__"] = args[i];' . chr(10) . ' func()' . chr(10) . ' }' . chr(10) . ' namespace["v__"] = v_old;' . chr(10) . '};' . chr(10) . chr(10) . 'p5for_lex = function(func, args) {' . chr(10) . ' for(var i = 0; i < args.length; i++) {' . chr(10) . ' func(args[i])' . chr(10) . ' }' . chr(10) . '};' . chr(10) . chr(10) . 'p5map = function(namespace, func, args) {' . chr(10) . ' var v_old = namespace["v__"];' . chr(10) . ' var out = [];' . chr(10) . ' for(var i = 0; i < args.length; i++) {' . chr(10) . ' namespace["v__"] = args[i];' . chr(10) . ' var o = p5list_to_a(func(1));' . chr(10) . ' for(var j = 0; j < o.length; j++) {' . chr(10) . ' out.push(o[j]);' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' namespace["v__"] = v_old;' . chr(10) . ' return out;' . chr(10) . '};' . chr(10) . chr(10) . 'p5grep = function(namespace, func, args) {' . chr(10) . ' var v_old = namespace["v__"];' . chr(10) . ' var out = [];' . chr(10) . ' for(var i = 0; i < args.length; i++) {' . chr(10) . ' namespace["v__"] = args[i];' . chr(10) . ' if (p5bool(func(0))) {' . chr(10) . ' out.push(args[i])' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' namespace["v__"] = v_old;' . chr(10) . ' return out;' . chr(10) . '};' . chr(10) . chr(10) . 'p5sort = function(namespace, func, args) {' . chr(10) . ' var a_old = namespace["v_a"];' . chr(10) . ' var b_old = namespace["v_b"];' . chr(10) . ' var out = ' . chr(10) . ' func == null' . chr(10) . ' ? args.sort()' . chr(10) . ' : args.sort(' . chr(10) . ' function(a, b) {' . chr(10) . ' namespace["v_a"] = a;' . chr(10) . ' namespace["v_b"] = b;' . chr(10) . ' return func(0);' . chr(10) . ' }' . chr(10) . ' );' . chr(10) . ' namespace["v_a"] = a_old;' . chr(10) . ' namespace["v_b"] = b_old;' . chr(10) . ' return out;' . chr(10) . '};' . chr(10) . chr(10) . 'perl5_to_js = function( source, namespace, var_env_js ) {' . chr(10) . ' // say( "source: [" + source + "]" );' . chr(10) . chr(10) . ' var strict_old = NAMESPACE["Perlito5"].v_STRICT;' . chr(10) . ' var var_env_js_old = NAMESPACE["Perlito5"].v_VAR;' . chr(10) . ' NAMESPACE["Perlito5"].v_VAR = var_env_js;' . chr(10) . chr(10) . ' var namespace_old = NAMESPACE["Perlito5"].v_PKG_NAME;' . chr(10) . ' NAMESPACE["Perlito5"].v_PKG_NAME = namespace;' . chr(10) . chr(10) . ' match = p5call(NAMESPACE["Perlito5::Grammar"], "exp_stmts", [source, 0]);' . chr(10) . chr(10) . ' if ( !match || match._hash_.to != source.length ) {' . chr(10) . ' CORE.die(["Syntax error in eval near pos ", match._hash_.to]);' . chr(10) . ' }' . chr(10) . chr(10) . ' ast = NAMESPACE.CORE.bless([' . chr(10) . ' new p5HashRef({' . chr(10) . ' block: NAMESPACE.CORE.bless([' . chr(10) . ' new p5HashRef({' . chr(10) . ' stmts: p5call(match, "flat", []),' . chr(10) . ' }),' . chr(10) . ' NAMESPACE["Perlito5::AST::Lit::Block"]' . chr(10) . ' ]),' . chr(10) . ' }),' . chr(10) . ' NAMESPACE["Perlito5::AST::Do"]' . chr(10) . ' ]);' . chr(10) . chr(10) . ' // CORE.say( "ast: [" + perl(ast) + "]" );' . chr(10) . ' js_code = p5call(ast, "emit_javascript", []);' . chr(10) . ' // CORE.say( "js-source: [" + js_code + "]" );' . chr(10) . chr(10) . ' NAMESPACE["Perlito5"].v_PKG_NAME = namespace_old;' . chr(10) . ' NAMESPACE["Perlito5"].v_VAR = var_env_js_old;' . chr(10) . ' NAMESPACE["Perlito5"].v_STRICT = strict_old;' . chr(10) . ' return js_code;' . chr(10) . '}' . chr(10) . chr(10))))
+ return ((('//' . chr(10) . '// lib/Perlito5/Javascript/Runtime.js' . chr(10) . '//' . chr(10) . '// Runtime for "Perlito" Perl5-in-Javascript' . chr(10) . '//' . chr(10) . '// AUTHORS' . chr(10) . '//' . chr(10) . '// Flavio Soibelmann Glock fglock@gmail.com' . chr(10) . '//' . chr(10) . '// COPYRIGHT' . chr(10) . '//' . chr(10) . '// Copyright 2009, 2010, 2011, 2012 by Flavio Soibelmann Glock and others.' . chr(10) . '//' . chr(10) . '// This program is free software; you can redistribute it and/or modify it' . chr(10) . '// under the same terms as Perl itself.' . chr(10) . '//' . chr(10) . '// See http://www.perl.com/perl/misc/Artistic.html' . chr(10) . chr(10) . 'var isNode = typeof require != "undefined";' . chr(10) . chr(10) . 'if (typeof p5pkg !== "object") {' . chr(10) . ' p5pkg = {};' . chr(10) . ' LOCAL = [];' . chr(10) . chr(10) . ' var universal = function () {};' . chr(10) . ' p5pkg.UNIVERSAL = new universal();' . chr(10) . ' p5pkg.UNIVERSAL._ref_ = "UNIVERSAL";' . chr(10) . ' p5pkg.UNIVERSAL.isa = function (List__) {' . chr(10) . ' // TODO - use @ISA' . chr(10) . ' return List__[0]._class_._ref_ == List__[1]' . chr(10) . ' };' . chr(10) . ' p5pkg.UNIVERSAL.can = function (List__) {' . chr(10) . ' var o = List__[0];' . chr(10) . ' var s = List__[1];' . chr(10) . ' if ( s.indexOf("::") == -1 ) {' . chr(10) . ' // TODO - use p5method_lookup' . chr(10) . ' return o._class_[s]' . chr(10) . ' }' . chr(10) . ' var c = s.split("::");' . chr(10) . ' s = c.pop(); ' . chr(10) . ' // TODO - use p5method_lookup' . chr(10) . ' return p5method_lookup(s, c.join("::"), {});' . chr(10) . ' };' . chr(10) . ' p5pkg.UNIVERSAL.DOES = p5pkg.UNIVERSAL.can;' . chr(10) . chr(10) . ' var core = function () {};' . chr(10) . ' p5pkg["CORE"] = new core();' . chr(10) . ' p5pkg["CORE"]._ref_ = "CORE";' . chr(10) . chr(10) . ' var core_global = function () {};' . chr(10) . ' core_global.prototype = p5pkg.CORE;' . chr(10) . ' p5pkg["CORE::GLOBAL"] = new core_global();' . chr(10) . ' p5pkg["CORE::GLOBAL"]._ref_ = "CORE::GLOBAL";' . chr(10) . chr(10) . ' p5_error = function (v) {' . chr(10) . ' this.v = v;' . chr(10) . ' this.toString = function(){ return this.v };' . chr(10) . ' };' . chr(10) . ' p5_error.prototype = Error.prototype;' . chr(10) . '}' . chr(10) . chr(10) . 'function p5make_package(pkg_name) {' . chr(10) . ' if (!p5pkg.hasOwnProperty(pkg_name)) {' . chr(10) . ' var tmp = function () {};' . chr(10) . ' tmp.prototype = p5pkg["CORE::GLOBAL"];' . chr(10) . ' p5pkg[pkg_name] = new tmp();' . chr(10) . ' p5pkg[pkg_name]._ref_ = pkg_name;' . chr(10) . ' p5pkg[pkg_name]._class_ = p5pkg[pkg_name]; // XXX memory leak' . chr(10) . chr(10) . ' // TODO - add the other package global variables' . chr(10) . ' p5pkg[pkg_name]["List_ISA"] = [];' . chr(10) . ' p5pkg[pkg_name]["v_a"] = null;' . chr(10) . ' p5pkg[pkg_name]["v_b"] = null;' . chr(10) . ' p5pkg[pkg_name]["v__"] = null;' . chr(10) . ' }' . chr(10) . ' return p5pkg[pkg_name];' . chr(10) . '}' . chr(10) . chr(10) . 'function p5code_lookup_by_name(package, sub_name) {' . chr(10) . ' // sub_name can have an optional namespace' . chr(10) . ' var parts = sub_name.split(/::/);' . chr(10) . ' if (parts.length > 1) {' . chr(10) . ' sub_name = parts.pop();' . chr(10) . ' package = parts.join("::");' . chr(10) . ' }' . chr(10) . ' if (p5pkg.hasOwnProperty(package)) {' . chr(10) . ' var c = p5pkg[package];' . chr(10) . ' if ( c.hasOwnProperty(sub_name) ) {' . chr(10) . ' return c[sub_name]' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' return null;' . chr(10) . '}' . chr(10) . chr(10) . 'function p5method_lookup(method, class_name, seen) {' . chr(10) . ' // default mro' . chr(10) . ' c = p5pkg[class_name];' . chr(10) . ' if ( c.hasOwnProperty(method) ) {' . chr(10) . ' return c[method]' . chr(10) . ' }' . chr(10) . ' var isa = c.List_ISA;' . chr(10) . ' for (var i = 0; i < isa.length; i++) {' . chr(10) . ' if (!seen[isa[i]]) {' . chr(10) . ' var m = p5method_lookup(method, isa[i]);' . chr(10) . ' if (m) {' . chr(10) . ' return m ' . chr(10) . ' }' . chr(10) . ' seen[isa[i]]++;' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' // TODO - AUTOLOAD' . chr(10) . '}' . chr(10) . chr(10) . 'function p5call(invocant, method, list) {' . chr(10) . ' list.unshift(invocant);' . chr(10) . chr(10) . ' if ( invocant.hasOwnProperty("_class_") ) {' . chr(10) . chr(10) . ' if ( invocant._class_.hasOwnProperty(method) ) {' . chr(10) . ' return invocant._class_[method](list)' . chr(10) . ' }' . chr(10) . ' var m = p5method_lookup(method, invocant._class_._ref_, {});' . chr(10) . ' if (m) {' . chr(10) . ' return m(list)' . chr(10) . ' }' . chr(10) . ' if ( p5pkg.UNIVERSAL.hasOwnProperty(method) ) {' . chr(10) . ' return p5pkg.UNIVERSAL[method](list)' . chr(10) . ' }' . chr(10) . chr(10) . ' // method can have an optional namespace' . chr(10) . ' var package = method.split(/::/);' . chr(10) . ' if (package.length > 1) {' . chr(10) . ' var name = package.pop();' . chr(10) . ' package = package.join("::");' . chr(10) . ' m = p5method_lookup(name, package, {});' . chr(10) . ' // CORE.say([ name, " ", package ]);' . chr(10) . ' if (m) {' . chr(10) . ' return m(list)' . chr(10) . ' }' . chr(10) . ' p5pkg.CORE.die(["method not found: ", name, " in class ", package]);' . chr(10) . ' }' . chr(10) . chr(10) . ' // TODO - cache the methods that were already looked up' . chr(10) . ' p5pkg.CORE.die(["method not found: ", method, " in class ", invocant._ref_]);' . chr(10) . chr(10) . ' }' . chr(10) . chr(10) . ' // the invocant doesn' . chr(39) . 't have a class' . chr(10) . chr(10) . ' if (typeof invocant === "string") {' . chr(10) . ' var aclass = p5make_package(invocant);' . chr(10) . ' return p5call(aclass, method, list);' . chr(10) . ' }' . chr(10) . chr(10) . ' p5pkg.CORE.die(["Can' . chr(39) . 't call method ", method, " on unblessed reference"]);' . chr(10) . chr(10) . '}' . chr(10) . chr(10) . 'p5make_package("main");' . chr(10) . 'p5pkg["main"]["v_@"] = []; // $@' . chr(10) . 'p5pkg["main"]["List_#"] = []; // @#' . chr(10) . 'p5pkg["main"]["v_^O"] = isNode ? "node.js" : "javascript";' . chr(10) . 'p5pkg["main"]["List_INC"] = [];' . chr(10) . 'p5pkg["main"]["Hash_INC"] = {};' . chr(10) . 'p5pkg["main"]["List_ARGV"] = [];' . chr(10) . 'p5pkg["main"]["Hash_ENV"] = {};' . chr(10) . 'if (isNode) {' . chr(10) . ' p5pkg["main"]["List_ARGV"] = process.argv.splice(2);' . chr(10) . ' p5pkg["main"]["Hash_ENV"] = process.env;' . chr(10) . '} else if (typeof arguments === "object") {' . chr(10) . ' p5pkg["main"]["List_ARGV"] = arguments;' . chr(10) . '}' . chr(10) . chr(10) . 'p5make_package("Perlito5");' . chr(10) . 'p5make_package("Perlito5::IO");' . chr(10) . 'p5make_package("Perlito5::Runtime");' . chr(10) . 'p5make_package("Perlito5::Grammar");' . chr(10) . chr(10) . 'function p5make_sub(pkg_name, sub_name, func) {' . chr(10) . ' p5pkg[pkg_name][sub_name] = func;' . chr(10) . '}' . chr(10) . chr(10) . 'function p5set_local(namespace, name, sigil) {' . chr(10) . ' var v = name;' . chr(10) . ' if (sigil == "$") {' . chr(10) . ' v = "v_"+name;' . chr(10) . ' }' . chr(10) . ' LOCAL.push([namespace, v, namespace[v]]);' . chr(10) . '}' . chr(10) . chr(10) . 'function p5cleanup_local(idx, value) {' . chr(10) . ' while (LOCAL.length > idx) {' . chr(10) . ' l = LOCAL.pop();' . chr(10) . ' l[0][l[1]] = l[2];' . chr(10) . ' }' . chr(10) . ' return value;' . chr(10) . '}' . chr(10) . chr(10) . 'function p5HashRef(o) {' . chr(10) . ' this._hash_ = o;' . chr(10) . ' this._ref_ = "HASH";' . chr(10) . ' this.bool = function() { return 1 };' . chr(10) . '}' . chr(10) . chr(10) . 'function p5ArrayRef(o) {' . chr(10) . ' this._array_ = o;' . chr(10) . ' this._ref_ = "ARRAY";' . chr(10) . ' this.bool = function() { return 1 };' . chr(10) . '}' . chr(10) . chr(10) . 'function p5ScalarRef(o) {' . chr(10) . ' this._scalar_ = o;' . chr(10) . ' this._ref_ = "SCALAR";' . chr(10) . ' this.bool = function() { return 1 };' . chr(10) . '}' . chr(10) . chr(10) . 'if (isNode) {' . chr(10) . ' var fs = require("fs");' . chr(10) . ' p5make_sub("Perlito5::IO", "slurp", function(List__) {' . chr(10) . ' return fs.readFileSync(List__[0],"utf8");' . chr(10) . ' });' . chr(10) . '} else {' . chr(10) . ' p5make_sub("Perlito5::IO", "slurp", function(List__) {' . chr(10) . ' var filename = List__[0];' . chr(10) . ' if (typeof readFile == "function") {' . chr(10) . ' return readFile(filename);' . chr(10) . ' }' . chr(10) . ' if (typeof read == "function") {' . chr(10) . ' // v8' . chr(10) . ' return read(filename);' . chr(10) . ' }' . chr(10) . ' p5pkg.CORE.die(["Perlito5::IO::slurp() not implemented"]);' . chr(10) . ' });' . chr(10) . '}' . chr(10) . chr(10) . 'p5context = function(List__, p5want) {' . chr(10) . ' if (p5want) {' . chr(10) . ' return p5list_to_a.apply(null, List__);' . chr(10) . ' }' . chr(10) . ' // scalar: return the last value' . chr(10) . ' var o = List__;' . chr(10) . ' while (o instanceof Array) {' . chr(10) . ' o = o.length' . chr(10) . ' ? o[o.length-1]' . chr(10) . ' : null;' . chr(10) . ' }' . chr(10) . ' return o;' . chr(10) . '}' . chr(10) . chr(10) . 'p5list_to_a = function() {' . chr(10) . ' var res = [];' . chr(10) . ' for (i = 0; i < arguments.length; i++) {' . chr(10) . ' var o = arguments[i];' . chr(10) . ' if ( o == null' . chr(10) . ' || o._class_ // perl5 blessed reference' . chr(10) . ' || o._ref_ // perl5 un-blessed reference' . chr(10) . ' )' . chr(10) . ' {' . chr(10) . ' res.push(o);' . chr(10) . ' }' . chr(10) . ' else if (o instanceof Array) {' . chr(10) . ' // perl5 array' . chr(10) . ' for (j = 0; j < o.length; j++) {' . chr(10) . ' res.push(o[j]);' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' else if (typeof o === "object") {' . chr(10) . ' // perl5 hash' . chr(10) . ' for(var j in o) {' . chr(10) . ' if (o.hasOwnProperty(j)) {' . chr(10) . ' res.push(j);' . chr(10) . ' res.push(o[j]);' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' else {' . chr(10) . ' // non-ref' . chr(10) . ' res.push(o);' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' return res;' . chr(10) . '};' . chr(10) . chr(10) . 'p5a_to_h = function(a) {' . chr(10) . ' var res = {};' . chr(10) . ' for (i = 0; i < a.length; i+=2) {' . chr(10) . ' res[p5str(a[i])] = a[i+1];' . chr(10) . ' }' . chr(10) . ' return res;' . chr(10) . '};' . chr(10) . chr(10) . 'p5str = function(o) {' . chr(10) . ' if (o == null) {' . chr(10) . ' return "";' . chr(10) . ' }' . chr(10) . ' if (typeof o === "object" && (o instanceof Array)) {' . chr(10) . ' return "" + o.length;' . chr(10) . ' }' . chr(10) . ' if (typeof o.string === "function") {' . chr(10) . ' return o.string();' . chr(10) . ' }' . chr(10) . ' if (typeof o == "number" && Math.abs(o) < 0.0001 && o != 0) {' . chr(10) . ' return o.toExponential().replace(/e-(' . chr(92) . 'd)$/,"e-0$1");' . chr(10) . ' }' . chr(10) . ' if (typeof o === "boolean") {' . chr(10) . ' return o ? "1" : "";' . chr(10) . ' }' . chr(10) . ' if (typeof o !== "string") {' . chr(10) . ' return "" + o;' . chr(10) . ' }' . chr(10) . ' return o;' . chr(10) . '};' . chr(10) . chr(10) . 'p5num = function(o) {' . chr(10) . ' if (o == null) {' . chr(10) . ' return 0;' . chr(10) . ' }' . chr(10) . ' if (typeof o === "object" && (o instanceof Array)) {' . chr(10) . ' return o.length;' . chr(10) . ' }' . chr(10) . ' if (typeof o.num === "function") {' . chr(10) . ' return o.num();' . chr(10) . ' }' . chr(10) . ' if (typeof o !== "number") {' . chr(10) . ' return parseFloat(p5str(o));' . chr(10) . ' }' . chr(10) . ' return o;' . chr(10) . '};' . chr(10) . chr(10) . 'p5bool = function(o) {' . chr(10) . ' if (o == null) {' . chr(10) . ' return o;' . chr(10) . ' }' . chr(10) . ' if (typeof o === "boolean") {' . chr(10) . ' return o;' . chr(10) . ' }' . chr(10) . ' if (typeof o === "number") {' . chr(10) . ' return o;' . chr(10) . ' }' . chr(10) . ' if (typeof o === "string") {' . chr(10) . ' return o != "" && o != "0";' . chr(10) . ' }' . chr(10) . ' if (typeof o.bool === "function") {' . chr(10) . ' return o.bool();' . chr(10) . ' }' . chr(10) . ' if (typeof o.length === "number") {' . chr(10) . ' return o.length;' . chr(10) . ' }' . chr(10) . ' if (o instanceof Error) {' . chr(10) . ' return true;' . chr(10) . ' }' . chr(10) . ' for (var i in o) {' . chr(10) . ' return true;' . chr(10) . ' }' . chr(10) . ' return false;' . chr(10) . '};' . chr(10) . chr(10) . 'p5and = function(a, fb) {' . chr(10) . ' if (p5bool(a)) {' . chr(10) . ' return fb();' . chr(10) . ' }' . chr(10) . ' return a;' . chr(10) . '};' . chr(10) . chr(10) . 'p5or = function(a, fb) {' . chr(10) . ' if (p5bool(a)) {' . chr(10) . ' return a;' . chr(10) . ' }' . chr(10) . ' return fb();' . chr(10) . '};' . chr(10) . chr(10) . 'p5defined_or = function(a, fb) {' . chr(10) . ' if (a == null) {' . chr(10) . ' return fb();' . chr(10) . ' }' . chr(10) . ' return a;' . chr(10) . '};' . chr(10) . chr(10) . 'p5cmp = function(a, b) {' . chr(10) . ' return a > b ? 1 : a < b ? -1 : 0 ' . chr(10) . '};' . chr(10) . chr(10) . 'p5str_replicate = function(o, n) {' . chr(10) . ' n = p5num(n);' . chr(10) . ' return n ? Array(n + 1).join(o) : "";' . chr(10) . '};' . chr(10) . chr(10) . 'p5for = function(namespace, func, args) {' . chr(10) . ' var v_old = namespace["v__"];' . chr(10) . ' for(var i = 0; i < args.length; i++) {' . chr(10) . ' namespace["v__"] = args[i];' . chr(10) . ' func()' . chr(10) . ' }' . chr(10) . ' namespace["v__"] = v_old;' . chr(10) . '};' . chr(10) . chr(10) . 'p5for_lex = function(func, args) {' . chr(10) . ' for(var i = 0; i < args.length; i++) {' . chr(10) . ' func(args[i])' . chr(10) . ' }' . chr(10) . '};' . chr(10) . chr(10) . 'p5map = function(namespace, func, args) {' . chr(10) . ' var v_old = namespace["v__"];' . chr(10) . ' var out = [];' . chr(10) . ' for(var i = 0; i < args.length; i++) {' . chr(10) . ' namespace["v__"] = args[i];' . chr(10) . ' var o = p5list_to_a(func(1));' . chr(10) . ' for(var j = 0; j < o.length; j++) {' . chr(10) . ' out.push(o[j]);' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' namespace["v__"] = v_old;' . chr(10) . ' return out;' . chr(10) . '};' . chr(10) . chr(10) . 'p5grep = function(namespace, func, args) {' . chr(10) . ' var v_old = namespace["v__"];' . chr(10) . ' var out = [];' . chr(10) . ' for(var i = 0; i < args.length; i++) {' . chr(10) . ' namespace["v__"] = args[i];' . chr(10) . ' if (p5bool(func(0))) {' . chr(10) . ' out.push(args[i])' . chr(10) . ' }' . chr(10) . ' }' . chr(10) . ' namespace["v__"] = v_old;' . chr(10) . ' return out;' . chr(10) . '};' . chr(10) . chr(10) . 'p5sort = function(namespace, func, args) {' . chr(10) . ' var a_old = namespace["v_a"];' . chr(10) . ' var b_old = namespace["v_b"];' . chr(10) . ' var out = ' . chr(10) . ' func == null' . chr(10) . ' ? args.sort()' . chr(10) . ' : args.sort(' . chr(10) . ' function(a, b) {' . chr(10) . ' namespace["v_a"] = a;' . chr(10) . ' namespace["v_b"] = b;' . chr(10) . ' return func(0);' . chr(10) . ' }' . chr(10) . ' );' . chr(10) . ' namespace["v_a"] = a_old;' . chr(10) . ' namespace["v_b"] = b_old;' . chr(10) . ' return out;' . chr(10) . '};' . chr(10) . chr(10) . 'perl5_to_js = function( source, namespace, var_env_js ) {' . chr(10) . ' // say( "source: [" + source + "]" );' . chr(10) . chr(10) . ' var strict_old = p5pkg["Perlito5"].v_STRICT;' . chr(10) . ' var var_env_js_old = p5pkg["Perlito5"].v_VAR;' . chr(10) . ' p5pkg["Perlito5"].v_VAR = var_env_js;' . chr(10) . chr(10) . ' var namespace_old = p5pkg["Perlito5"].v_PKG_NAME;' . chr(10) . ' p5pkg["Perlito5"].v_PKG_NAME = namespace;' . chr(10) . chr(10) . ' match = p5call(p5pkg["Perlito5::Grammar"], "exp_stmts", [source, 0]);' . chr(10) . chr(10) . ' if ( !match || match._hash_.to != source.length ) {' . chr(10) . ' CORE.die(["Syntax error in eval near pos ", match._hash_.to]);' . chr(10) . ' }' . chr(10) . chr(10) . ' ast = p5pkg.CORE.bless([' . chr(10) . ' new p5HashRef({' . chr(10) . ' block: p5pkg.CORE.bless([' . chr(10) . ' new p5HashRef({' . chr(10) . ' stmts: p5call(match, "flat", []),' . chr(10) . ' }),' . chr(10) . ' p5pkg["Perlito5::AST::Lit::Block"]' . chr(10) . ' ]),' . chr(10) . ' }),' . chr(10) . ' p5pkg["Perlito5::AST::Do"]' . chr(10) . ' ]);' . chr(10) . chr(10) . ' // CORE.say( "ast: [" + perl(ast) + "]" );' . chr(10) . ' js_code = p5call(ast, "emit_javascript", []);' . chr(10) . ' // CORE.say( "js-source: [" + js_code + "]" );' . chr(10) . chr(10) . ' p5pkg["Perlito5"].v_PKG_NAME = namespace_old;' . chr(10) . ' p5pkg["Perlito5"].v_VAR = var_env_js_old;' . chr(10) . ' p5pkg["Perlito5"].v_STRICT = strict_old;' . chr(10) . ' return js_code;' . chr(10) . '}' . chr(10) . chr(10))))
};
1;
diff --git a/src5/lib/Perlito5/Javascript/CORE.pm b/src5/lib/Perlito5/Javascript/CORE.pm
index beedaed27..7a884f57e 100644
--- a/src5/lib/Perlito5/Javascript/CORE.pm
+++ b/src5/lib/Perlito5/Javascript/CORE.pm
@@ -23,7 +23,7 @@ sub emit_javascript {
//
// See http://www.perl.com/perl/misc/Artistic.html
-var CORE = NAMESPACE.CORE;
+var CORE = p5pkg.CORE;
var isNode = typeof require != "undefined";
if (isNode) {
@@ -56,7 +56,7 @@ CORE.die = function(List__) {
s = s + List__[i];
// s = s + p5str(List__[i]);
}
- NAMESPACE["main"]["v_@"] = "Died: " + s;
+ p5pkg["main"]["v_@"] = "Died: " + s;
throw(new p5_error("Died: " + s));
};
@@ -78,10 +78,10 @@ CORE.bless = function(List__) {
o._class_ = pkg_name;
return o;
}
- if (!NAMESPACE.hasOwnProperty(pkg_name)) {
+ if (!p5pkg.hasOwnProperty(pkg_name)) {
p5make_package(pkg_name);
}
- o._class_ = NAMESPACE[pkg_name];
+ o._class_ = p5pkg[pkg_name];
return o;
};
@@ -370,7 +370,7 @@ CORE.prototype = function(List__, data) {
var name = List__[0];
// TODO - fully qualify "name" using information from "data"
// XXX - lookup in CORE::GLOBAL?
- NAMESPACE["Perlito5"].v_PROTO._hash_[name] || NAMESPACE["Perlito5"].v_CORE_PROTO._hash_[name]
+ p5pkg["Perlito5"].v_PROTO._hash_[name] || p5pkg["Perlito5"].v_CORE_PROTO._hash_[name]
};
';
diff --git a/src5/lib/Perlito5/Javascript/Emitter.pm b/src5/lib/Perlito5/Javascript/Emitter.pm
index 16c5c569d..527b5887f 100755
--- a/src5/lib/Perlito5/Javascript/Emitter.pm
+++ b/src5/lib/Perlito5/Javascript/Emitter.pm
@@ -523,7 +523,7 @@ package Perlito5::AST::CompUnit;
$Perlito5::PKG_NAME = 'main';
my $str = ''
. "var p5want = null;\n"
- . "var " . Perlito5::Javascript::pkg . " = NAMESPACE['" . $Perlito5::PKG_NAME . "'];\n";
+ . "var " . Perlito5::Javascript::pkg . " = p5pkg['" . $Perlito5::PKG_NAME . "'];\n";
$Perlito5::VAR = [
{ '@_' => { decl => 'my' }, # XXX
'$@' => { decl => 'our', namespace => 'main' },
@@ -664,11 +664,11 @@ package Perlito5::AST::Var;
$self->{"namespace"} = $Perlito5::PKG_NAME;
my $sigil = $self->{"sigil"} eq '$#' ? '@' : $self->{"sigil"};
- my $s = 'NAMESPACE["' . $self->{"namespace"} . '"]["' . $table->{$sigil} . $self->{"name"} . '"]';
+ my $s = 'p5pkg["' . $self->{"namespace"} . '"]["' . $table->{$sigil} . $self->{"name"} . '"]';
if ($sigil eq '@') {
$s = $s . ' || (' . $s . ' = [])'; # init
- $s = 'NAMESPACE[' . $s . ', "' . $self->{"namespace"} . '"]["' . $table->{$sigil} . $self->{"name"} . '"]';
+ $s = 'p5pkg[' . $s . ', "' . $self->{"namespace"} . '"]["' . $table->{$sigil} . $self->{"name"} . '"]';
}
if ($self->{"sigil"} eq '$#') {
@@ -691,15 +691,15 @@ package Perlito5::AST::Var;
}
if ( $self->{"sigil"} eq '&' ) {
- return 'NAMESPACE["' . ($self->{"namespace"} || $Perlito5::PKG_NAME) . '"]["' . $self->{"name"} . '"]';
+ return 'p5pkg["' . ($self->{"namespace"} || $Perlito5::PKG_NAME) . '"]["' . $self->{"name"} . '"]';
}
if ( $self->{"sigil"} eq '*' ) {
- return 'NAMESPACE["' . ($self->{"namespace"} || $Perlito5::PKG_NAME) . '"]["' . $self->{"name"} . '"]';
+ return 'p5pkg["' . ($self->{"namespace"} || $Perlito5::PKG_NAME) . '"]["' . $self->{"name"} . '"]';
}
if ( $decl_type eq 'our' ) {
my $sigil = $self->{"sigil"} eq '$#' ? '@' : $self->{"sigil"};
- my $s = 'NAMESPACE["' . ($self->{"namespace"} || $decl->{"namespace"}) . '"]["' . $table->{$sigil} . $self->{"name"} . '"]';
+ my $s = 'p5pkg["' . ($self->{"namespace"} || $decl->{"namespace"}) . '"]["' . $table->{$sigil} . $self->{"name"} . '"]';
if ($self->{"sigil"} eq '$#') {
return '(' . $s . '.length - 1)';
@@ -709,7 +709,7 @@ package Perlito5::AST::Var;
my $ns = '';
if ($self->{"namespace"}) {
- $ns = 'NAMESPACE["' . $self->{"namespace"} . '"]';
+ $ns = 'p5pkg["' . $self->{"namespace"} . '"]';
if ($self->{"sigil"} eq '$#') {
return '(' . $ns . '["' . $table->{'@'} . $self->{"name"} . '"].length - 1)';
}
@@ -814,7 +814,7 @@ package Perlito5::AST::Decl;
$decl_namespace = $decl->{"namespace"};
}
- my $ns = 'NAMESPACE["' . ($self->{"var"}{"namespace"} || $decl_namespace || $Perlito5::PKG_NAME) . '"]';
+ my $ns = 'p5pkg["' . ($self->{"var"}{"namespace"} || $decl_namespace || $Perlito5::PKG_NAME) . '"]';
return
'p5set_local(' . $ns . ','
@@ -838,7 +838,7 @@ package Perlito5::AST::Proto;
my $level = shift;
return Perlito5::Javascript::pkg()
if $self->{"name"} eq '__PACKAGE__';
- 'NAMESPACE["' . $self->{"name"} . '"]'
+ 'p5pkg["' . $self->{"name"} . '"]'
}
}
@@ -999,7 +999,7 @@ package Perlito5::AST::Apply;
},
'require' => sub {
my $self = $_[0];
- 'NAMESPACE["Perlito5::Grammar::Use"]["require"]([' . Perlito5::Javascript::to_str( $self->{"arguments"}[0] ) . '])';
+ 'p5pkg["Perlito5::Grammar::Use"]["require"]([' . Perlito5::Javascript::to_str( $self->{"arguments"}[0] ) . '])';
},
'prefix:<$>' => sub {
@@ -1052,7 +1052,7 @@ package Perlito5::AST::Apply;
}
if ( $arg->sigil eq '&' ) {
if ( $arg->{"namespace"} ) {
- return 'NAMESPACE["' . $arg->{"namespace"} . '"].' . $arg->{"name"};
+ return 'p5pkg["' . $arg->{"namespace"} . '"].' . $arg->{"name"};
}
else {
return Perlito5::Javascript::pkg() . '.' . $arg->{"name"};
@@ -1189,7 +1189,7 @@ package Perlito5::AST::Apply;
"(function () {\n"
. "var r = null;\n"
- . 'NAMESPACE["main"]["v_@"] = "";' . "\n"
+ . 'p5pkg["main"]["v_@"] = "";' . "\n"
. "try {\n"
. 'r = ' . $eval . "\n"
. "}\n"
@@ -1197,7 +1197,7 @@ package Perlito5::AST::Apply;
. "if ( err instanceof p5_error ) {\n"
. "}\n"
. "else if ( err instanceof Error ) {\n"
- . 'NAMESPACE["main"]["v_@"] = err;' . "\n"
+ . 'p5pkg["main"]["v_@"] = err;' . "\n"
. "}\n"
. "else {\n"
. "throw(err);\n" # return() value
@@ -1418,7 +1418,7 @@ package Perlito5::AST::Apply;
}
}
- $code = 'NAMESPACE["' . $self->{"namespace"} . '"].' . $code;
+ $code = 'p5pkg["' . $self->{"namespace"} . '"].' . $code;
}
else {
$code = Perlito5::Javascript::pkg() . '.' . $code
diff --git a/src5/lib/Perlito5/Javascript/Runtime.pm b/src5/lib/Perlito5/Javascript/Runtime.pm
index 8b6a9ed47..bf7a1e6c4 100755
--- a/src5/lib/Perlito5/Javascript/Runtime.pm
+++ b/src5/lib/Perlito5/Javascript/Runtime.pm
@@ -25,18 +25,18 @@ sub emit_javascript {
var isNode = typeof require != "undefined";
-if (typeof NAMESPACE !== "object") {
- NAMESPACE = {};
+if (typeof p5pkg !== "object") {
+ p5pkg = {};
LOCAL = [];
var universal = function () {};
- NAMESPACE.UNIVERSAL = new universal();
- NAMESPACE.UNIVERSAL._ref_ = "UNIVERSAL";
- NAMESPACE.UNIVERSAL.isa = function (List__) {
+ p5pkg.UNIVERSAL = new universal();
+ p5pkg.UNIVERSAL._ref_ = "UNIVERSAL";
+ p5pkg.UNIVERSAL.isa = function (List__) {
// TODO - use @ISA
return List__[0]._class_._ref_ == List__[1]
};
- NAMESPACE.UNIVERSAL.can = function (List__) {
+ p5pkg.UNIVERSAL.can = function (List__) {
var o = List__[0];
var s = List__[1];
if ( s.indexOf("::") == -1 ) {
@@ -48,16 +48,16 @@ if (typeof NAMESPACE !== "object") {
// TODO - use p5method_lookup
return p5method_lookup(s, c.join("::"), {});
};
- NAMESPACE.UNIVERSAL.DOES = NAMESPACE.UNIVERSAL.can;
+ p5pkg.UNIVERSAL.DOES = p5pkg.UNIVERSAL.can;
var core = function () {};
- NAMESPACE["CORE"] = new core();
- NAMESPACE["CORE"]._ref_ = "CORE";
+ p5pkg["CORE"] = new core();
+ p5pkg["CORE"]._ref_ = "CORE";
var core_global = function () {};
- core_global.prototype = NAMESPACE.CORE;
- NAMESPACE["CORE::GLOBAL"] = new core_global();
- NAMESPACE["CORE::GLOBAL"]._ref_ = "CORE::GLOBAL";
+ core_global.prototype = p5pkg.CORE;
+ p5pkg["CORE::GLOBAL"] = new core_global();
+ p5pkg["CORE::GLOBAL"]._ref_ = "CORE::GLOBAL";
p5_error = function (v) {
this.v = v;
@@ -67,20 +67,20 @@ if (typeof NAMESPACE !== "object") {
}
function p5make_package(pkg_name) {
- if (!NAMESPACE.hasOwnProperty(pkg_name)) {
+ if (!p5pkg.hasOwnProperty(pkg_name)) {
var tmp = function () {};
- tmp.prototype = NAMESPACE["CORE::GLOBAL"];
- NAMESPACE[pkg_name] = new tmp();
- NAMESPACE[pkg_name]._ref_ = pkg_name;
- NAMESPACE[pkg_name]._class_ = NAMESPACE[pkg_name]; // XXX memory leak
+ tmp.prototype = p5pkg["CORE::GLOBAL"];
+ p5pkg[pkg_name] = new tmp();
+ p5pkg[pkg_name]._ref_ = pkg_name;
+ p5pkg[pkg_name]._class_ = p5pkg[pkg_name]; // XXX memory leak
// TODO - add the other package global variables
- NAMESPACE[pkg_name]["List_ISA"] = [];
- NAMESPACE[pkg_name]["v_a"] = null;
- NAMESPACE[pkg_name]["v_b"] = null;
- NAMESPACE[pkg_name]["v__"] = null;
+ p5pkg[pkg_name]["List_ISA"] = [];
+ p5pkg[pkg_name]["v_a"] = null;
+ p5pkg[pkg_name]["v_b"] = null;
+ p5pkg[pkg_name]["v__"] = null;
}
- return NAMESPACE[pkg_name];
+ return p5pkg[pkg_name];
}
function p5code_lookup_by_name(package, sub_name) {
@@ -90,8 +90,8 @@ function p5code_lookup_by_name(package, sub_name) {
sub_name = parts.pop();
package = parts.join("::");
}
- if (NAMESPACE.hasOwnProperty(package)) {
- var c = NAMESPACE[package];
+ if (p5pkg.hasOwnProperty(package)) {
+ var c = p5pkg[package];
if ( c.hasOwnProperty(sub_name) ) {
return c[sub_name]
}
@@ -101,7 +101,7 @@ function p5code_lookup_by_name(package, sub_name) {
function p5method_lookup(method, class_name, seen) {
// default mro
- c = NAMESPACE[class_name];
+ c = p5pkg[class_name];
if ( c.hasOwnProperty(method) ) {
return c[method]
}
@@ -130,8 +130,8 @@ function p5call(invocant, method, list) {
if (m) {
return m(list)
}
- if ( NAMESPACE.UNIVERSAL.hasOwnProperty(method) ) {
- return NAMESPACE.UNIVERSAL[method](list)
+ if ( p5pkg.UNIVERSAL.hasOwnProperty(method) ) {
+ return p5pkg.UNIVERSAL[method](list)
}
// method can have an optional namespace
@@ -144,11 +144,11 @@ function p5call(invocant, method, list) {
if (m) {
return m(list)
}
- NAMESPACE.CORE.die(["method not found: ", name, " in class ", package]);
+ p5pkg.CORE.die(["method not found: ", name, " in class ", package]);
}
// TODO - cache the methods that were already looked up
- NAMESPACE.CORE.die(["method not found: ", method, " in class ", invocant._ref_]);
+ p5pkg.CORE.die(["method not found: ", method, " in class ", invocant._ref_]);
}
@@ -159,23 +159,23 @@ function p5call(invocant, method, list) {
return p5call(aclass, method, list);
}
- NAMESPACE.CORE.die(["Can't call method ", method, " on unblessed reference"]);
+ p5pkg.CORE.die(["Can't call method ", method, " on unblessed reference"]);
}
p5make_package("main");
-NAMESPACE["main"]["v_@"] = []; // $@
-NAMESPACE["main"]["List_#"] = []; // @#
-NAMESPACE["main"]["v_^O"] = isNode ? "node.js" : "javascript";
-NAMESPACE["main"]["List_INC"] = [];
-NAMESPACE["main"]["Hash_INC"] = {};
-NAMESPACE["main"]["List_ARGV"] = [];
-NAMESPACE["main"]["Hash_ENV"] = {};
+p5pkg["main"]["v_@"] = []; // $@
+p5pkg["main"]["List_#"] = []; // @#
+p5pkg["main"]["v_^O"] = isNode ? "node.js" : "javascript";
+p5pkg["main"]["List_INC"] = [];
+p5pkg["main"]["Hash_INC"] = {};
+p5pkg["main"]["List_ARGV"] = [];
+p5pkg["main"]["Hash_ENV"] = {};
if (isNode) {
- NAMESPACE["main"]["List_ARGV"] = process.argv.splice(2);
- NAMESPACE["main"]["Hash_ENV"] = process.env;
+ p5pkg["main"]["List_ARGV"] = process.argv.splice(2);
+ p5pkg["main"]["Hash_ENV"] = process.env;
} else if (typeof arguments === "object") {
- NAMESPACE["main"]["List_ARGV"] = arguments;
+ p5pkg["main"]["List_ARGV"] = arguments;
}
p5make_package("Perlito5");
@@ -184,7 +184,7 @@ p5make_package("Perlito5::Runtime");
p5make_package("Perlito5::Grammar");
function p5make_sub(pkg_name, sub_name, func) {
- NAMESPACE[pkg_name][sub_name] = func;
+ p5pkg[pkg_name][sub_name] = func;
}
function p5set_local(namespace, name, sigil) {
@@ -236,7 +236,7 @@ if (isNode) {
// v8
return read(filename);
}
- NAMESPACE.CORE.die(["Perlito5::IO::slurp() not implemented"]);
+ p5pkg.CORE.die(["Perlito5::IO::slurp() not implemented"]);
});
}
@@ -455,38 +455,38 @@ p5sort = function(namespace, func, args) {
perl5_to_js = function( source, namespace, var_env_js ) {
// say( "source: [" + source + "]" );
- var strict_old = NAMESPACE["Perlito5"].v_STRICT;
- var var_env_js_old = NAMESPACE["Perlito5"].v_VAR;
- NAMESPACE["Perlito5"].v_VAR = var_env_js;
+ var strict_old = p5pkg["Perlito5"].v_STRICT;
+ var var_env_js_old = p5pkg["Perlito5"].v_VAR;
+ p5pkg["Perlito5"].v_VAR = var_env_js;
- var namespace_old = NAMESPACE["Perlito5"].v_PKG_NAME;
- NAMESPACE["Perlito5"].v_PKG_NAME = namespace;
+ var namespace_old = p5pkg["Perlito5"].v_PKG_NAME;
+ p5pkg["Perlito5"].v_PKG_NAME = namespace;
- match = p5call(NAMESPACE["Perlito5::Grammar"], "exp_stmts", [source, 0]);
+ match = p5call(p5pkg["Perlito5::Grammar"], "exp_stmts", [source, 0]);
if ( !match || match._hash_.to != source.length ) {
CORE.die(["Syntax error in eval near pos ", match._hash_.to]);
}
- ast = NAMESPACE.CORE.bless([
+ ast = p5pkg.CORE.bless([
new p5HashRef({
- block: NAMESPACE.CORE.bless([
+ block: p5pkg.CORE.bless([
new p5HashRef({
stmts: p5call(match, "flat", []),
}),
- NAMESPACE["Perlito5::AST::Lit::Block"]
+ p5pkg["Perlito5::AST::Lit::Block"]
]),
}),
- NAMESPACE["Perlito5::AST::Do"]
+ p5pkg["Perlito5::AST::Do"]
]);
// CORE.say( "ast: [" + perl(ast) + "]" );
js_code = p5call(ast, "emit_javascript", []);
// CORE.say( "js-source: [" + js_code + "]" );
- NAMESPACE["Perlito5"].v_PKG_NAME = namespace_old;
- NAMESPACE["Perlito5"].v_VAR = var_env_js_old;
- NAMESPACE["Perlito5"].v_STRICT = strict_old;
+ p5pkg["Perlito5"].v_PKG_NAME = namespace_old;
+ p5pkg["Perlito5"].v_VAR = var_env_js_old;
+ p5pkg["Perlito5"].v_STRICT = strict_old;
return js_code;
}