| 234 | |
| 235 | extern "C" |
| 236 | int OPS_SetIntOutput(int* numData, int* data, bool scalar) |
| 237 | { |
| 238 | int numArgs = *numData; |
| 239 | char buffer[40]; |
| 240 | for (int i = 0; i < numArgs; i++) { |
| 241 | sprintf(buffer, "%d ", data[i]); |
| 242 | Tcl_AppendResult(theInterp, buffer, NULL); |
| 243 | } |
| 244 | |
| 245 | return 0; |
| 246 | } |
| 247 | |
| 248 | extern "C" int OPS_SetIntListsOutput( |
| 249 | std::vector<std::vector<int>>& data) { |