projects
/
jscl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Primary value of (values) is NIL
[jscl.git]
/
ecmalisp.js
diff --git
a/ecmalisp.js
b/ecmalisp.js
index
174e88a
..
74131ed
100644
(file)
--- a/
ecmalisp.js
+++ b/
ecmalisp.js
@@
-1,4
+1,6
@@
-function pv (x) { return x ; }
+var nil;
+
+function pv (x) { return x==undefined? nil: x; }
function mv(){
var r = [];
function mv(){
var r = [];
@@
-46,6
+48,7
@@
var l2 = {name: "DECLAIM"};
l2;
var l3 = {name: "NIL"};
((l3).value = l3);
l2;
var l3 = {name: "NIL"};
((l3).value = l3);
+(nil = l3.value);
var l4 = {name: "T"};
((l4).value = l4);
var l5 = {name: "WHEN"};
var l4 = {name: "T"};
((l4).value = l4);
var l5 = {name: "WHEN"};
@@
-7474,7
+7477,7
@@
var l303 = {name: "LS-MACROEXPAND-1"};
return l303;
})();
var l304 = {name: "COMPILE-FUNCALL"};
return l303;
})();
var l304 = {name: "COMPILE-FUNCALL"};
-var l305 = {name: "G764"};
+var l305 = {name: "G870"};
(function(){
(l304).fvalue = (function(v786){
((v786)["fname"] = "COMPILE-FUNCALL");
(function(){
(l304).fvalue = (function(v786){
((v786)["fname"] = "COMPILE-FUNCALL");