| 455 | |
| 456 | extern "C" |
| 457 | int run_colvarscript_command(int objc, unsigned char *const objv[]) |
| 458 | { |
| 459 | colvarmodule *cv = cvm::main(); |
| 460 | colvarscript *script = cv ? cv->proxy->script : NULL; |
| 461 | if (!script) { |
| 462 | cvm::error("Called run_colvarscript_command without a script object.\n", |
| 463 | BUG_ERROR); |
| 464 | return -1; |
| 465 | } |
| 466 | int retval = script->run(objc, objv); |
| 467 | return retval; |
| 468 | } |
| 469 | |
| 470 | |
| 471 | extern "C" |