Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- function invoke(MLfct,MLparam){
- MLprint("APPLY = "+MLfct._name);
- MLprint("counter: "+MLfct.env.length);
- var l = MLfun(MLfct._name,MLfct.nb_args,MLfct.invoke_real);
- MLaddenv(l,MLfct.env,MLparam);
- if(l.env.length == (MLfct.nb_args)){
- return l.invoke_real(l);
- }else{
- for(i=0;i<MLfct.env.length;i++){
- MLprint("accu env["+i+"]: "+MLfct.env[i]);
- }
- return l;
- }
- }
Add Comment
Please, Sign In to add comment