| 1206 | } |
| 1207 | |
| 1208 | static int Tcl_ops_getPID(ClientData clientData, Tcl_Interp *interp, int argc, TCL_Char **argv) |
| 1209 | { |
| 1210 | wrapper->resetCommandLine(argc, 1, argv); |
| 1211 | |
| 1212 | if (OPS_getPID() < 0) return TCL_ERROR; |
| 1213 | |
| 1214 | return TCL_OK; |
| 1215 | } |
| 1216 | |
| 1217 | static int Tcl_ops_getNP(ClientData clientData, Tcl_Interp *interp, int argc, TCL_Char **argv) |
| 1218 | { |
nothing calls this directly
no test coverage detected