| 397 | |
| 398 | extern "C" |
| 399 | int OPS_SetDoubleOutput(int* numData, double* data, bool scalar) |
| 400 | { |
| 401 | int numArgs = *numData; |
| 402 | char buffer[40]; |
| 403 | for (int i = 0; i < numArgs; i++) { |
| 404 | sprintf(buffer, "%35.20f ", data[i]); |
| 405 | Tcl_AppendResult(theInterp, buffer, NULL); |
| 406 | } |
| 407 | |
| 408 | return 0; |
| 409 | } |
| 410 | |
| 411 | extern "C" int OPS_SetDoubleListsOutput( |
| 412 | std::vector<std::vector<double>>& data) { |
no outgoing calls
no test coverage detected