36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
|
stmt.enterstep_traces = new Array();
stmt.leavestep_traces = new Array();
stmt.inLoop = false;
stmt.level = 0;
stmt.callframes = new Array();
stmt.callframes.push(new R.Callframe(stmt.interp, stmt.CALL_TYPE_PROC));
stmt.curr_callframe = stmt.callframes[stmt.level];
stmt.curr_callframe.setNamespace(stmt.interp.root_namespace);
stmt.no_trace = false;
stmt.call_debug = 0;
stmt.eval_stmt_debug = 0;
stmt.eval_expr_debug = 0;
stmt.code = stmt.OK;
stmt.file_name = null;
stmt.in_quoted_string = false;
|
|
|
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
|
stmt.enterstep_traces = new Array();
stmt.leavestep_traces = new Array();
stmt.inLoop = false;
stmt.level = 0;
stmt.callframes = new Array();
stmt.callframes.push(new R.Callframe(stmt.interp, stmt.CALL_TYPE_PROC));
stmt.curr_callframe = stmt.callframes[stmt.level];
stmt.curr_callframe.setNamespace(stmt.interp.global_ns_ptr);
stmt.no_trace = false;
stmt.call_debug = 0;
stmt.eval_stmt_debug = 0;
stmt.eval_expr_debug = 0;
stmt.code = stmt.OK;
stmt.file_name = null;
stmt.in_quoted_string = false;
|
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
|
argc += len - 1;
}
}
if (retcode == stmt.OK && argc) {
/* Lookup the command to call */
cmd = stmt.interp.command_obj_type.getCommand(argv[0], stmt.VAR_LOOKUP_LEAVE_ERR_MSG);
// cmd = stmt.interp.getCommand(argv[0], stmt.VAR_LOOKUP_LEAVE_ERR_MSG);
if (cmd != null) {
/* Call it -- Make sure result is an empty object. */
cmd.incrCmdRefCount();
stmt.interp.setEmptyResult();
//print("CMDT!"+cmd.getCommandTypeString(cmd.command_type)+"!");
//print("argv!"+argc+"!"+argv+"!"+argv.length+"!");
if (cmd.is_proc) {
retcode = stmt.interp.command_obj_type.callProcedure(cmd, script.script_object.file_name_obj, line_no, argc, argv);
} else {
stmt.interp.cmd_priv_data = cmd.u.native_fcn.privdata;
retcode = cmd.u.native_fcn.cmd_proc(stmt.interp, argv);
}
cmd.decrCmdRefCount();
} else {
/* Call [unknown] */
retcode = stmt.unknown(argc, argv, script.script_object.file_name_obj, line_no);
}
}
|
<
|
|
|
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
|
argc += len - 1;
}
}
if (retcode == stmt.OK && argc) {
/* Lookup the command to call */
cmd = stmt.interp.command_obj_type.getCommand(argv[0], stmt.VAR_LOOKUP_LEAVE_ERR_MSG);
if (cmd != null) {
/* Call it -- Make sure result is an empty object. */
cmd.incrCmdRefCount();
stmt.interp.setEmptyResult();
//print("CMDT!"+argv[0]+"!"+cmd.getCommandTypeString(cmd.command_type)+"!");
//print("argv!"+argc+"!"+argv+"!"+argv.length+"!");
if (cmd.is_proc) {
retcode = stmt.interp.command_obj_type.callProcedure(cmd, script.script_object.file_name_obj, line_no, argc, argv);
} else {
stmt.interp.cmd_priv_data = cmd.u.native_fcn.privdata;
retcode = cmd.u.native_fcn.cmd_proc(stmt.interp, argv, cmd);
}
cmd.decrCmdRefCount();
} else {
/* Call [unknown] */
retcode = stmt.unknown(argc, argv, script.script_object.file_name_obj, line_no);
}
}
|