projects
/
jscl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Simple defstruct clone
[jscl.git]
/
prelude.js
diff --git
a/prelude.js
b/prelude.js
index
b934132
..
38a13d7
100644
(file)
--- a/
prelude.js
+++ b/
prelude.js
@@
-1,12
+1,18
@@
+// This file is prepended to the result of compile ecmalisp.lisp, and
+// contain runtime code that ecmalisp assumes to exist.
+
+var window = this;
var nil;
var nil;
+function globalEval (x) {
+ return eval.call (window, x);
+}
+
function pv (x) { return x==undefined? nil: x; }
function mv(){
function pv (x) { return x==undefined? nil: x; }
function mv(){
- var r = [];
+ var r = [].slice.call(arguments);
r['multiple-value'] = true;
r['multiple-value'] = true;
- for (var i=0; i<arguments.length; i++)
- r.push(arguments[i]);
return r;
}
return r;
}