forked from rescript-lang/rescript
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathcaml_splice_call.js
50 lines (45 loc) · 1.2 KB
/
caml_splice_call.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
'use strict';
var spliceApply = (function(fn,args){
var i, argLen;
argLen = args.length
var applied = []
for(i = 0; i < argLen - 1; ++i){
applied.push(args[i])
}
var lastOne = args[argLen - 1]
for(i = 0; i < lastOne.length; ++i ){
applied.push(lastOne[i])
}
return fn.apply(null,applied)
});
var spliceNewApply = (function (ctor,args){
var i, argLen;
argLen = args.length
var applied = [null] // Function.prototype.bind.apply(fn, args) requires the first element in `args` to be `null`
for(i = 0; i < argLen - 1; ++i){
applied.push(args[i])
}
var lastOne = args[argLen - 1]
for(i = 0; i < lastOne.length; ++i ){
applied.push(lastOne[i])
}
var C = Function.prototype.bind.apply(ctor, applied)
return new C()
});
var spliceObjApply = (function(obj,name,args){
var i, argLen;
argLen = args.length
var applied = []
for(i = 0; i < argLen - 1; ++i){
applied.push(args[i])
}
var lastOne = args[argLen - 1]
for(i = 0; i < lastOne.length; ++i ){
applied.push(lastOne[i])
}
return (obj[name]).apply(obj,applied)
});
exports.spliceApply = spliceApply;
exports.spliceNewApply = spliceNewApply;
exports.spliceObjApply = spliceObjApply;
/* No side effect */