Differences From Artifact [f60e4d5f59]:
- File src/th_lang.c — part of check-in [1b1fd23590] at 2011-11-05 03:05:55 on branch trunk — Always skip adding script commands that have a NULL name or function pointer. (user: mistachkin size: 24145) [more...]
To Artifact [18bca7c6d5]:
- File src/th_lang.c — part of check-in [11abffbb49] at 2012-07-22 17:40:20 on branch trunk — Pulled in minor memleak fix [bee0036681]. (user: stephan size: 24196) [more...]
| ︙ | |||
356 357 358 359 360 361 362 363 364 365 366 367 368 369 | 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 | + + + |
if( p->hasArgs ){
char *zArgs = 0;
int nArgs = 0;
for(i=p->nParam+1; i<pArgs->argc; i++){
Th_ListAppend(interp, &zArgs, &nArgs, pArgs->argv[i], pArgs->argl[i]);
}
Th_SetVar(interp, (const char *)"args", -1, zArgs, nArgs);
if(zArgs){
Th_Free(interp, zArgs);
}
}
Th_SetResult(interp, 0, 0);
return Th_Eval(interp, 0, p->zProgram, p->nProgram);
}
/*
|
| ︙ |