forked from VictorTaelin/LJSON
-
Notifications
You must be signed in to change notification settings - Fork 0
/
LJSON.js
82 lines (82 loc) · 3.82 KB
/
LJSON.js
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
// LJSON: JSON extended with pure functions.
var LJSON = (function LJSON(){
// stringify :: LJSON -> String
// Stringifies a LJSON value.
function stringify(value){
var nextVarId = 0;
return (function normalize(value){
// This is responsible for collecting the argument list of a bound
// variable. For example, in `function(x){return x(a,b)(b)(c)}`, it
// collects `(a,b)`, `(b)`, `(c)` as the arguments of `x`. For
// that, it creates a variadic argumented function that is applied
// to many arguments, collecting them in a closure, until it is
// applied to `null`. When it is, it returns the JS source string
// for the application of the collected argument list.
function application(varName, argList){
var app = function(arg){
if (arg === null) {
function stringifyCall(args){
return "("+args.join(",")+")"
}
return varName + (argList.length===0 ? "" : argList.map(stringifyCall).join(""));
} else {
var args = [].slice.call(arguments,0);
var newArgList = argList.concat([args.map(normalize)]);
return application(varName, newArgList);
};
};
app.isApplication = true;
return app;
};
// If we try to normalize an application, we apply
// it to `null` to stop the argument-collecting.
if (value.isApplication)
return value(null);
// If it is a function, we need to create an application for its
// variable, and call the function on it, so its variable can start
// collecting the argList for the places where it is called on the
// body. We then normalize the resulting body and return the JS source
// for the function.
else if (typeof value === "function") {
var argNames = [];
var argApps = [];
for (var i=0, l=value.length; i<l; ++i){
var argName = "v"+(nextVarId++);
var app = application(argName, []);
argNames.push(argName);
argApps.push(app);
};
var body = normalize(value.apply(null,argApps));
return "(function("+argNames.join(",")+"){return "+body+"})";
// For container types (objects and arrays), it is just a matter
// of calling stringify on the contained values recursively.
} else if (typeof value === "object") {
if (value instanceof Array){
var source = "[";
for (var i=0, l=value.length; i<l; ++i)
source += (i?",":"") + normalize(value[i]);
return source+"]";
} else {
var source = "{";
var i = 0;
for (var key in value)
source += (i++?",":"") + JSON.stringify(key) + ":" + normalize(value[key]);
return source+"}";
};
// For unit types, we just delegate to JSON.stringify.
} else if
( typeof value === "string"
|| typeof value === "number"
|| typeof value === "boolean")
return JSON.stringify(value);
else return null;
})(value);
};
function unsafeParse(a){
return eval(a);
};
return {
stringify : stringify,
unsafeParse : unsafeParse};
})();
if (typeof module !== "undefined") module.exports = LJSON;