aboutsummaryrefslogtreecommitdiff
path: root/js
diff options
context:
space:
mode:
authorJoel Martin <github@martintribe.org>2015-02-28 10:35:04 -0600
committerJoel Martin <github@martintribe.org>2015-02-28 10:35:04 -0600
commit2ab1e5845c213a9951bee46a0c991202e6c46d5c (patch)
treeac1e5d898523bb892181804aa64f22ec4f4b9032 /js
parent1218ce98a40ef243824fed0efce7160a10fe5f36 (diff)
downloadmal-2ab1e5845c213a9951bee46a0c991202e6c46d5c.tar.gz
mal-2ab1e5845c213a9951bee46a0c991202e6c46d5c.zip
Multiple: interop enhancements.
Diffstat (limited to 'js')
-rw-r--r--js/stepA_interop.js8
-rw-r--r--js/types.js4
2 files changed, 10 insertions, 2 deletions
diff --git a/js/stepA_interop.js b/js/stepA_interop.js
index 456c006..d879cd3 100644
--- a/js/stepA_interop.js
+++ b/js/stepA_interop.js
@@ -5,6 +5,7 @@ if (typeof module !== 'undefined') {
var printer = require('./printer');
var Env = require('./env').Env;
var core = require('./core');
+ var interop = require('./interop');
}
// read
@@ -108,8 +109,11 @@ function _EVAL(ast, env) {
return eval(a1.toString());
case ".":
var el = eval_ast(ast.slice(2), env),
- f = eval(a1.toString());
- return f.apply(f, el);
+ r = interop.resolve_js(a1.toString()),
+ obj = r[0], f = r[1];
+ var res = f.apply(obj, el);
+ console.log("DEBUG3:", res);
+ return interop.js_to_mal(res);
case "try*":
try {
return EVAL(a1, env);
diff --git a/js/types.js b/js/types.js
index 848a484..e3901b7 100644
--- a/js/types.js
+++ b/js/types.js
@@ -79,6 +79,10 @@ function _clone (obj) {
default:
throw new Error("clone of non-collection: " + _obj_type(obj));
}
+ Object.defineProperty(new_obj, "__meta__", {
+ enumerable: false,
+ writable: true
+ });
return new_obj;
}